Changeset 176 for trunk/NEMO

Timestamp:

2004-11-05T15:00:52+01:00 (20 years ago)

Author:

opalod

Message:

CT : BUGFIX121 : correct a syntax error on the initialization of jpjdta parameter in the default case

File:

• trunk/NEMO/OPA_SRC/par_oce.F90 (modified) (1 diff)

trunk/NEMO/OPA_SRC/par_oce.F90

@@ -87 +87 @@
       ! data size                     !!! * size of all input files *
       jpidta  = 10,                 &  !: 1st lateral dimension ( >= jpi )
-      jpjdta  = 10,                 &  !: 2nd    "         "    ( >= jpj )
+      jpjdta  = 12,                 &  !: 2nd    "         "    ( >= jpj )
       jpkdta  = 31,                 &  !: number of levels      ( >= jpk )
 
       ! global or zoom domain size    !!! * computational domain *
       jpiglo  = jpidta,             &  !: 1st dimension of global domain --> i
-      jpjglo  = jpidta,             &  !: 2nd    "                  "    --> j
+      jpjglo  = jpjdta,             &  !: 2nd    "                  "    --> j
       jpk     = jpkdta,             &  !: number of vertical levels
       ! zoom starting position