fpt Reference: CHANGE DO - UNTIL TO DO WHILE

fpt and WinFPT Reference Manual - Command-line Commands

| SimCon Home | Ref Manual Home |

CHANGE DO UNTIL TO DO WHILE

Syntax:

[DO NOT] CHANGE DO [-] UNTIL TO DO WHILE

Function:

Systematically changes DO UNTIL constructs to DO WHILE constructs.

DO - UNTIL is supported under Encore (Gould-SEL) Concept-32 Fortran.

Where to Use this Command

Operating system command line	Yes
Configuration file, config.fsp	Yes
Specification (fsp) files, *.fsp	Yes
Interactively, to FPT> prompt	Yes
Interactive command files	Yes
Embedded in the Fortran code	Yes

Default

DO - UNTIL constructs are not changed by default (Note that defaults may be modified in the configuration file).

Examples

The command-line command:

$ fpt heli "%change do until to do while"

results in modification of:

DO UNTIL (A(I) .EQ. -9999) SS(I) = SS(I) + A(I)*A(I) I=I+1 ENDDO

to:

! DO UNTIL(A(I) .EQ. -9999) !-------------^----------------------------------------------- !!! FPT - 2253 'DO UNTIL' replaced by 'DO WHILE' !------------------------------------------------------------- DO WHILE (.NOT. (A(I) .EQ. -9999)) SS(I)=A(I)*A(I) I=I+1 ENDDO