Changeset 2788 for LMDZ5/trunk/libf/phylmd/regr_pr_comb_coefoz_m.F90
- Timestamp:
- Feb 2, 2017, 7:01:50 PM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/regr_pr_comb_coefoz_m.F90
r2346 r2788 76 76 use dimphy, only: klon 77 77 use mod_phys_lmdz_mpi_data, only: is_mpi_root 78 use regr_pr_ av_m, only: regr_pr_av78 use regr_pr_time_av_m, only: regr_pr_time_av 79 79 use regr_pr_int_m, only: regr_pr_int 80 80 use press_coefoz_m, only: press_in_edg, plev … … 128 128 !$omp end master 129 129 130 call regr_pr_ av(ncid, (/"a2 ", "a4 ", "a6 ", &131 "P_net_Mob", "r_Mob ", "temp_Mob ", "R_Het "/), julien, &130 call regr_pr_time_av(ncid, (/"a2 ", "a4 ", "a6 ", & 131 "P_net_Mob", "r_Mob ", "temp_Mob ", "R_Het "/), REAL(julien-1), & 132 132 press_in_edg, paprs, coefoz) 133 133 a2 = coefoz(:, :, 1)
Note: See TracChangeset
for help on using the changeset viewer.