Fortran 77 nach 90 Übersetzer
VAST/77to90 von Pacific-Sierra Research (PSR) ist ein Fortran 77 nach Fortran 90 Übersetzer, der es Ihnen erlaubt,
Ihre vorhandenen Fortran 77 Programme auf eine höhere Stufe zu verbessern. Ob Sie gerade lernen, Fortran 90 Programme zu schreiben oder schon ein Fortran 90 Experte sind, Sie werden erkennen, dass VAST/77to90 das richtige Hilfsprogramm ist, um Ihre Anwendungen zu verbessern.
Fortran 77 nach Fortran 90
Mit VAST/77to90 können Sie leicht alle Ihre vorhandene Fortran 77 in saubere und effiziente Fortran 90 Programme
umwandeln. Dies ist viel mehr als eine einfache Quelltextformatierung. Zum Beispiel liefert der hochentwickelte Fortran90-Generator von VAST/77to90s automatisch Multi-dimensionale Arraysyntax. Diese Fähigkeit wurde über viele Jahre in der VAST-2 Produktlinie von PSR entwickelt und 1985 zum erstenmal an Benutzer geliefert; sie ist mittlerweile von vielen Computerproduzenten verwendet worden. Einige der von VAST/77to90 ausgeführten Umwandlungen sind:
-
Erzeugung des neuen Quellcodeformats
- Entfernen veralteter Eigenschaften
- Entfernen oder Reduzieren von GOTO-Anweisungen und Labels
- Generierung von Arraysyntax statt Schleifen
- Erzeugung von MODULE aus COMMON
- Automatische Erzeugung von Schnittstellenblöcken
- Fortran "lint" Diagnose
Für eine unabhängige Beschreibung der ausgezeichneten Konvertierungsfähigkeiten von Fortran 77 zu Fortran 90 des VAST/77to90 lesen Sie bitte den Artikel Automatic Translation of Fortran 77 to Fortran 90 Using VAST-90, der im Juli/August 1993 Ausgabe des Fortran Journals veröffentlicht wurde.
Wie wird VAST/77to90 eingesetzt?
VAST/77to90 ist einfach zu verwenden. Geben Sie den Namen oder die Namensliste der Fortran 77 Programme, die Sie nach Fortran 90 konvertieren wollen, als Argument von VAST/77to90 an. VAST/77to90 verwendet einen Satz von Standardwerten für das Konverieren Ihres Codes. Die Optionen sind dokumentiert und können leicht geändert werden. Mit Ausgabeformatparameter können Sie das Ergebnis an Ihre Anforderungen anpassen.
VAST/77to90 Beispiel
F77 Eingabe:
subroutine demo(a,b,c,n)
dimension a(n), b(n), c(n)
common /ecom/scratch(10000)
do 100 i = 1, n
a(i) = b(i) + c(i)
if ( a(i).gt.100.0) then
a(i) = a(i) + scratch(i)
go to 100
endif
c(i) = a(i)*2
100 continue
end
Erzeugtes Fortran 90 Modul:
module Vecom
real, dimension(10000) :: scratch
end module Vecom
Erzeugter Fortran 90 Code:
subroutine demo(a, b, c, n)
!---------------------------
! Modules
!---------------------------
USE Vecom
implicit none
!---------------------------
! Dummy Arguments
!---------------------------
integer n
real, dimension(n) :: a, b,c
!---------------------------
! Local Variables
!---------------------------
integer :: i
!---------------------------
a = b + c
where (a > 100.0 )
a = a + scratch(:n)
elsewhere
c = a*2
end where
end subroutine demo
Eine Demoversion von VAST/77to90, die bis zu 250 Zeilen Code übersetzt, können Sie aus dem Internet herunterladen.
VAST ist eine registrierte Trademark der Pacific-Sierra Research Corporation.
Zurück zur h.o.-Computer Homepage.
