Changeset 2635 for LMDZ5/trunk/libf/phylmd/dyn1d
- Timestamp:
- Sep 27, 2016, 6:02:46 PM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/dyn1d/lmdz1d.F90
r2611 r2635 16 16 ftsol, pbl_tke, pctsrf, radsol, rain_fall, snow_fall, ratqs, & 17 17 rnebcon, rugoro, sig1, w01, solaire_etat0, sollw, sollwdown, & 18 solsw, t_ancien, q_ancien, u_ancien, v_ancien, wake_cstar, wake_deltaq,&19 wake_delta t, wake_delta_pbl_TKE, delta_tsurf, wake_fip, wake_pe, &20 wake_ s, zgam, &21 z max0, zmea, zpic, zsig, &18 solsw, t_ancien, q_ancien, u_ancien, v_ancien, wake_cstar, & 19 wake_delta_pbl_TKE, delta_tsurf, wake_fip, wake_pe, & 20 wake_deltaq, wake_deltat, wake_s, wake_dens, & 21 zgam, zmax0, zmea, zpic, zsig, & 22 22 zstd, zthe, zval, ale_bl, ale_bl_trig, alp_bl 23 usedimphy24 usesurface_data, only : type_ocean,ok_veget25 use pbl_surface_mod, only : ftsoil, pbl_surface_init,&26 &pbl_surface_final27 usefonte_neige_mod, only : fonte_neige_init, fonte_neige_final28 29 useinfotrac ! new30 usecontrol_mod23 USE dimphy 24 USE surface_data, only : type_ocean,ok_veget 25 USE pbl_surface_mod, only : ftsoil, pbl_surface_init, & 26 pbl_surface_final 27 USE fonte_neige_mod, only : fonte_neige_init, fonte_neige_final 28 29 USE infotrac ! new 30 USE control_mod 31 31 USE indice_sol_mod 32 32 USE phyaqua_mod … … 787 787 wake_pe = 0. 788 788 wake_s = 0. 789 wake_dens = 0. 789 790 ale_bl = 0. 790 791 ale_bl_trig = 0. … … 810 811 ! t_ancien,q_ancien,,frugs(:,is_oce),clwcon(:,1),rnebcon(:,1),ratqs(:,1) 811 812 ! run_off_lic_0,pbl_tke(:,1:klev,nsrf), zmax0,f0,sig1,w01 812 ! wake_deltat,wake_deltaq,wake_s,wake_cstar,wake_fip,wake_delta_pbl_tke(:,1:klev,nsrf) 813 ! wake_deltat,wake_deltaq,wake_s,wake_dens,wake_cstar, 814 ! wake_fip,wake_delta_pbl_tke(:,1:klev,nsrf) 813 815 ! 814 816 ! NB2: The content of the startphy.nc file depends on some flags defined in
Note: See TracChangeset
for help on using the changeset viewer.