LichenFromCore:
CEDAR
DEFINITIONS = {
OPEN L: LichenDataStructure;
CircuitElement: TYPE = REF ANY --actually UNION [Core.Wire, Core.CellInstance]--;
GetLCT: PROC [cct: Core.CellType] RETURNS [lct: L.CellType];
GetCCT:
PROC [lct: L.CellType]
RETURNS [cct: Core.CellType];
Returns the least familiar.
GetLElt: PROC [ce: CircuitElement] RETURNS [v: L.Vertex];
GetCElt: PROC [v: L.Vertex] RETURNS [ce: CircuitElement];
GetPort: PROC [pw: Core.Wire] RETURNS [port: L.Port];
GetPW: PROC [port: L.Port] RETURNS [pw: Core.Wire--of which recast of the CellType?--];
}.