Fortran
![]() |
Ten artykuł należy dopracować |
![]() Logo języka | |
Pojawienie się |
1957 |
---|---|
Paradygmat | |
Typowanie | |
Pochodne |
Fortran 2008 (ISO/IEC 1539-1:2010) (2010) |
Twórca |
John Backus(IBM) |
Platforma sprzętowa | |
Platforma systemowa |
Linux, UNIX, Windows |
Strona internetowa |
Fortran(od wersji 90 do aktualnej) a dawniejFORTRAN(do wersji 77 włącznie) (odang.formula translation) –język programowaniapierwotnie zaprojektowany do zapisu programów obliczeniowych, był niegdyśjęzykiem proceduralnym,obecnie jest nadal rozwijanym językiem ogólnego przeznaczenia. Umożliwia programowaniestrukturalne,obiektowe[1](Fortran 90/95),modularne[2]irównoległe(Fortran 2008). Jego zastosowaniami są, między innymi, obliczenia naukowo-inżynierskie,numeryczne,symulacja komputerowaitp. Początkowe wersje Fortranu miały mocno ograniczone możliwości, ale dzięki łatwości opanowania Fortran stał się najpopularniejszym językiem do obliczeń numerycznych.
Specyfika
[edytuj|edytuj kod]Z pierwszych wersji języka pochodzi zasada braku rozróżniania małych i wielkich liter wsłowach kluczowychjęzyka oraz używanych zmiennych, a także bogate zasady tworzenia formatów zapisywanych i drukowanych danych.
Fortran dysponuje wielką liczbąbibliotek,które pozwalają rozwiązać praktycznie każde zadanie numeryczne. Najważniejsze przyczyny, z powodu których Fortran jest wykorzystywany i rozwijany do dziś, to szybkość obliczeń oraz wysoka wydajność kodu generowanego przezkompilatoryFortranu, wynikająca m.in. z jego długiej obecności na rynku programistycznym, znakomita skalowalność iprzenośność oprogramowania(pomiędzy różnymiplatformami sprzętowymiisystemami operacyjnymi), a także dostępność bibliotek dla programowania wieloprocesorowego irównoległegooraz bibliotek graficznych. Obliczeniaaerodynamiczne,wytrzymałościoweicieplneobecnie często prowadzone są z użyciem tego języka.
Do niedawna te zalety były okupione brakiem dobrych metod wizualizacji czy niskopoziomowej komunikacji z systemem operacyjnym, gdyż te zagadnienia są pominięte w kolejnych standardach języka (aż do Fortranu 95 włącznie). Obecnie producenci kompilatorów (zwłaszcza niezależni), wzbogacają je o możliwość stosowania grafiki celem umożliwienia wizualizacji wyników obliczeń (wykresy, wizualizacja tablic wielowymiarowych) poprzez dostarczanie odpowiednich bibliotek.
![](https://upload.wikimedia.org/wikipedia/commons/thumb/8/84/Hollerith_card.jpg/400px-Hollerith_card.jpg)
Historia i standardy
[edytuj|edytuj kod]PierwszykompilatorFortranu stworzył zespółJohna Backusa,który w latach1954–1957pracował dlaIBM.Kompilator ten był pierwszym w historii kompilatoremjęzyka wysokiego poziomu.Został staranniezoptymalizowany,ponieważ autorzy obawiali się, że nikt nie będzie go używał, jeśli szybkość programów nie będzie porównywalna z szybkością programów napisanych wasemblerze.
Pierwsza standaryzacja nastąpiła w1960roku, kiedy opisano pierwszystandardjęzyka znany jakoFortran IV.Kolejnym standardem byłFortran 66.Standard ten był zbyt ubogi i implementacje musiały zawierać wiele rozszerzeń. W latach siedemdziesiątych American National Standard Institute (ANSI) opracowała kolejny standard nazwanyFortran 77,który w roku1980stał się standardem międzynarodowym. Jego struktura przystosowana jest do używanych wówczas powszechniekart perforowanych,ale zawierała elementyprogramowania strukturalnego.W Polsce bardzo popularna była odmiana Fortranu na maszynyICL/Odra(FORTRAN 1900;kompilatortaśmowy #XFAM oraz dyskowe #XFAT i #XFAE zkonsolidatorem#XPCK), a takżeWatfor 77,Lahey 77iMS FortrannaPCczy Fortran 80 dla 8-bitowychkomputerów z systememCP/M-80. W praktyce większość tych kompilatorów miała wiele rozszerzeń, które dopiero po latach weszły do kolejnego standardu (struktury rekordowe,alokowalnetablice,więcej instrukcji pozwalających na programowanie strukturalne itp.). Następcą Fortranu 77 stał sięFortran 90.Standard ma całkowicie zmienioną składnię dostosowaną do współczesnychjęzyków programowania,przykładowo Fortran 90 nie wymusza już na użytkowniku stosowaniaetykietiinstrukcji skoku.Kolejnym standardem jestFortran 95,zmiany w stosunku do poprzedniej wersji są niewielkie. Pomimo wprowadzenia nowych standardów, Fortran 77 jest nadal w użyciu (głównie przez starszych programistów przyzwyczajonych do tej wersji), co uwzględniają producenci praktycznie wszystkich kompilatorów – na przykład kompilator Compaq Visual Fortran (wcześniej Digital Visual Fortran) kompiluje programy napisane w standardach 66/77/90/95. Najnowszy standard języka nosi nazwę Fortran 2023 i został opublikowany w listopadzie 2023 roku[3] .
Podstawy
[edytuj|edytuj kod]Operatory logiczne
[edytuj|edytuj kod]operator logiczny | nazwa |
---|---|
.NOT.
|
negacja |
.AND.
|
koniunkcja |
.OR.
|
alternatywa |
.EQV.
|
równoważność |
.NEQV.
|
zaprzeczenie równoważności |
Operatory porównania
[edytuj|edytuj kod]operator relacji | opis |
---|---|
.LT.
|
ang.less than– inaczej<
|
.LE.
|
ang.less equal– inaczej<=
|
.GT.
|
ang.greater than– inaczej>
|
.GE.
|
ang.greater equal– inaczej>=
|
.EQ.
|
ang.equal– inaczej== (lub= w Pascalu)
|
.NE.
|
ang.not equal– inaczej!= (lub<> w Pascalu)
|
Operatory arytmetyczne
[edytuj|edytuj kod]operator arytmetyczny | działanie |
---|---|
+
|
dodawanie |
-
|
odejmowanie |
*
|
mnożenie |
/
|
dzielenie |
**
|
potęgowanie |
Przykłady
[edytuj|edytuj kod]Najkrótszy program:
END
Hello world,kod dla F77:
PROGRAMHELLO
WRITE(*,*)'hello, world'
END
- Deklaracje zmiennych i
Implicit none
Standardnie wymusza stosowaniadeklaracjizmiennych, wówczas niezadeklarowane zmienne onazwachrozpoczynających się od liter A-H i O-Z (nie są rozróżniane małe i dużelitery) majątypreal(rzeczywisty,zmiennoprzecinkowyo precyzji zależnej odimplementacjii opcji) azmiennerozpoczynające się od I-N są typuinteger(liczby całkowiteo zakresie zależnym od implementacji i opcji); jest to równoważne deklaracjom „implicit real (A-H,O-Z)” i „implicit integer (I-N)”.
Dyrektywa kompilatoraimplicit none
zastosowana na początku programu zapobiega wykorzystaniu niezadeklarowanych zmiennych. Przykładowy poprawny kod programu liczącego sumę dwóch liczb rzeczywistych (podwójnej precyzji –real(8)), w języku F95:
IMPLICIT NONE
REAL(8)::a,b
READ*,a,b
PRINT*,'wynik',a+b
END
w przypadku kodu:
IMPLICIT NONE
REAL(8)::a
READ*,a,b
PRINT*,'wynik',a+b
END
kompilator wyświetla błąd o niezadeklarowaniu zmiennej „b” wykorzystywanej w programie.
Fakt domyślnej deklaracji zmiennych niejednokrotnie powodował kłopoty programistów, nie mogących odnaleźć źródła nieoczekiwanych kaprysów pozornie poprawnych programów, np. nagłówek pętli wykonywanej 25 razy dla zmiennejI
:
DO100I=1,25
napisany z kropką zamiast przecinka:
DO100I=1.25
nie czyni tej instrukcji niepoprawną, ponieważ kompilator uzna ten zapis za domyślną deklarację zmiennejDO100I
typu rzeczywistego (nazwa zaczyna się od litery D) i przypisze jej wartość1.25
,co zmieni zamierzony przez programistę przepływ sterowania.
Kompilatory
[edytuj|edytuj kod]- Zobacz też:
Kompilatory języka Fortran 90/95
[edytuj|edytuj kod]- Edi (Windows) – polskie zintegrowane środowisko programistyczne dla Windows. Bezpłatne pod warunkiem zarejestrowania
- Intel Visual Fortran Compiler(Linux,Windows,OS X) – w wersji pod Linuksa bezpłatny dla niekomercyjnych zastosowań
- CUDA Fortran(Portland Group) (Linux,Windows,MAC OS X) – płatny
- Silverfrost FTN95(Windows) – bezpłatny
- GNU Fortran 95–wolny,jeden z podprojektówGCC
- G95 Project(Linux,Windows, OS X) – darmowy
- PGI Visual Fortran(Linux,Windows,OS X) – płatny, zintegrowany z MS Visual studio
- Compaq Visual Fortran (Windows, Linux/Unix/OpenVMSAlpha, OpenVMS VAX) – płatny, przejęty przez firmę Intel i dalej rozwijany jakoIntel Fortran Composer XE
- VAST/f90 (Linux) – darmowy kompilator dla użytkowników indywidualnych (a właściwie translator F77 do F90)
- Absoft Pro Fortran (Linux,Windows,Mac OS,PowerPC) – płatny
- Lahey/Fujitsu Fortran (Windows, Linux,SPARCSolaris) – komercyjny
- NAGWare f95 (Linux,Mac OS, SPARC Solaris,IRIX,SunOS,OSF/1,PA-RISC) – komercyjny
- NA Software FortranPlus (Linux,Windows) – płatny
- Salford FTN95 (Windows) – darmowy do zastosowań niekomercyjnych (od roku 2005)
- Open64[1]– darmowy
Kompilatory języka Fortran 77
[edytuj|edytuj kod]- Salford FTN77 (Windows) – darmowy
- Open Watcom.openwatcom.org. [zarchiwizowane ztego adresu(2018-04-07)].(Windows,OS/2) –open source
- g77 (GNUfortran 77) –wolny
Zobacz też
[edytuj|edytuj kod]- SAKO– „Polski Fortran”
Przypisy
[edytuj|edytuj kod]- ↑Charles D. Norton, Viktor K. Decyk, Boleslaw K. Szymanski:On Parallel Object Oriented Programming in Fortran 90.1997. [dostęp 2012-10-21].(ang.).
- ↑University of Liverpool:Modular Programming with Fortran 90.1997. [dostęp 2016-11-05].(ang.).
- ↑Fortran 2023.2023. [dostęp 2024-01-23].(ang.).
Linki zewnętrzne
[edytuj|edytuj kod]- Photran– środowisko programistyczne
- Komitet techniczny J3 standaryzujący Fortran
- Kurs języka FORTRAN.chem.univ.gda.pl. [zarchiwizowane ztego adresu(2013-09-03)].
Bibliografia
[edytuj|edytuj kod]- Wojciech Sobieski,GNU Fortran z elementami wizualizacji danych,Wydawnictwo Uniwersytetu Warmińsko-Mazurskiego w Olsztynie, Olsztyn 2008
- Janusz Piechna,Programowanie w języku Fortran 90 i 95,Wydawnictwa Politechniki Warszawskiej, Warszawa 2000
- Krzysztof Rościszewski, Romuald Witt,Nauka Fortranu 90/95,Wydawnictwo UJ, Kraków 2003
- Anna Trykozko,Ćwiczenia z języka Fortran,Wydawnictwo MIKOM, Warszawa 1999
- Ryszard K.Kott ,KrzysztofWalczak ,Programowanie w języku Fortran 77,Warszawa: Wydawnictwa Naukowo-Techniczne, 1991,ISBN83-204-1362-1,OCLC749999902.
- Joanna Jonkisz, Jan Makuch, Stanisław Starzak,Programowanie w językach Algol 60 i Fortran 1900,Wydawnictwo Politechniki Łódzkiej,Łódź1982,Skryptydlaszkół wyższych,Politechnika Łódzka,Ośrodek Elektronicznej Techniki Obliczeniowej (Fortran IV dla komputera Odra 1305)
- Dariusz Chrobak,Fortran Praktyka Programowania,Wydawnictwo MIKOM, Warszawa 2003