d_lib2.LST 166 B

12345678910
  1. Listing:
  2. 1 DEFINITION MODULE DLib2;
  3. 2 TYPE Vec = ARRAY [1 .. 3] OF INTEGER;
  4. 3 PROCEDURE Sum(VAR x : Vec) : INTEGER;
  5. 4 END DLib2.
  6. 0 errors