Changeset 3196 for trunk/LMDZ.PLUTO/libf/phypluto/physiq_mod.F90
- Timestamp:
- Jan 31, 2024, 5:30:43 PM (10 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.PLUTO/libf/phypluto/physiq_mod.F90
r3195 r3196 1474 1474 enddo 1475 1475 1476 ! Generalised for arbitrary aerosols now. By LK 1476 if (aerohaze) then 1477 ! Generalised for arbitrary aerosols now. By LK 1477 1478 reffcol(1:ngrid,1:naerkind)=0.0 1478 1479 ! call n2_reffrad(ngrid,nlayer,nq,zq,reffrad(1,1,iaero_haze)) … … 1496 1497 ENDDO 1497 1498 ENDDO 1499 endif ! end of aerohaze 1498 1500 endif ! end of 'tracer' 1499 1501
Note: See TracChangeset
for help on using the changeset viewer.