5 lines
169 B
FortranFixed
5 lines
169 B
FortranFixed
|
ASSIGN 2000 TO WHENCE !Deviant "return" from 1000 to invoke 2000.
|
||
|
|
ASSIGN 1103 TO THENCE !Desired return from 2000.
|
||
|
|
GO TO 1000
|
||
|
|
1103 CONTINUE
|