Fortran 90 oktatóanyag >> Ciklusok
5. Ciklusok
- Új felépítés
- Új utasítások
b) Új utasítások
EXITA DO WHILE ciklus bevezetése után a következő újítás az EXIT utasítás, mely lehetővé teszi, hogy a ciklusból kilépjünk, mielőtt elérnénk a ciklus végéig:
do i=1,20
...
if (...) exit
...
end do
...
if (...) exit
...
end do
Így a ciklusunk gyakorlatilag DO WHILE ciklusként működik. Egymásba ágyazott ciklusok esetén az EXIT utasítás automatikusan a legbelső ciklusból lép ki, ha mi nem ezt szeretnénk, a ciklusokat el kell neveznünk és az EXIT utasítás után megadni annak a ciklusnak a nevét, amelyből ki akarunk lépni:
oszlopok: do j=1,20
sorok: do i=1,10
...
if (...) exit oszlopok
...
end do sorok
end do oszlopok
sorok: do i=1,10
...
if (...) exit oszlopok
...
end do sorok
end do oszlopok
CYCLE
A CYCLE utasítás lehetővé teszi, hogy egy cikluson belül az éppen futó iterációt leállítsuk, és egy új iterációt kezdjünk:
do i=1,20
...
if (...) cycle
...
end do
...
if (...) cycle
...
end do