Changeset 240 for trunk/SRC/ToBeReviewed/HOPE/findlineandpointtype.pro

Timestamp:

03/28/07 14:17:24 (17 years ago)

Author:

pinsard

Message:

replace some print by some report in some .pro (continuation)

File:

• trunk/SRC/ToBeReviewed/HOPE/findlineandpointtype.pro (modified) (16 diffs)

trunk/SRC/ToBeReviewed/HOPE/findlineandpointtype.pro

@@ -85 +85 @@
          if (jpi NE 128 and jpi NE 256) $
           OR (jpj NE 121 AND jpj NE 121*2 AND jpj NE 195 AND jpj NE 195*2) then begin
-            print,  'CASE NOT coded...'
+            ras = report('CASE NOT coded...')
             stop
          ENDIF
@@ -106 +106 @@
                         END
                         ELSE:BEGIN
-                           print,  'CASE NOT coded...'
+                           ras = report('CASE NOT coded...')
                            stop
                         END
@@ -134 +134 @@
                         END
                         ELSE:BEGIN
-                           print,  'CASE NOT coded...'
+                           ras = report('CASE NOT coded...')
                            stop
                         END
@@ -151 +151 @@
                   1.4:vargrid = 'U'
                   ELSE:BEGIN
-                     print,  'CASE NOT coded...'
+                     ras = report('CASE NOT coded...')
                      stop
                   END
@@ -162 +162 @@
                   2.8:vargrid = 'U'
                   ELSE:BEGIN
-                     print,  'CASE NOT coded...'
+                     ras = report('CASE NOT coded...')
                      stop
                   END
@@ -168 +168 @@
             END
             ELSE:BEGIN
-               print,  'CASE NOT coded...'
+               ras = report('CASE NOT coded...')
                stop
             END
@@ -175 +175 @@
       'xz':BEGIN
          if (jpi NE 128 and jpi NE 256) then begin
-            print,  'CASE NOT coded...'
+            ras = report('CASE NOT coded...')
             stop
          ENDIF
@@ -188 +188 @@
                test = (where(lat EQ yaxis[0]))[0]
                if test EQ -1 then begin
-                  print,  'CASE NOT coded...'
+                  ras = report('CASE NOT coded...')
                   stop
                endif
@@ -206 +206 @@
                   test = (where(lat EQ yaxis[0]))[0]
                   if test EQ -1 then begin
-                     print,  'CASE NOT coded...'
+                     ras = report('CASE NOT coded...')
                      stop
                   endif
@@ -230 +230 @@
       'yz':BEGIN
          if (jpj NE 121 AND jpj NE 195) then begin
-            print,  'CASE NOT coded...'
+            ras= report('CASE NOT coded...')
             stop
          ENDIF
@@ -243 +243 @@
                   (where(lonTodd+xstep EQ xaxis[0]))[0] NE -1:vargrid = 'U'
                   ELSE:BEGIN
-                     print,  'CASE NOT coded...'
+                     ras = report('CASE NOT coded...')
                      stop
                   END
@@ -256 +256 @@
                   (where(lonTodd-xstep EQ xaxis[0]))[0] NE -1:vargrid = 'T'
                   ELSE:BEGIN
-                     print,  'CASE NOT coded...'
+                     ras = report('CASE NOT coded...')
                      stop
                   END
@@ -269 +269 @@
                   (where(lonTodd+xstep EQ xaxis[0]))[0] NE -1:vargrid = 'U'
                   ELSE:BEGIN
-                     print,  'CASE NOT coded...'
+                     ras = report('CASE NOT coded...')
                      stop
                   END
@@ -282 +282 @@
                   (where(lonTodd-xstep EQ xaxis[0]))[0] NE -1:vargrid = 'T'
                   ELSE:BEGIN
-                     print,  'CASE NOT coded...'
+                     ras = report('CASE NOT coded...')
                      stop
                   END
@@ -288 +288 @@
             END
             ELSE:BEGIN
-               print,  'CASE NOT coded...'
+               ras = report('CASE NOT coded...')
                stop
             END
@@ -295 +295 @@
       END
       else:BEGIN
-         print, 'case not coded'
+         ras = report('CASE NOT coded...')
          stop
       END