DIRECTORY CD, Pipal, PipalInt; PipalCD: CEDAR DEFINITIONS = BEGIN CDToPProc: TYPE = PROC [cdobj: CD.Object] RETURNS [obj: Pipal.Object]; CDToPObject: CDToPProc; CDToPInstance: PROC [instance: CD.Instance] RETURNS [obj: Pipal.Object]; CDToPTrans: PUBLIC PROC [trans: CD.Transformation] RETURNS [PipalInt.Transformation]; PToCDProc: TYPE = PROC [obj: Pipal.Object] RETURNS [cdobj: CD.Object, cdprops: CD.PropList]; PToCDObject: PToCDProc; PToCDInstanceProc: TYPE = PROC [obj: Pipal.Object, transformation: PipalInt.Transformation] RETURNS [cdobj: CD.Object, cdprops: CD.PropList, cdtrans: CD.Transformation]; PToCDInstance: PToCDInstanceProc; PToCDTrans: PUBLIC PROC [trans: PipalInt.Transformation] RETURNS [CD.Transformation]; END. βPipalCD.mesa Copyright Σ 1988 by Xerox Corporation. All rights reserved. Created by Bertrand Serlet March 6, 1988 3:07:38 pm PST Bertrand Serlet May 7, 1988 5:54:41 pm PDT CD -> Pipal Conversion Pipal -> CD Conversion Κa˜code•Mark outsideHeaderšœ ™ Kšœ<™œ œœœ˜©šž œ˜!K˜—š ž œœœ"œœ˜UK˜——Kšœ˜—…—δ'