Changeset 1912 for LMDZ5/trunk/libf/phylmd/calcul_STDlev.h
- Timestamp:
- Dec 5, 2013, 6:32:35 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/calcul_STDlev.h
r1907 r1912 6 6 missing_val=nf90_fill_real 7 7 ! 8 !IM freq_moyNMC = frequences auxquelles on moyenne les champs accumules 9 !IM sur les niveaux de pression standard du NMC 10 DO n=1, nout 11 freq_moyNMC(n)=freq_outNMC(n)/freq_calNMC(n) 12 ENDDO 13 ! 14 CALL ini_undefSTD(itap,freq_outNMC) 8 CALL ini_undefSTD(itap,itapm1) 15 9 ! 16 10 !IM on interpole les champs sur les niveaux STD de pression … … 135 129 !IM on somme les valeurs toutes les freq_calNMC secondes 136 130 ! 137 CALL undefSTD(itap, freq_calNMC,read_climoz)138 ! 139 !IM on moyenne a la fin du mois ou du jour (toutes les freq_outNMC secondes)140 ! 141 CALL moy_undefSTD(itap, freq_outNMC,freq_moyNMC)131 CALL undefSTD(itap, read_climoz) 132 ! 133 !IM on moyenne a la fin du mois, du jour ou toutes les 6h 134 ! 135 CALL moy_undefSTD(itap,itapm1) 142 136 ! 143 137 CALL plevel(klon,klev,.true.,pplay,50000., &
Note: See TracChangeset
for help on using the changeset viewer.