Changeset 2913 for LMDZ5


Ignore:
Timestamp:
Jun 16, 2017, 4:05:52 PM (7 years ago)
Author:
acozic
Message:

when we make a simulation with inca, we do not want to make a test on ozone for this part.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/branches/IPSLCM6.0.10/libf/dynphy_lonlat/phylmd/etat0dyn_netcdf.F90

    r2720 r2913  
    143143!*******************************************************************************
    144144! Look for ozone tracer:
     145#ifndef INCA
    145146  DO i=1,nqtot; IF(ANY(["O3","o3"]==tname(i))) EXIT; END DO
    146147  IF(i/=nqtot+1) THEN
     
    150151    q3d(:,:,:,i)=q3d(:,:,:,i)*48./ 29.                  !--- Mole->mass fraction         
    151152  END IF
     153#endif
    152154  q3d(iip1,:,:,:)=q3d(1,:,:,:)
    153155
Note: See TracChangeset for help on using the changeset viewer.