DIRECTORYDABasics, Cabbage, CD, Connections, Core, Rope, Route, RTBasic;CabbagePrivate: CEDAR DEFINITIONS = BEGINHandle: TYPE = REF HandleRec;HandleRec: TYPE = RECORD [name: Rope.ROPE _ NIL,routeType: RouteType _ normal,size: DABasics.Position _ [0, 0],vddNet, gndNet: Connections.Net _ NIL,connections: Connections.Table _ NIL,parms: Cabbage.PadRingParams _ NIL,rules: DesignRules _ NIL,powerDistribution: PowerDistribution _ NIL,globalRouting: GlobalRouting _ NIL,detailedRouting: DetailedRouting _ NIL,detailedRoutingPL: DetailedRoutingPL _ NIL,widthTable: Connections.Table _ NIL,inner, bottomLeft, bottom, bottomRight, right, topRight, top, topLeft, left: ObjectDescription];RouteType: TYPE ~ {normal, padLimited};ObjectDescription: TYPE ~ RECORD[origin, size: DABasics.Position _ [0, 0],object: CD.Object _ NIL];DesignRules: TYPE = REF DesignRulesRec;DesignRulesRec: TYPE = RECORD[horizInsideParms, horizOutsideParms, vertInsideParms, vertOutsideParms: ParmSet];ParmSet: TYPE = RECORD[parms: Route.DesignRulesParameters,rules: Route.DesignRules];GlobalRouting: TYPE = REF GlobalRoutingRec;GlobalRoutingRec: TYPE = RECORD[exitLists: ARRAY Division OF ExitList _ ALL[NIL]];ExitList: TYPE = LIST OF Connections.Net;Division: TYPE = {bottomLeft, bottomRight, rightBottom, rightTop, topRight, topLeft, leftTop, leftBottom};DetailedRouting: TYPE = REF DetailedRoutingRec;DetailedRoutingRec: TYPE = RECORD[channels: ARRAY DABasics.Side OF Channel,switchBoxes: ARRAY Corners OF Channel];DetailedRoutingPL: TYPE = REF DetailedRoutingPLRec;DetailedRoutingPLRec: TYPE = RECORD[channels: ARRAY RTBasic.LRSide OF Channel,switchBoxes: ARRAY RTBasic.TBSide OF Channel];Channel: TYPE = RECORD[size, origin: DABasics.Position _ [0, 0],object: CD.Object _ NIL,cellType: Core.CellType _ NIL];Corners: TYPE = {bottomLeft, bottomRight, topRight, topLeft};PowerDistribution: TYPE = REF PowerDistributionRec;PowerDistributionRec: TYPE = RECORD[channels: ARRAY DABasics.Side OF Channel,power: ARRAY DABasics.Side OF Channel,switchBoxes: ARRAY Corners OF Channel];SegmentSeq: TYPE = REF SegmentSeqRec;SegmentSeqRec: TYPE = RECORD[seq: SEQUENCE numSegments: NAT OF Connections.Segment];SegmentPair: TYPE = RECORD[seg1, seg2: Connections.Segment];CreateHandle: PROC [inner, bottomLeft, bottom, bottomRight, right, topRight, top, topLeft, left: CD.Object, connections: Connections.Table, parms: Cabbage.PadRingParams, name: Rope.ROPE, routeType: CabbagePrivate.RouteType] RETURNS [handle: CabbagePrivate.Handle];CheckInnerPos: PROC [handle: CabbagePrivate.Handle, innerPos: DABasics.Position];DistributePower: PROC [handle: CabbagePrivate.Handle];GlobalRoute: PROC [handle: CabbagePrivate.Handle];DetailedRoute: PROC [handle: CabbagePrivate.Handle];MakeChip: PROC [handle: CabbagePrivate.Handle] RETURNS [chip: CD.Object];END.    ║  CabbagePrivate.mesaCopyright ╙ 1986, 1987 by Xerox Corporation.  All rights reserved.by Bryan Preas, April 2, 1987 11:09:58 am PSTBertrand Serlet April 27, 1987 0:19:44 am PDTЭ╩№  Ш ЪЬЩJЪЬBЩBJЪЬ*╧kЩ-IcodeЪЬ-Щ-ЧJЩ ЪЭ	Ш	JЪЬЭЬ*Ш?JШ ЧЪ╧nЬЭЬЭЬЭШ)JШ JЪЬЭЬЭЬШЪЬЭЬЭЬШJЪЬЭЬЭЬШJШJЪЬ!Ш!JЪЬ"ЭЬШ&JЪЬ!ЭЬШ%JЪЬЭЬШ#JЪЬЭЬШJЪЬ'ЭЬШ+JЪЬЭЬШ#JЪЬ#ЭЬШ'JЪЬ'ЭЬШ+JЪЬ ЭЬШ$JЪЬ^Ш^JЪЬШЧKШ KЪЬЭЬШ'KШ ЪЬЭЬЭЬШ!KЪЬ)Ш)KЪЬЭЬ
ЭШKЪЬШЧJШ JЪЬЭЬЭЬШ'ЪЬЭЬЭЬШJЪЬOШOJЪЬШЧЪЬ	ЭЬЭЬШJЪЬ#Ш#JЪЬШJЪЬШJШ ЧJЪЬЭЬЭЬШ+ЪЬЭЬЭЬШ JЪ	ЬЭЬ
ЭЬЭЬЭЬШ0JЪЬШЧJЪЬ
ЭЬЭЬЭЬШ)JЪЬ
ЭЬ\ШjJШ JЪЬЭЬЭЬШ/ЪЬЭЬЭЬШ"JЪЬ
ЭЬЭЬ	Ш)JЪЬЭЬ	ЭЬШ%JЪЬШЧJЪЬЭЬЭЬШ3ЪЬЭЬЭЬШ$JЪЬ
ЭЬЭЬ	Ш*JЪЬЭЬЭЬШ,JЪЬШЧЪЬ	ЭЬЭЬШJЪЬ)Ш)JЪЬЭЬ
ЭЬШJЪЬЭЬШЧЪЬ	ЭЬ0Ш=JШ ЧJЪЬЭЬЭЬШ3ЪЬЭЬЭЬШ$JЪЬ
ЭЬЭЬ	Ш)JЪЬЭЬЭЬ	Ш&JЪЬЭЬ	ЭЬШ%JЪЬШJШ ЧKЪЬЭЬЭЬШ%ЪЬЭЬЭЬЭЬЭЬЭЬШTKШ ЧЪЬЭЬЭЬШKЪЬ!Ш!KШ ЧЪ
ЮЬЭЬOЭЬRЭЬ'ЭЬ!ШИKШ ЧЪЮЬЭЬ>ШQKШ ЧЪЮЬЭЬ!Ш6KШ ЧЪЮЬЭЬ!Ш2KШ ЧЪЮЬЭЬ!Ш4KШ ЧKЪЮЬЭЬ!ЭЬЭЬ	ШIJШ JЪЭЬШЧJШ JШ JШ Ч ЕЧ    P    