Changeset 3879
- Timestamp:
- Aug 5, 2025, 1:43:24 PM (2 days ago)
- Location:
- trunk/LMDZ.PLUTO/libf/phypluto
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.PLUTO/libf/phypluto/callcorrk.F90
r3844 r3879 1127 1127 end do 1128 1128 1129 else ! total heating rates multiplied by nlte coef 1129 else ! total heating rates multiplied by nlte coef : better not use 1130 1130 1131 1131 do nw=1,L_NSPECTV -
trunk/LMDZ.PLUTO/libf/phypluto/inifis_mod.F90
r3844 r3879 885 885 if (is_master)write(*,*)trim(rname)//& 886 886 " nlte = ",nlte 887 strobel=. false. ! default value887 strobel=.true. ! default value 888 888 call getin_p("strobel",strobel) 889 889 if (is_master)write(*,*)trim(rname)//&
Note: See TracChangeset
for help on using the changeset viewer.