Changeset 467 for trunk/NEMO/OPA_SRC/mppini_2.h90

Timestamp:

2006-05-10T19:44:38+02:00 (18 years ago)

Author:

opalod

Message:

nemo_v1_update_057:RB: step and opa reorganization

File:

• trunk/NEMO/OPA_SRC/mppini_2.h90 (modified) (2 diffs)

trunk/NEMO/OPA_SRC/mppini_2.h90

@@ -115 +115 @@
 
       ! open the file
-         IF ( lk_zps ) THEN 
+         IF ( ln_zco ) THEN 
+            clname = 'bathy_level.nc'         ! Level bathymetry
+            clvar = 'Bathy_level'
+         ELSE
             clname = 'bathy_meter.nc'         ! Meter bathy in case of partial steps
             clvar = 'Bathymetry'
-         ELSE
-            clname = 'bathy_level.nc'                       ! Level bathymetry
-            clvar = 'Bathy_level'
          ENDIF
 #if defined key_agrif
@@ -152 +152 @@
       ! land/sea mask over the global/zoom domain
 
-      imask(:,:)=1
+      imask(:,:) = 1
       WHERE ( zdta(jpizoom:(jpizoom+jpiglo-1),jpjzoom:(jpjglo+jpjzoom-1)) <= 0. ) imask = 0