Changeset 2353 for LMDZ5


Ignore:
Timestamp:
Aug 26, 2015, 2:47:43 PM (9 years ago)
Author:
Ehouarn Millour
Message:

Correction for ce0l to compile and work in serial mode.
EM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/dynlonlat_phylonlat/phylmd/ce0l.F90

    r2351 r2353  
    6262  REAL, ALLOCATABLE  :: lat_omask(:,:), dlat_omask(:), ocetmp (:,:)
    6363  REAL               :: date, lev(1)
     64#ifndef CPP_PARA
     65! for iniphysiq in serial mode
     66  INTEGER,PARAMETER :: mpi_rank=0
     67  INTEGER :: distrib_phys(mpi_rank:mpi_rank)=(jjm-1)*iim+2
     68#endif
    6469!-------------------------------------------------------------------------------
    6570  modname="ce0l"
Note: See TracChangeset for help on using the changeset viewer.