Frank Bowers December 20, 1985 2:38:20 pm PST

Bryan Preas April 7, 1986 9:56:18 am PST

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[cdDesign.technology.key, hMaterial, vMaterial, horizontal];

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

SC.InitialPlace[handle, 0];

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

SC.GlobalRoute[handle];

SC.PosImprove[handle, 2];

SC.OrientImprove[handle, 2];

result ← SC.DetailRoute[handle];

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

SC.Destroy[handle];

END.