Changeset 337


Ignore:
Timestamp:
Feb 19, 2002, 5:31:42 PM (23 years ago)
Author:
lmdzadmin
Message:

Pour compatibilite avec le nouveau etat0_netcdf de Levan
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ.3.3/trunk/libf/dyn3d/create_etat0.F

    r2 r337  
     1c
     2c $Header$
     3c
    14      PROGRAM create_etat0
    25C
    … …  
    47C   
    58C
    6       CALL etat0_netcdf
     9      LOGICAL interbar
     10      PARAMETER ( interbar = .TRUE. )
     11      CALL etat0_netcdf ( interbar )
    712      STOP
    813      END
Note: See TracChangeset for help on using the changeset viewer.