Frank Bowers March 25, 1986 9:12:21 am PST

Bryan Preas September 8, 1986 5:27:28 pm PDT

CD, CDIO, CDOps, Core, Rope, SC, RTTestUtil;

IMPORTS CDIO, CDOps, SC, RTTestUtil

SHARES SC =

BEGIN

result: SC.Result;

libName: Rope.ROPE ←"PLTCELLTest.dale";

hMaterial: Rope.ROPE ← "metal";

vMaterial: Rope.ROPE ← "metal2";

libDesign: CD.Design ← CDIO.ReadDesign[libName, NIL, CDIO.GetWorkingDirectory[]];

cellType: Core.CellType ← RTTestUtil.CreateCore[libName];

cdDesign: CD.Design ← CDOps.CreateDesign[libDesign.technology];

rules: SC.DesignRules ← SC.CreateDesignRules[libDesign.technology.key, hMaterial, vMaterial, horizontal];

handle: SC.Handle ← SC.CreateHandle[cellType, NIL, libName, rules, "SCTestECC"];

SC.InitialPlace[handle, 0];

SC.SAPlaceImprove[handle: handle, saParms: SC.SAGetParms[handle, SC.SAInitialPlace[handle], cellType]];

SC.GlobalRoute[handle];

SC.PosImprove[handle, 1];

SC.OrientImprove[handle, 1];

result ← SC.DetailRoute[handle];

RTTestUtil.WriteLayout[result.object, handle.name, cdDesign];

END.