Subroutine

      subroutine name(arg1,...,argN)
      ...
      end  Ein Formalparameter kann ein Variablenname, ein Feldname oder der Name eines anderen Unterprogramms sein.
Benutzung durch Aufruf:

      ...
      external par3
      ...
      call name(par1,...,parN)

par...  sind die aktuellen Parameter
external ... ist notwendig, wenn der Parameter ein Unterprogrammname ist.

Function

      real function y(x1,x2,...)
      ...
      y = ...
      ...
      end
Benutzung wie in C.