Ignore:
Timestamp:
07/16/14 18:05:01 (10 years ago)
Author:
milmd
Message:

Last LMDZ version (1315) with OpenMP directives and other stuff

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r222 r227  
    22   
    33  INTEGER,SAVE :: klon   ! number of atmospheric columns (for this OpenMP subgrid) 
    4   INTEGER,SAVE :: klev   ! number of atmospheric layers 
    5   INTEGER,SAVE :: klevp1 ! number of atmospheric layers+1 
    6   INTEGER,SAVE :: klevm1 ! number of atmospheric layers-1 
     4  INTEGER,SAVE :: klev   ! number of atmospheric layers, read by master 
     5  INTEGER,SAVE :: klevp1 ! number of atmospheric layers+1, read by master 
     6  INTEGER,SAVE :: klevm1 ! number of atmospheric layers-1, read by master 
    77!  INTEGER,SAVE :: kflev 
    88 
Note: See TracChangeset for help on using the changeset viewer.