Fortran: Fortran 2003: Programmaufbau

<<< zur Fortran-Startseite
<< Fortran 2003	Bibliotheken >>
< Programmaufbau	Datentypen >

Programmaufbau und ZeilenformatBearbeiten

Der grundlegende Programmaufbau und das Zeilenformat von Fortran 90/95 wurden in Fortran 2003 beibehalten. Neben der free source form ist aus Kompatibilitätsgründen auch noch immer die alte, aus FORTRAN 77 bekannte, fixed source form gültig.

Eine Zeile darf auch in Fortran 2003 bei Verwendung der free source form standardmäßig maximal 132 Zeichen beinhalten. Ein symbolischer Name darf nun höchstens 63 Zeichen lang sein. Eine Anweisung darf sich maximal über 256 Zeilen erstrecken. Das Zeilenfortsetzungszeichen ist wie in Fortran 90/95 das Kaufmanns-Und: &.

ZeichenvorratBearbeiten

Der Fortran 2003-Zeichenvorrat wurde gegenüber Fortran 90/95 erweitert:

Großbuchstaben:	A bis Z
Kleinbuchstaben:	a bis z
Ziffern:	0 bis 9
FORTRAN 77-Sonderzeichen:	+ - * / = ( ) : , . ' $ und Leerzeichen
Fortran 90/95-Sonderzeichen:	_ ! ? " & ; < >
Fortran 2003-Sonderzeichen:	\ [ ] { } ~ ` ^ \| # @
FORTRAN 77 neu bei Fortran 90/95 neu bei Fortran 2003

Anwendungsgebiet der neu hinzugekommenen ZeichenBearbeiten

Von den in Fortran 2003 neu zugefügten Zeichen haben nur die eckigen Klammern einen konkreten Anwendungsbereich als Kennzeichnung von Feldkonstruktoren. Ein Feldkonstruktor darf neben der aus Fortran 95 bekannten Form

(/ werte /)

nun auch mit eckigen Klammern geschrieben werden

[ werte ]

Beispiel:

Fortran 2003-Code

! bsp.f03

program bsp
  implicit none
  
  integer, dimension( 3 ) :: a = [ 20, 33, 55 ]
  integer, dimension( 2 ) :: b = (/ 44, 55 /)
  
  write( *, *) a
  write( *, *) b 

! Ausgabe: 
!   20 33 55
!   44 55
end program bsp

Kompilieren, linken:

g95 -o bsp bsp.f03

<<< zur Fortran-Startseite
<< Fortran 2003	Bibliotheken >>
< Programmaufbau	Datentypen >