Changeset 48 for trunk/initocemeshmask.pro

Timestamp:

03/16/14 20:38:39 (10 years ago)

Author:

pinsard

Message:

fix thanks to coding rules

File:

• trunk/initocemeshmask.pro (modified) (5 diffs)

trunk/initocemeshmask.pro

@@ -82 +82 @@
    'ORCA2': BEGIN
                msg = 'iii : valid orcares parameter = ' + orcares
-               ras = report(msg)
+               ras = report(msg)
                filename_oce = 'meshmask_bab.nc'
                IF keyword_set(DRAKKAR_EXP) THEN BEGIN
@@ -121 +121 @@
                  ENDELSE
               END
-    ELSE  : BEGIN
+    ELSE : BEGIN
                msg = 'eee : invalid orcares parameter = ' + orcares
-               ras = report(msg)
+               ras = report(msg)
                msg = 'eee : orcares must be ORCA2 or ORCA025'
-               ras = report(msg)
+               ras = report(msg)
                RETURN
-            END
+    END
   ENDCASE
 ;
@@ -140 +140 @@
               RETURN
             END
-     ELSE: BEGIN
+     ELSE : BEGIN
              msg = 'iii : ${GEOMAG_ID} is ' + geomag_id_env
              ras = report(msg)
-           END
+     END
   ENDCASE
 iodirin = isadirectory(geomag_id_env)
@@ -197 +197 @@
 ;
               END
-      ELSE  : BEGIN
+      ELSE : BEGIN
                  msg = 'eee : invalid orcares parameter = ' + orcares
                  ras = report(msg)
@@ -203 +203 @@
                  ras = report(msg)
                  RETURN
-              END
+      END
   ENDCASE
 jpt = 1