<> <> <> <> <> <> <> <> <<>> <> <<>> DIRECTORY CD, CDIO, CDOps, Core, Rope, RTCoreUtil, RTTestUtil, SC, SCExprGlobalRoute, SCNewWidth, SCPrivate, SCUtil; SCExprTestSmall: CEDAR PROGRAM IMPORTS CDIO, CDOps, -- RTCoreUtil, -- RTTestUtil, Rope, SC, SCExprGlobalRoute, SCNewWidth, SCUtil -- SCPrivate, -- SHARES SC = BEGIN result: SC.Result; libName: Rope.ROPE _"SCLibCMOSB.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: cellType, flattenCellType: NIL, libName: libName, designRules: rules, name: "SCExprTestSmall"]; SC.InitialPlace[handle, 5]; SCUtil.WriteTWFiles[handle]; IF SCUtil.TWIt[handle.name]#NIL THEN SC.Error[callingError, Rope.Cat["Problem on Unix Placement Server. Check file ", handle.name, ".out"]]; SCUtil.ReadTWPlace[handle: handle]; SC.InitialPlace[handle, 5]; SCExprGlobalRoute.GlobalRouteAllNets[handle]; <> SCNewWidth.ComputeAllChanDW[handle, areaFom]; result _ SCExprGlobalRoute.DetailRoute[handle]; RTTestUtil.WriteLayout[result.object, handle.name, cdDesign]; SC.Destroy[handle]; END.