Changeset 3820 for LMDZ6/branches/LMDZ-INCA-Dyn/libf/phylmd
- Timestamp:
- Feb 4, 2021, 3:59:25 PM (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/LMDZ-INCA-Dyn/libf/phylmd/physiq_mod.F90
r3792 r3820 34 34 USE FLOTT_GWD_rando_m, only: FLOTT_GWD_rando 35 35 USE fonte_neige_mod, ONLY : fonte_neige_get_vars 36 USE geometry_mod , ONLY: cell_area, latitude_deg, longitude_deg36 USE geometry_mod 37 37 USE ioipsl, only: histbeg, histvert, histdef, histend, histsync, & 38 38 histwrite, ju2ymds, ymds2ju, getin … … 53 53 USE phystokenc_mod, ONLY: offline, phystokenc 54 54 USE phys_cal_mod, only: year_len, mth_len, days_elapsed, jh_1jan, & 55 year_cur, mth_cur,jD_cur, jH_cur, jD_ref, day_cur, hour 55 year_cur, mth_cur,jD_cur, jH_cur, jD_ref, day_cur, hour, calend 56 56 !! USE phys_local_var_mod, ONLY : a long list of variables 57 57 !! ==> see below, after "CPP Keys" section … … 67 67 USE surface_data, ONLY : type_ocean, ok_veget, landice_opt 68 68 USE time_phylmdz_mod, only: annee_ref, current_time, day_ini, day_ref, & 69 day_step_phy, itau_phy, pdtphys, raz_date, start_time, update_time 69 day_step_phy, itau_phy, pdtphys, raz_date, start_time, update_time, ndays 70 70 USE tracinca_mod, ONLY: config_inca 71 71 USE tropopause_m, ONLY: dyn_tropopause … … 1944 1944 calday = REAL(days_elapsed) + jH_cur 1945 1945 WRITE(lunout,*) 'initial time chemini', days_elapsed, calday 1946 1947 call init_const_lmdz( & 1948 ndays, nbsrf, is_oce,is_sic, is_ter,is_lic, calend, & 1949 config_inca) 1950 1946 1951 1947 1952 CALL chemini( &
Note: See TracChangeset
for help on using the changeset viewer.