%externalroutine long %alias %c
        "S#aquite extraordinarily long s hast type of external reference"
%end
%externalroutine errors
%EXTERNALINTEGER FRED
%EXTERNALINTEGERSPEC JIM
%EXTRINSICINTEGERNAME BLOGGS
%EXTERNALINTEGERARRAYFORMATSPEC WRONG(1:10)
%EXTERNALINTEGERARRAYSPEC RIGHT(1:10)
%CONSTINTEGERSPEC RUBBISH=21
%EXTERNALINTEGERNAME KNOT
%END
%endoffile