Listing:

    1  IMPLEMENTATION MODULE ALib;
    2  BEGIN
    3    aval := 40
    4  END ALib.

    0 errors