source: LMDZ.3.3/trunk/libf/dyn3d/create_etat0.F

Last change on this file was 337, checked in by lmdzadmin, 23 years ago

Pour compatibilite avec le nouveau etat0_netcdf de Levan
LF

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 229 bytes
Line 
1c
2c $Header$
3c
4      PROGRAM create_etat0
5C
6C   Programme d'appel a etat0, creation des etats initiaux
7C   
8C
9      LOGICAL interbar
10      PARAMETER ( interbar = .TRUE. )
11      CALL etat0_netcdf ( interbar )
12      STOP
13      END
Note: See TracBrowser for help on using the repository browser.