Changeset 1720 for trunk/LMDZ.MARS/libf/phymars/initracer.F
- Timestamp:
- Jul 6, 2017, 5:12:58 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.MARS/libf/phymars/initracer.F
r1685 r1720 320 320 count=count+1 321 321 endif 322 if ( microphysco2) then322 if (co2clouds) then 323 323 if (noms(iq).eq."ccnco2_mass") then 324 324 igcm_ccnco2_mass=iq … … 722 722 & "a ho2 tracer !" 723 723 stop 724 724 endif 725 725 if (igcm_h2o2.eq.0) then 726 726 write(*,*) "initracer: error !!"
Note: See TracChangeset
for help on using the changeset viewer.