Fortran: Fortran 95: Datentypen

<<< zur Fortran-Startseite
<< Fortran 95	Fortran 2003 >>
< Programmaufbau	Felder >

Dieses Kapitel handelt von Datentypen, Variablen, Konstanten und der Wertzuweisung.

Datentypen

Arithmetische Datentypen

Datentyp	Kommentar	Beispiele (Konstanten)
`integer`	Ganzzahlen	15, -6500, 200000000
`real`	Gleitkommazahlen einfacher Genauigkeit	3.1415, -5.5, .7e3, 12.5E-5
(`double precision`)	Gleitkommazahlen doppelter Genauigkeit (aus FORTRAN 77)	3.1415D0, -5.5D0, .7d3, 12.5D-5
`complex`	Komplexe Zahlen (zwei `real`-Zahlen)	(3.1415, -5.5), (1.4, 7.1E4)

double precision ist in Fortran 95 nur noch aus historischen Gründen (FORTRAN 77) vorhanden. Fortran 95 bietet für Datentypen höherer Genauigkeit bzw. mit größerem Zahlenbereich andere Sprachmittel. Diese Thematik wird später erläutert (Datentypen höherer Genauigkeit).

Binär-, Oktal- oder Hexadezimalzahlen können als "boz literal constants" angegeben werden:

Schreibweise 1	Schreibweise 2	Kommentar
B"zahl"	B'zahl'	Binäre Zahl
O"zahl"	O'zahl'	Oktalzahl
Z"zahl"	Z'zahl'	Hexadezimalzahl

Beispiel:

Fortran 90/95-Code (free source form)

program bsp
  implicit none
 
  integer :: a 
  
  a = Z"AB1C"
  write(*,*) a
  ! Ausgabe: 43804
 
  a = O"7134"
  write(*,*) a
  ! Ausgabe: 3676
 
  a = B'101110110001'
  write(*,*) a
  ! Ausgabe: 2993
end program bsp

Logischer Datentyp

Datentyp	Kommentar	Mögliche Werte
logical	Logischer Datentyp (wahr oder falsch)	.TRUE., .FALSE.

Zeichenketten

Datentyp	Kommentar	Beispiel (Konstante)
character(n)	Zeichenkette (String) mit einer Länge von n Zeichen	'Hallo, Welt!', "Hallo, Welt!"
character(len=n)	-"-
character*n	-"- (FORTRAN 77-Stil, sollte nicht mehr verwendet werden)
character	Zeichenkette (String) mit einer Länge von einem Zeichen	'H', "h"

Beachte: Zeichenketten können in Fortran 95 in Apostrophe oder Anführungszeichen eingeschlossen werden.

Beispiel:

"Wie geht's?"

'Er sagte: "Hallo"'

Variablen

Eine Variable ist charakterisiert durch einen

symbolischen Namen
Datentyp
Wert
Speicherplatz

Beim Programmstart hat eine Variable keinen definierten Wert. Eine Variable kann ihren Datentyp auf zwei Arten erhalten, durch implizite oder explizite Typanweisung.

Implizite Typanweisung

Bei der impliziten Typanweisung bestimmt der Anfangsbuchstabe des Variablenbezeichners den Datentyp.

Datentyp	Anfangsbuchstabe der Variablen
integer	Buchstaben I bis N (oder i bis n)
real	restliche Buchstaben

Beispiel:

Fortran 90/95-Code (free source form)

program bsp
  b1 = 8.9
  c1 = 3.
  i1 = B1/C1
 
  write (*,*) i1
  ! Das Ergebnis ist 2, da i1 implizit als integer definiert ist
end program bsp

Die Standardzuordnung der Anfangsbuchstaben kann durch das Schlüsselwort implicit auch geändert werden. Infolge der durch implizite Typanweisung entstehenden Fehlermöglichkeiten ist es sinnvoll, die implizite Typanweisung komplett auszuschalten. Dies wird durch die Anweisung

implicit none

gleich nach der program-Anweisung erreicht. Dann muss der Datentyp jeder Variablen explizit festgelegt werden.

Explizite Typanweisung

Beispiel:

Fortran 90/95-Code (free source form)

program bsp
  implicit none
 
  real :: b
  real :: c
  real :: i
  ! alternativ auch als real :: b, c, i
 
  b = 8.9
  c = 3.
  i = b/c
 
  write (*,*) i
  ! Das Ergebnis ist 2.966666
end program bsp

Benannte Konstanten

Benannte Konstanten werden in Fortran 95 folgendermaßen festgelegt:

datentyp, parameter :: symname = wert

Beispiele:

real, parameter:: PI = 3.1415, PIFAC = PI/2.0

character(5), parameter :: str = 'Hallo'

Der zugewiesene Wert kann eine Konstante (Literal) oder eine schon definierte benannte Konstante sein.

Für die Zeichenkettenlänge ist bei benannten Konstanten auch eine *-Schreibweise möglich. Dies erspart die explizite Angabe der Stringlänge.

Beispiel:

Fortran 90/95-Code (free source form)

program bsp
  implicit none
 
  character(*), parameter :: a = 'Jetzt wird auch die Stringlaenge festgelegt'
 
  write(*,*) a
  ! Ausgabe: Jetzt wird auch die Stringlaenge festgelegt
end program bsp

Wertzuweisung

Wertzuweisungen haben wir schon kennengelernt:

variable = ausdruck

Beispiel:

k = 1
k = k + 2

Die Wertzuweisung an eine Variable ist, wie am vorigen und auch am nächsten Beispiel zu ersehen, nicht zu verwechseln mit einer mathematischen Gleichung. Der Ausdruck

k + 2 = 5

wäre zwar mathematisch korrekt. Als Wertzuweisung in einem Fortran-Programm ist dies aber keine mögliche Formulierung. k+2 ist kein zulässiger Ausdruck auf der linken Seite des Zuweisungsoperators (L-Wert).

In Fortran ist auch keine Kette von Wertzuweisungen möglich. Der folgende Ausdruck ist nicht erlaubt und liefert eine Fehlermeldung.

i = j = k = 1.5
! Fehler

<<< zur Fortran-Startseite
<< Fortran 95	Fortran 2003 >>
< Programmaufbau	Felder >