DIRECTORY Basics, CDSymbolicObjects, Core, CoreGeometry, CoreProperties, FS, RedBlackTree, Rope, RTBasic, SC, SCPrivate; SCUtil: CEDAR DEFINITIONS = BEGIN XYToPQ: PROC [handle: SC.Handle, pos: SC.Pos] RETURNS [pqPos: RTBasic.PQPos]; PQToXY: PROC [handle: SC.Handle, pqPos: RTBasic.PQPos] RETURNS [pos: SC.Pos]; FindPin: PROCEDURE [object: SCPrivate.Object, pinName: Rope.ROPE] RETURNS [pin: SCPrivate.ObjectPin _ NIL]; FindPinByWire: PROCEDURE [object: SCPrivate.Object, wire: Core.Wire] RETURNS [pin: SCPrivate.ObjectPin _ NIL]; FindNet: PROCEDURE [handle: SC.Handle, netName: Rope.ROPE] RETURNS [net: SCPrivate.Net _ NIL]; FindNetByWire: PROCEDURE [handle: SC.Handle, wire: Core.Wire] RETURNS [net: SCPrivate.Net _ NIL]; FindObject: PROCEDURE [handle: SC.Handle, objectName: Rope.ROPE] RETURNS [object: SCPrivate.Object _ NIL]; FindObjectByCell: PUBLIC PROCEDURE [handle: SC.Handle, cellType: Core.CellType] RETURNS [object: SCPrivate.Object _ NIL]; FindInstance: PROCEDURE [handle: SC.Handle, instanceName: Rope.ROPE] RETURNS [instance: SCPrivate.Instance _ NIL]; IsPowerName: PROCEDURE [handle: SC.Handle, name: Rope.ROPE] RETURNS [found: BOOLEAN _ FALSE]; IsPadType: PROCEDURE [object: SCPrivate.Object] RETURNS [isPad: BOOLEAN _ FALSE] = INLINE {RETURN[object.typeClass = io]}; translate: PUBLIC ARRAY SC.Side OF ARRAY SCPrivate.OrientationOrNone OF SC.Side; SideTranslate: PROCEDURE [side: SC.Side, orien: SCPrivate.OrientationOrNone] RETURNS [SC.Side] = INLINE {RETURN[translate[side][orien]]}; DirectionFromSide: PROC [side: CoreGeometry.Side] RETURNS [CDSymbolicObjects.Direction]; WriteResults: PROCEDURE [title: Rope.ROPE, handle: SC.Handle, startArea: SC.Number] RETURNS [area: SC.Number]; WriteStructure: PROCEDURE [handle: SC.Handle]; DestroyRules: PROC [handle: SC.Handle]; DestroyParms: PROC [handle: SC.Handle]; GetCoreInvestmentProp: PROC [cellType: Core.CellType, prop: ATOM] RETURNS [SC.HowLongToWork]; WriteTWFiles: PROC [handle: SC.Handle]; ReadTWPlace: PROC [handle: SC.Handle]; END. pSCUtil.mesa Copyright Σ 1985, 1987 by Xerox Corporation. All rights reserved. by Bryan Preas August 29, 1985 2:48:22 pm PDT last edited by Bryan Preas August 20, 1987 12:26:10 pm PDT convert a position from x-y to p-q space. convert a position from p-q to x-y space. get an investment property from a cell write timberWolf files write timberWolf files Κ ˜šœ ™ JšœB™BJ™Jšœ,Οkœ™0Jšœ<™<—J˜š ˜ Jšœ?œœ ˜nJ˜—šΟnœœ œ˜š˜J˜——š žœœ œœœ˜MJ™)J™—š žœœ œœœ˜MJ™)J™—codeš žœ œ*œœœ˜kK˜—šž œ œ-œœ˜nK˜—š žœ œ œœœœ˜^K˜—š ž œ œ œœœ˜aK˜—š ž œ œ œœœœ˜jK˜—š žœœ œ œ"œœ˜yK˜—š ž œ œ œœœ!œ˜rK˜—šž œ œ œœœ œœ˜]K˜—šž œ œœ œœœœ˜zK˜—šœ œœœœœœœ˜PJ˜—šž œ œœ+œœ œœ˜‰J˜—šžœœœ˜XK˜—šž œ œœ œœ œœ ˜nJ˜—šžœ œ œ ˜.J˜—šž œœ œ ˜'K˜—šž œœ œ ˜'K˜—š žœœ!œœœ˜]Kšœ&™&J˜—šž œœ œ ˜'Kšœ™K˜—šž œœ œ ˜&Kšœ™K˜—Kšœ˜—…—π j