Changeset 4386 for LMDZ6/trunk/libf/phylmd
- Timestamp:
- Jan 17, 2023, 10:11:45 AM (23 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/physiq_mod.F90
r4380 r4386 4368 4368 4369 4369 #ifndef CPP_XIOS 4370 !--OB 30/05/2016 modified 21/10/20164371 !--here we return swaero_diag and dryaod_diag to FALSE4372 !--and histdef will switch it back to TRUE if necessary4373 !--this is necessary to get the right swaero at first step4374 !--but only in the case of no XIOS as XIOS is covered elsewhere4375 IF (debut) swaerofree_diag = .FALSE.4376 IF (debut) swaero_diag = .FALSE.4377 IF (debut) dryaod_diag = .FALSE.4378 !--IM 15/09/2017 here we return ok_4xCO2atm to FALSE4379 !--as for swaero_diag, see above4380 IF (debut) ok_4xCO2atm = .FALSE.4381 4382 4370 ! 4383 4371 !IM 2eme calcul radiatif pour le cas perturbe ou au moins un
Note: See TracChangeset
for help on using the changeset viewer.