Changeset 4263 for LMDZ6/trunk/libf/phylmd/phyredem.F90
- Timestamp:
- Sep 21, 2022, 9:35:28 AM (22 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/phyredem.F90
r4170 r4263 35 35 USE iostart, ONLY: open_restartphy, close_restartphy, enddef_restartphy, put_field, put_var 36 36 USE traclmdz_mod, ONLY : traclmdz_to_restart 37 USE infotrac_phy, ONLY: type s_trac, nqtot, tracers, nbtr37 USE infotrac_phy, ONLY: type_trac, types_trac, nqtot, tracers, nbtr 38 38 USE carbon_cycle_mod, ONLY : carbon_cycle_cpl, co2_send 39 39 USE indice_sol_mod, ONLY: nbsrf, is_oce, is_sic, is_ter, is_lic, epsfra … … 336 336 337 337 ! trs from traclmdz_mod 338 ELSE IF ( ANY(types_trac == 'lmdz')) THEN338 ELSE IF (type_trac == 'lmdz') THEN 339 339 CALL traclmdz_to_restart(trs) 340 340 it = 0
Note: See TracChangeset
for help on using the changeset viewer.