Programmer 7500/MAX_PROGRAMMERS.iso/CLIPPER/MISC/ADA_TUTR.ZIP/FIB.DUM

Text File | 1992-09-04 | 144 b | 7 lines

-- Dummy solution to Outside Assignment 4
separate (FIBTEST)
function FIB(N : in POSITIVE) return POSITIVE is
begin
   return 4;
end FIB;