Fortran: Fortran 2003: Sonstiges

<<< zur Fortran-Startseite
<< Fortran 2003	Bibliotheken >>
< Coarrays	Sonstiges >

Die arithmetische IF-Anweisung (siehe ggf. Fortran:_FORTRAN_77:_Anhang#Arithmetisches_IF) wurde mit Fortran 2018 entfernt.
Das associate-Konstrukt wurde in Fortran 2003 neu aufgenommen. Damit kann auf einen Ausdruck durch einen Aliasnamen zugegriffen werden. Es macht einen Unterschied, ob der Ausdruck eine einfache Variable oder ein komplexerer Ausdruck ist. Im nachfolgenden Beispiel wird dieser Unterschied näher ausgeführt:

Fortran 2003 (oder neuer)-Code

program bsp
    implicit none
    
    integer :: x
    
    x = 5
    
    associate ( ass => x**3 )
        print *, ass
        x = 7
        print *, ass
    end associate
 
    x = 11
 
    associate ( ass => x )
        print *, ass
        x = 15
        print *, ass
    end associate
		
    ! Ausgabe:
    !   125
    !   125
    !    11
    !    15
end program bsp

<<< zur Fortran-Startseite
<< Fortran 2003	Bibliotheken >>
< Coarrays	Sonstiges >