Create map_closure.f90