Create fwd_parser_singleton.f90