Ignore:
Timestamp:
07/21/14 12:01:59 (10 years ago)
Author:
ymipsl
Message:

calling iniphysics directly from dynamico

YM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • codes/icosagcm/branches/SATURN_DYNAMICO/LMDZ.COMMON/libf/phystd/comgeomphy.F90

    r222 r242  
    11module comgeomphy 
    22   real,save,allocatable :: airephy(:) 
    3    real,save,allocatable :: cuphy(:) 
    4    real,save,allocatable :: cvphy(:) 
    53   real,save,allocatable :: rlatd(:) 
    64   real,save,allocatable :: rlond(:) 
    … …  
    1412  
    1513    allocate(airephy(klon_omp)) 
    16     allocate(cuphy(klon_omp)) 
    17     allocate(cvphy(klon_omp)) 
    1814    allocate(rlatd(klon_omp)) 
    1915    allocate(rlond(klon_omp)) 
Note: See TracChangeset for help on using the changeset viewer.