Changeset 114 for trunk/SRC/ToBeReviewed/TRIANGULATION/definetri.pro

Timestamp:

06/19/06 16:14:56 (18 years ago)

Author:

smasson

Message:

new compilation options (compile_opt idl2, strictarrsubs) in each routine

File:

• trunk/SRC/ToBeReviewed/TRIANGULATION/definetri.pro (modified) (2 diffs)

trunk/SRC/ToBeReviewed/TRIANGULATION/definetri.pro

@@ -89 +89 @@
 ;-
 FUNCTION definetri, nx, ny, downward
+;
+  compile_opt idl2, strictarrsubs
+;
    nx = long(nx)
    ny = long(ny)
@@ -109 +112 @@
 ; the lower-left corner of the rectangle.
       upward = bytarr(nx, ny)+1
-      upward(*, ny-1) = 0
-      upward(nx-1, *) = 0
+      upward[*, ny-1] = 0
+      upward[nx-1, *] = 0
       if n_elements(downward) NE 0 then upward[downward] = 0
       upward = where(upward EQ 1)