(let ((var1 init-form-1)
       (var2 init-form-2)
       ...
       (varm init-form-m))

   form1
   form2
   ...
   formn)