Styleguide: Difference between revisions
Jump to navigation
Jump to search
(Die Seite wurde neu angelegt: ==Allgemein== * Die Tab-Größe sollte auf 3 Leerzeichen gesetzt sein. * Schlüsselwörter (z.B. <code>IF</code>, <code>FUNCTION</code>, <code>INTEGER</code> etc.) soll...) |
m (→Allgemein) |
||
| Line 2: | Line 2: | ||
* Die Tab-Größe sollte auf 3 Leerzeichen gesetzt sein. | * Die Tab-Größe sollte auf 3 Leerzeichen gesetzt sein. | ||
* Schlüsselwörter (z.B. <code>IF</code>, <code>FUNCTION</code>, <code>INTEGER</code> etc.) sollten großgeschrieben werden. | * Schlüsselwörter (z.B. <code>IF</code>, <code>FUNCTION</code>, <code>INTEGER</code> etc.) sollten großgeschrieben werden. | ||
* Die Schlüsselwörter <code>END IF</code>, <code>END DO</code> etc. sollten wie hier angegeben mit einem Leerzeichen geschrieben werden. | |||
==Formatierung== | ==Formatierung== | ||
Revision as of 00:38, 13 September 2007
Allgemein
- Die Tab-Größe sollte auf 3 Leerzeichen gesetzt sein.
- Schlüsselwörter (z.B.
IF,FUNCTION,INTEGERetc.) sollten großgeschrieben werden. - Die Schlüsselwörter
END IF,END DOetc. sollten wie hier angegeben mit einem Leerzeichen geschrieben werden.
Formatierung
Funktionen sollten folgendermaßen formatiert werden: <fortran>
CXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX c Funktionsbeschreibung
FUNCTION FOO (BAR) RESULT (LOK)
c .................................................................
USE MODULE
INTEGER :: i
LOGICAL :: LOK
c .................................................................
LOK = .FALSE.
c Kommentar
DO i = 1, 10
CALL FOOBAR()
IF (.NOT. LOK) GOTO 9999
END DO
LOK = .TRUE.
GOTO 10000
c ................................................................. c Fehlerbehandlung 9999 IF (.NOT. LOK) ERROR = FEHLER(50, ' ', ' ', 0)
GOTO 10000
c ................................................................. 10000 RETURN
END FUNCTION FOO
cxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
</fortran>