Changeset 674 for LMDZ4/trunk/libf/phylmd/physiq.F
- Timestamp:
- Nov 16, 2005, 3:47:19 PM (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/trunk/libf/phylmd/physiq.F
r660 r674 125 125 cIM "slab" ocean 126 126 REAL tslab(klon) !Temperature du slab-ocean 127 SAVE tslab 127 128 REAL seaice(klon) !glace de mer (kg/m2) 129 SAVE seaice 128 130 REAL fluxo(klon) !flux turbulents ocean-glace de mer 129 131 REAL fluxg(klon) !flux turbulents ocean-atmosphere … … 1222 1224 SAVE ok_ade, ok_aie, bl95_b0, bl95_b1 1223 1225 cym 1226 c Anne 1227 SAVE u10m 1228 SAVE v10m 1229 SAVE t2m 1230 SAVE q2m 1231 SAVE ffonte 1232 SAVE fqcalving 1233 SAVE piz_ae 1234 SAVE tau_ae 1235 SAVE cg_ae 1236 SAVE rain_con 1237 SAVE snow_con 1238 SAVE bl95_b0 1239 SAVE bl95_b1 1240 SAVE topswai 1241 SAVE topswad 1242 SAVE solswai 1243 SAVE solswad 1244 SAVE d_u_con 1245 SAVE d_v_con 1246 SAVE rnebcon0 1247 SAVE clwcon0 1248 SAVE rnebcon 1249 SAVE clwcon 1250 SAVE paire_ter 1251 SAVE nhistoW 1252 SAVE histoW 1253 c SAVE anne 20/09/2005 1254 SAVE pblh 1255 SAVE plcl 1256 SAVE capCL 1257 SAVE oliqCL 1258 SAVE cteiCL 1259 SAVE pblt 1260 SAVE therm 1261 SAVE trmb1 1262 SAVE trmb2 1263 SAVE trmb3 1264 1265 c fin Anne 1224 1266 cjq-end 1225 1267 c … … 1284 1326 histoW(:,:,:,:) = 0.0 1285 1327 ! fin anne 1328 ! Anne 12/09/2005 1329 1330 pblh(:,:) =0. ! Hauteur de couche limite 1331 plcl(:,:) =0. ! Niveau de condensation de la CLA 1332 capCL(:,:) =0. ! CAPE de couche limite 1333 oliqCL(:,:) =0. ! eau_liqu integree de couche limite 1334 cteiCL(:,:) =0. ! cloud top instab. crit. couche limite 1335 pblt(:,:) =0. ! T a la Hauteur de couche limite 1336 therm(:,:) =0. 1337 trmb1(:,:) =0. ! deep_cape 1338 trmb2(:,:) =0. ! inhibition 1339 trmb3(:,:) =0. ! Point Omega 1340 ! fin Anne 1286 1341 1287 1342 cym … … 1787 1842 1788 1843 fder = dlw 1789 1790 1844 1791 1845 CALL clmain(dtime,itap,date0,pctsrf,pctsrf_new,
Note: See TracChangeset
for help on using the changeset viewer.