; letapps <- mapM genLetApp letbndrs
; let bndrs = Maybe.catMaybes (map fst letapps)
; (aap,kooi) <- reduceFSVECListToHsList rez
; letapps <- mapM genLetApp letbndrs
; let bndrs = Maybe.catMaybes (map fst letapps)
; (aap,kooi) <- reduceFSVECListToHsList rez