Changeset 3086 for LMDZ6/trunk/libf/phylmd/physiq_mod.F90
- Timestamp:
- Nov 22, 2017, 11:01:27 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/physiq_mod.F90
r3082 r3086 2071 2071 IF(adjust_tropopause) THEN 2072 2072 CALL regr_pr_time_av(ncid_climoz, vars_climoz(1:read_climoz), & 2073 ro3i, press_edg_climoz, paprs, wo, time_climoz, &2074 longitude_deg, latitude_deg, press_cen_climoz,&2073 ro3i, 'C', press_cen_climoz, pplay, wo, paprs(:,1), & 2074 time_climoz , longitude_deg, latitude_deg, & 2075 2075 dyn_tropopause(t_seri, ztsol, paprs, pplay, rot)) 2076 2076 ELSE 2077 CALL regr_pr_time_av(ncid_climoz, vars_climoz(1:read_climoz), & 2078 ro3i, press_edg_climoz, paprs, wo, time_climoz) 2077 CALL regr_pr_time_av(ncid_climoz, vars_climoz(1:read_climoz), & 2078 ro3i, 'C', press_cen_climoz, pplay, wo, paprs(:,1), & 2079 time_climoz ) 2079 2080 END IF 2080 2081 ! Convert from mole fraction of ozone to column density of ozone in a
Note: See TracChangeset
for help on using the changeset viewer.