TMPFILE=$(mktemp "${ARG}_XXXXXX.f90")
TMPFILES+=( "${TMPFILE}" )
#replace "program main_name by subroutine user\_main (and the end clause as well)"
TMPFILE=$(mktemp "${ARG}_XXXXXX.f90")
TMPFILES+=( "${TMPFILE}" )
#replace "program main_name by subroutine user\_main (and the end clause as well)"