Jak převést kód z Fortranu do Visual Basic

Fortran byl první procedurální programovací jazyk a značně usnadnil převod matematických konceptů do strojového kódu. Od svého uvedení v roce 1957 však byl postupně nahrazen modernějšími jazyky a dnes se používá jen v omezených oblastech. Visual Basic je jazyk rozšířený na platformě Microsoft a jeho integrace je často jednodušší než u Fortranu. Převod starých Fortran programů do Visual Basic tak může výrazně usnadnit jejich údržbu.

Krok 1

Otevřete Microsoft Visual Basic .NET a vytvořte nový projekt typu "Command Line". V editoru by se měla zobrazit podprocedura Main, která bude výchozím bodem programu.

Krok 2

Otevřete zdrojový kód ve Fortranu a začněte převádět subrutiny. Fortranová subrutina má tvar:

SUBROUTINE mySubroutine(a, b, c)
  REAL :: a, b, c
END SUBROUTINE

V jazyce Visual Basic ekvivalent vypadá takto:

Sub mySubroutine(a As Double, b As Double, c As Double)
End Sub

Rozdíl je v tom, že typ REAL se v VB nahrazuje typem Double a typ se uvádí u každého argumentu zvlášť.

Krok 3

Převádějte také funkce. Fortranová funkce může vypadat takto:

INTEGER FUNCTION plus(a, b)
  INTEGER :: a, b
  plus = a + b
END FUNCTION plus

V VB.NET se zapíše následovně:

Function plus(a As Integer, b As Integer) As Integer
    Return a + b
End Function

V Fortranu se typ funkce uvádí před klíčovým slovem FUNCTION, v VB se typ specifikuje za názvem funkce. Navíc návratová hodnota se v VB získává pomocí příkazu Return místo přiřazení k názvu funkce.

Krok 4

Přepište všechny knihovní funkce použitých ve Fortranovém kódu na jejich ekvivalenty ve Visual Basic. Dokumentaci k VB najdete na Microsoft Developer Network (MSDN). Pokud neexistuje přímý ekvivalent, vytvořte vlastní funkci v VB a ověřte její chování oproti původní funkci ve Fortranu. Pro podrobnosti o Fortranových knihovnách můžete použít dokumentaci Intel (Intel Fortran).

Po dokončení převodu důkladně otestujte nový program proti originálu. Spusťte oba programy se stejnými vstupy a porovnejte výstupy. Ideální je provést testy s co největším počtem různých vstupů, aby bylo jisté, že převod zachoval původní funkčnost.

Upozornění

• Převod kódu z jednoho jazyka do druhého je časově náročný a náchylný k chybám. Uchovejte si originální Fortranový zdroj až do úplného otestování nového kódu, abyste mohli v případě nesrovnalostí snadno odhalit a opravit chyby.

Co budete potřebovat

• Microsoft Visual Basic .NET
• Originální Fortranový zdrojový kód