d_multi.mod 126 B

1234567
  1. MODULE DMulti;
  2. IMPORT ALib;
  3. FROM BLib IMPORT GetB;
  4. VAR ExitCode : INTEGER;
  5. BEGIN
  6. ExitCode := GetB() + ALib.aval
  7. END DMulti.