Funkcje lokalne stanowią ostatni element części deklaracyjnej segmentu i funkcjonują jako obiekty lokalne w danym segmencie, które nie są widziane przez inne segmenty. Deklaracją jest instrukcja przypisania, w której po lewej stronie występuje nazwa funkcji z listą parametrów formalnych w nawiasach okrągłych a po prawej wyrażenie na wartość funkcji. Parametrami formalnymi nie mogą być wyłącznie zmienne proste, nie są dopuszczalne tablice lub ich elementy:
nazwa_funkcji(lista_parametrów_formalnych) = wyrażenie
gdzie wyrażenie jest zależne od parametrów formalnych. Przy wywołaniu funkcji parametry formalne są zastępowane parametrami aktualnymi. Typ funkcji musi być zgodny z typem wyrażenia.
Przykład:
program przyklad
c Deklarujemy funkcje lokalna, ktora okresla sume liczb naturalnych od 1 do n.
nsum(n)=n*(n+1)/2
c Tutaj nastepuje cialo programu
print *,"suma liczb od 1 do 10 wynosi",nsum(10)
print *,"suma liczb od 1 do 100 wynosi",nsum(100)
stop
end