definitions pascal�sic; external;

definitions pascal←wizard𡤏iles; external;

program pascal�sic←impl; external;

program pascal←wizard𡤏iles←impl; external;

definitions g𡤏←type←private(pascal�sic*, pascal←wizard𡤏iles*); forward;

program g𡤏←type𡤎xternals←impl.hint$(pascal←wizard𡤏iles); forward;

program g𡤏←type←impl1(pascal�sic, pascal←wizard𡤏iles, g𡤏←type←private); forward;

program g𡤏←type←impl2(pascal�sic, pascal←wizard𡤏iles, g𡤏←type←private); forward;

begin

g𡤏←type←private, g𡤏←type𡤎xternals←impl := tty←reset, tty←rewrite, byte𡤏ile←reset, file←rewrite, file𡤌lose, byte𡤏ile𡤌lose;

g𡤏←type←private, g𡤏←type←impl1 := initialize, input←ln, get←integer, lower�sify, flush←text, out←text, print←scaled, first←par, dialog, $rest$;

g𡤏←type←private, g𡤏←type←impl2 := open←gf𡤏ile, get𡤋yte, signed𡤋yte, get←two𡤋ytes, signed←pair, get←three𡤋ytes, signed←trio, signed←quad, do𡤌har, read←postamble;

end) := g𡤏←type.pas;