MODULE DFunc; FROM DLib IMPORT Get, Add; VAR ExitCode : INTEGER; BEGIN Add(10); Add(Get()); ExitCode := Get() END DFunc.