MODULE Main;

FROM Fib IMPORT Fib;
FROM Test IMPORT msgI, done;

VAR i: INTEGER;

BEGIN
  msgI (Fib (10));
  done ();
END Main.