Zum Inhalt springen

Fortran: FORTRAN 77: Stringoperationen

Aus Wikibooks
<<< 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 >