DIRECTORY CD, CDIO, Core, GC, IPMainViewer, PW, PWCore, Rope, RTCoreUtil, RTStructure, RTTestUtil;GCTestTiny: CEDAR PROGRAMIMPORTS GC, PW, PWCore, RTCoreUtil, RTTestUtilSHARES GC =BEGINlibName: Rope.ROPE _"SCLibCMOSB.dale";hMaterial: Rope.ROPE _ "metal";vMaterial: Rope.ROPE _ "metal2";cellType: Core.CellType _ RTTestUtil.CreateCore[libName];technologyKey: ATOM _ $cmosB;			-- $cmosA or $cmosBname: Rope.ROPE _ "GCTestTiny";result: GC.Result;context: GC.Context;rulesKey: ATOM _ $cmosB; rules: GC.DesignRules _ GC.CreateDesignRules[rulesKey, technologyKey, hMaterial, vMaterial];structure: RTStructure.Structure _ GC.CreateStructure[cellType, RTCoreUtil.defaultFlatten, PWCore.extractMode.decoration, NIL];GC.InitialPlace[structure];context _ GC.CreateContext[name, structure, rules];-- IPMainViewer.BuildViewer[name];-- IPMainViewer.SetTopTo[NARROW[context.topology], structure.name, FALSE];GC.DoInitialGlobalRoute[context, power, goodInternal];result _ GC.DoDetailRoute[context, generalCell];[] _ PW.Draw[result.object];END.    GCTestTiny.mesaCopyright c 1986 by Xerox Corporation.  All rights reserved.Last Edited by: Preas, September 8, 1986 12:39:08 pm PDTMassoud Pedram March 11, 1988 6:27:48 pm PSTTo run the general cell tiny test package: GCTestTiny.cmRTStructure.PrintStructure[structure]; Ê  ˜ Jšœ™Jšœ
Ïmœ1™<™8Icode™,K™ —K™8J™ šÏk	œ˜
Jšžœžœžœžœ4˜X—J˜ šÏn
œžœž˜J˜ Jšžœžœžœ ˜.Jšžœžœ˜—˜ šž˜K˜ —Jšœžœ˜&Jšœžœ˜Jšœžœ˜ Jšœ9˜9JšœžœÏc˜3Kšœžœ˜J˜ Jšœžœ˜Jšœ	žœ	˜Jšœ	žœ
˜JšœžœžœB˜\Jšœ#žœUžœ˜Kšžœ˜Jšœ
žœ'˜3Jšœ"˜"Jšœžœ$žœ˜JJšžœ4˜6Jšœ	žœ%˜0Jšœ&™&Jšœžœ˜Jšžœ˜—— …—    "  ¿  