Changeset 5927 for LMDZ6/trunk/libf/phylmd/physiq_mod.F90
- Timestamp:
- Dec 12, 2025, 5:26:10 PM (7 weeks ago)
- File:
-
- 1 edited
-
LMDZ6/trunk/libf/phylmd/physiq_mod.F90 (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/physiq_mod.F90
r5918 r5927 80 80 USE readaerosol_mod, ONLY : init_aero_fromfile 81 81 USE readaerosolstrato_m, ONLY : init_readaerosolstrato 82 USE radlwsw_m, only: radlwsw82 USE radlwsw_m, ONLY: radlwsw 83 83 USE reevap_mod, ONLY: reevap 84 84 USE regr_horiz_time_climoz_m, ONLY: regr_horiz_time_climoz 85 USE regr_pr_time_av_m, only: regr_pr_time_av85 USE regr_pr_time_av_m, ONLY: regr_pr_time_av 86 86 USE stratocu_if_mod, ONLY: stratocu_if 87 87 USE surface_data, ONLY : type_ocean, ok_veget 88 88 USE tend_to_tke_mod, ONLY: tend_to_tke 89 USE time_phylmdz_mod, only: current_time, itau_phy, pdtphys, raz_date, update_time89 USE time_phylmdz_mod, ONLY: current_time, itau_phy, pdtphys, raz_date, update_time 90 90 USE tracinca_mod, ONLY: config_inca 91 91 USE transp_mod, ONLY: transp … … 412 412 USE phytracr_spl_mod, ONLY: phytracr_spl_out_init, phytracr_spl 413 413 USE s2s, ONLY : s2s_initialize, s2s_finalize 414 414 415 IMPLICIT NONE 415 416 !>====================================================================== … … 458 459 !! d_ps----output-R-tendance physique de la pression au sol 459 460 !!====================================================================== 460 integerjjmp1461 INTEGER jjmp1 461 462 ! parameter (jjmp1=jjm+1-1/jjm) ! => (jjmp1=nbp_lat-1/(nbp_lat-1)) 462 463 ! integer iip1
Note: See TracChangeset
for help on using the changeset viewer.
