BondingPads.mesa
Copyright Ó 1988 by Xerox Corporation. All rights reserved.
Don Curry May 12, 1988 7:59:53 pm PDT
DIRECTORY CD, Core, CoreGeometry;
BondingPads: CEDAR DEFINITIONS = BEGIN
EnsureBondingPads: PROC[cell: Core.CellType];
MarkBondingPads: PROC[cell: Core.CellType];
GetSize:     PROC[cell: Core.CellType] RETURNS[size: CD.Position];
GetPads:     PROC[cell: Core.CellType] RETURNS[padArray: PadArray];
PadArray: TYPE = ARRAY CoreGeometry.Side OF SidePads;
SidePads:  TYPE = RECORD[offSets: LIST OF INT ←NIL, pads: Pads ←NIL];
Pads:   TYPE = LIST OF Pad;
Pad:   TYPE = RECORD[wire: Core.Wire, pos: CD.Position];
END.