Changeset 3334 for trunk/LMDZ.PLUTO/libf/phypluto
- Timestamp:
- May 17, 2024, 6:13:26 PM (6 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.PLUTO/libf/phypluto/callsedim.F
r3195 r3334 99 99 100 100 do iq=1,nq 101 if((radius(iq).gt.1.e-9) .and.(iq.ne.igcm_haze)) then ! JVO 08/2017 : be careful radius was tested uninitialized (fixed) ...101 if((radius(iq).gt.1.e-9)) then ! JVO 08/2017 : be careful radius was tested uninitialized (fixed) ... 102 102 103 103 ! (no sedim for gases, and n2_ice sedim is done in condense_n2)
Note: See TracChangeset
for help on using the changeset viewer.