Return to Statement

Program Loop Example 2

In the program below, the same results are obtained, as in the previous example, using separate labels for the outer and inner loops.

$$
$$ Declarations
$$
    ENTITY/PT(8)
    NUMBER/CNTR(2),X(4),Y(4)
    DATA/CNTR,-1,1
    DATA/X,-.5,0,.5,0
    DATA/Y,0,-.5,0,.5
$$
$$ Do Statements
$$
    DO/L2:,I,1,2
    DO/L1:,J,1,4
$$
$$ Geometry Definition
$$
    PT(I*J)=POINT/(CNTR(I)+X(J)),Y(J)
    L1:
    L2:

Nested DO loops using separate labels