Changeset 3778 for branches/2013/dev_r3411_CNRS4_IOCRS/NEMOGCM/CONFIG

Timestamp:

2013-02-08T11:40:58+01:00 (11 years ago)

Author:

cetlod

Message:

2013/dev_r3411_CNRS4_IOCRS/NEMOGCM : improvment of outputs coarsening

Location:

branches/2013/dev_r3411_CNRS4_IOCRS/NEMOGCM/CONFIG/ORCA2_LIM_CRS

Files:

• EXP00/iodef.xml (modified) (5 diffs)
• MY_SRC/iom.F90 (modified) (1 diff)
• MY_SRC/lbclnk.F90 (modified) (2 diffs)

branches/2013/dev_r3411_CNRS4_IOCRS/NEMOGCM/CONFIG/ORCA2_LIM_CRS/EXP00/iodef.xml

@@ -291 +291 @@
          <field id="soce_crs"   description="salinity"                unit="psu"  axis_ref="deptht" />
    <field id="ssh_crs"    description="sea surface height"      unit="m"                      />
+        <field id="ssh2_crs"    description="sea surface height"      unit="m"                      />
    <field id="sst_crs"    description="sea surface temperature" unit="degC"                   />
    <field id="sss_crs"    description="sea surface salinity"    unit="psu"                    />
@@ -311 +312 @@
       <group id="gcrs_W"  axis_ref="depthw" grid_ref="grid_W_crs">
    <field id="woce_crs"   description="ocean vertical velocity"   unit="m/s" />
+        <field id="woce2_crs"   description="ocean vertical velocity"   unit="m/s" />
    <field id="wocet_crs"  description="ocean vertical velocity times temperature" unit="degC.m/s" />
    <field id="woces_crs"  description="ocean vertical velocity times salinity"    unit="psu.m/s" />
@@ -347 +349 @@
              <field ref="soce_crs"    name="vosaline" />
              <field ref="ssh_crs"     name="sossheig" />
+             <field ref="ssh2_crs"    name="sossheig2" />
              <field ref="hdiv_crs"    name="vohdiver" />
               <field ref="sst_crs"     name="sosstsst" />
@@ -431 +434 @@
            <field ref="soce_crs"    name="vosaline" />
            <field ref="ssh_crs"     name="sossheig" />
+           <field ref="ssh2_crs"     name="sossheig2" />
       <field ref="sst_crs"     name="sosstsst" />
       <field ref="sss_crs"     name="sosaline" />
@@ -474 +478 @@
         <file id="5d_gcrs_W" name="auto" description="ocean U grid coarsened variables" >
            <field ref="woce_crs"    name="vovecrtz"  />
+           <field ref="woce2_crs"   name="vovecrtz2"  />
            <field ref="wocet_crs"   name="vovewoct" />
            <field ref="woces_crs"   name="vovewocs" />

branches/2013/dev_r3411_CNRS4_IOCRS/NEMOGCM/CONFIG/ORCA2_LIM_CRS/MY_SRC/iom.F90

@@ -114 +114 @@
       CALL set_grid( "grid_V", glamv, gphiv )
       CALL set_grid( "grid_W", glamt, gphit )
-
+      !cc
+      IF(ln_crs) THEN
       ! horizontal coarse grid definition
-      CALL setgrid_crs( "grid_T_crs", glamt_crs, gphit_crs )
-      CALL setgrid_crs( "grid_U_crs", glamu_crs, gphiu_crs )
-      CALL setgrid_crs( "grid_V_crs", glamv_crs, gphiv_crs )
-      CALL setgrid_crs( "grid_W_crs", glamt_crs, gphit_crs )
+         CALL setgrid_crs( "grid_T_crs", glamt_crs, gphit_crs )
+         CALL setgrid_crs( "grid_U_crs", glamu_crs, gphiu_crs )
+         CALL setgrid_crs( "grid_V_crs", glamv_crs, gphiv_crs )
+         CALL setgrid_crs( "grid_W_crs", glamt_crs, gphit_crs )
+      ENDIF
 
       ! vertical grid definition

branches/2013/dev_r3411_CNRS4_IOCRS/NEMOGCM/CONFIG/ORCA2_LIM_CRS/MY_SRC/lbclnk.F90

@@ -161 +161 @@
             END SELECT
             !                                          ! North fold
-            pt3d( 1 ,jpj,:) = zland
-            pt3d(jpi,jpj,:) = zland
+          
             CALL lbc_nfd( pt3d(:,:,:), cd_type, psgn )
             !
@@ -249 +248 @@
                pt2d(:, 1 ) = zland
             END SELECT
-            !                                          ! North fold
-            pt2d( 1 ,1  ) = zland 
-            pt2d( 1 ,jpj) = zland 
-            pt2d(jpi,jpj) = zland
+            
             CALL lbc_nfd( pt2d(:,:), cd_type, psgn )
             !