Schleifen und Verzweigungen

goto Anweisungsnummer

Berechnetes goto :

goto ( Anw.-Nr.1, Anw.-Nr.2, ) GanzzahlLinkswert

Springt zu der durch den Ganzzahl-Ausdruck festgelegten Anweisungsnummer aus der Liste.

continue-Anweisung, ,,leeres`` Kommando ohne Effekt auf das Programm. Wird meist als Scheinbefehl zur Definition von Anweisungsnummern verwendet.

          goto 123
  123     continue

if ( logischer Ausdruck) Anweisung

Anweisung wird nur dann ausgeführt, wenn logischer Ausdruck den Wert .true. besitzt.

Arithmetische if-Anweisung :

if ( numerischer Ausdruck) Anw.-Nr.1, Anw.-Nr.2, Anw.-Nr.3

Springt zu Anw.-Nr.1, wenn numerischer Ausdruck , zu Anw.-Nr.2, wenn und zu Anw.-Nr.3, wenn .
 
Das arithmetische if kann bei real oder double precision Ausdrücken aufgrund von Rundungsfehlern Probleme bereiten, da in diesem Falle der numerische Ausdruck niemals exakt sein wird.
 
Block-if-Struktur, umfaßt einseitige Entscheidung, Alternative und Fallunterscheidung.

if ( logischer Ausdruck) then
Anweisungen
endif
 
Dies entspricht der einfachen if -Anweisung.
 
Alternative:

if ( logischer Ausdruck) then
Anweisungen1
else
Anweisungen2
endif

Fallunterscheidung:

if ( logischer Ausdruck 1) then
Anweisungen1
else if ( logischer Ausdruck 2) then
Anweisungen2
else
Anweisungen3
endif
 
Es können beliebig viele Fallunterscheidungen vorgenommen werden.
 
Zählergesteuerte Scheifen:  

do Anweisungsnummer Index= Anfang,it Ende, Schrittweite
 
Fortlassen der Schrittweite entspricht einer Schrittweite 1.
 

Index:

numerische, nicht-komplexe Variable, durchläuft den durch Anfang, Ende und Schrittweite definierten Wertebereich.

Anfang:

numerischer, nicht-komplexer Ausdruck, definiert Anfangswert des Zählers Index.

Ende:

numerischer, nicht-komplexer Ausdruck, Abbruchbedingung, beendet die Schleife, sobald Index Ende.

Schrittweite:

numerischer, nicht-komplexer Ausdruck, definiert Erhöhung von Index bei jedem Schleifendurchlauf.