mod_form='''module m_{{ module_name }} use, intrinsic :: iso_fortran_env, only: real64 use m_openmpi use m_parameters use m_arrays use m_calculate implicit none {{ module_data }} contains subroutine m_{{ module_name }}_init integer :: ierr integer :: i, j, k {{ module_init }} end subroutine m_{{ module_name }}_init subroutine m_{{ module_name }}_finalize {{ module_finalize }} end subroutine m_{{ module_name }}_finalize subroutine m_{{ module_name }}_calculate_pass1(fidx) integer :: fidx integer :: i, j, k {{ module_pass1 }} end subroutine m_{{ module_name }}_calculate_pass1 subroutine m_{{ module_name }}_average_pass1 (nfiles) integer :: nfiles real*8 :: denum denum=real(nfiles*nyp*nzp) {{ module_pass1_avg }} end subroutine m_{{ module_name }}_average_pass1 subroutine m_{{ module_name }}_calculate_pass2(fidx) integer :: fidx integer :: i, j, k {{ module_pass2 }} end subroutine m_{{ module_name }}_calculate_pass2 subroutine m_{{ module_name }}_average_pass2 (nfiles) integer :: nfiles real*8 :: denum denum=real(nfiles*nyp*nzp) {{ module_pass2_avg }} end subroutine m_{{ module_name }}_average_pass2 subroutine m_{{ module_name }}_write_result {{ module_write_result }} end subroutine m_{{ module_name }}_write_result end module m_{{ module_name }} '''