IMPLEMENTATION MODULE MODF; (* THIS MODULE IS COMPILED AND DECODED TO DETERMINE HOW TO ACCESS VARIABLES A, B, C AND D *) PROCEDURE MODF( A, B :REAL; VAR C, D:REAL); BEGIN C := A; D := B; END MODF; END MODF.