Changeset 425 for LMDZ.3.3/trunk/libf


Ignore:
Timestamp:
Oct 28, 2002, 2:36:27 PM (22 years ago)
Author:
lmdz
Message:

Dans le cas "oldice" la routine "sea_ice" utilise seulement l'interpol.
grille_m Levan

LF

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r259 r425  
    525525         title = 'Sea-ice Amip '
    526526c
    527          CALL conf_dat2d(title,imdep, jmdep, dlon_ini, dlat_ini,
     527         IF( oldice )  THEN
     528          CALL conf_dat2d(title,imdep, jmdep, dlon_ini, dlat_ini,
     529     .                        dlon, dlat, champ, .FALSE.           )
     530         ELSE
     531          CALL conf_dat2d(title,imdep, jmdep, dlon_ini, dlat_ini,
    528532     .                        dlon, dlat, champ, interbar          )
     533         ENDIF
    529534c
    530535      IF( oldice )  THEN
Note: See TracChangeset for help on using the changeset viewer.