Fortran: FORTRAN 77: Stringoperationen

<<< zur Fortran-Startseite
<< FORTRAN 77	Fortran 90/95 >>
< Vergleichsausdrücke	Verzweigungen und Schleifen >

FORTRAN 77 bietet vergleichsweise komfortable Operatoren zur Behandlung von Zeichenketten.

Verknüpfungsoperator[Bearbeiten]

Operator	Kommentar
A `//` B	Operator zum Verknüpfen von Zeichenketten

Beispiel:

0   . |  1    .    2    .    3    .    4    .    5    .    6    .    7 |  .    8  
12345678901234567890123456789012345678901234567890123456789012345678901234567890

      PROGRAM BSP                                
      
      CHARACTER*4 A, B*10
        
      A='How '
      B='do you do.'
      
      WRITE (*,*) A // B
C  Ausgabe: How do you do.
 
      END

12345678901234567890123456789012345678901234567890123456789012345678901234567890
0   . |  1    .    2    .    3    .    4    .    5    .    6    .    7 |  .    8

Teilketten[Bearbeiten]

Ein String ist ein CHARACTER-Feld. Auch Teilketten einer solchen Zeichenkette können adressiert werden.

Prinzip	Beschreibung
stringname (anfang:ende)	von anfang bis ende
stringname (:ende)	vom ersten Zeichen bis ende
stringname (anfang:)	von anfang bis zum letzten Zeichen
stringname (index:index)	genau ein Zeichen an der Position index

Dabei muss anfang stets größer oder gleich Eins sein. ende darf nicht größer als die Länge der Zeichenkette sein. index muss sich stets zwischen Eins und der Länge der Zeichenkette befinden.

Beispiel:

0   . |  1    .    2    .    3    .    4    .    5    .    6    .    7 |  .    8  
12345678901234567890123456789012345678901234567890123456789012345678901234567890

      PROGRAM BSP                                
      
      CHARACTER*10 A
        
      A='Hallo Welt'
         
      WRITE (*,*) A(2:4)
C  Ausgabe: all
 
      WRITE (*,*) A(5:)
C  Ausgabe: o Welt
 
      WRITE (*,*) A(:3)
C  Ausgabe: Hal
 
      END

12345678901234567890123456789012345678901234567890123456789012345678901234567890
0   . |  1    .    2    .    3    .    4    .    5    .    6    .    7 |  .    8

Beispiel:

0   . |  1    .    2    .    3    .    4    .    5    .    6    .    7 |  .    8  
12345678901234567890123456789012345678901234567890123456789012345678901234567890

      PROGRAM BSP                                
      
      CHARACTER*10 A
        
      A='Hallo Welt'
      A(7:) = 'XYZ'
 	      
      WRITE (*,*) A
C  Ausgabe: Hallo XYZ
 
      END

12345678901234567890123456789012345678901234567890123456789012345678901234567890
0   . |  1    .    2    .    3    .    4    .    5    .    6    .    7 |  .    8

Neben diesen Möglichkeiten sind in FORTRAN 77 auch einige Standardfunktionen für das Hantieren mit Zeichenketten vorgesehen. Diese sind im Kapitel Standardfunktionen beschrieben.

<<< zur Fortran-Startseite
<< FORTRAN 77	Fortran 90/95 >>
< Vergleichsausdrücke	Verzweigungen und Schleifen >