Bryan Preas December 18, 1986 3:08:35 pm PST

CD, CDCells, CDDirectory, CDIO, CDOps, Rope, Route, RouteUtil, TerminalIO;

IMPORTS CD, CDCells, CDDirectory, CDIO, CDOps, Rope, Route, RouteUtil, TerminalIO

SHARES Route =

BEGIN

c1, c2, c3, d1, d2, d3: Route.Pin;

c1cd, c2cd, c3cd, d1cd, d2cd, d3cd: CD.Instance;

result: Route.RoutingResult;

design: CD.Design;

object: CD.Object;

technology: CD.Technology ← CD.FetchTechnology[$cmos];

metal: Route.Layer ← CD.FetchLayer[technology, $met];

metal2: Route.Layer ← CD.FetchLayer[technology, $met2];

rules: Route.DesignRules ← Route.CreateDesignRules[$cmos, metal, metal2, horizontal];

routingArea: Route.RoutingArea ← Route.CreateRoutingArea["RouteTestA", rules];

Route.IncludeRoutingAreaSide[routingArea, bottom, [0, 0]];

Route.IncludeRoutingAreaSide[routingArea, top, [0, 0]];

c1cd ← RouteUtil.CreateCDPin["c1", [98, 0, 102, -4], metal2];

c1 ← Route.CreatePin[c1cd, bottom];

c2cd ← RouteUtil.CreateCDPin["c2", [134, 0, 138, 4], metal2];

c2 ← Route.CreatePin[c2cd, top];

c3cd ← RouteUtil.CreateCDPin["c3", [180, 0, 184, 4], metal2];

c3 ← Route.CreatePin[c3cd, bottom];

Route.IncludeNet[routingArea, "c", LIST[c1, c2, c3]];

d1cd ← RouteUtil.CreateCDPin["d1", [136, 0, 140, -4], metal2];

d1 ← Route.CreatePin[d1cd, bottom];

d2cd ← RouteUtil.CreateCDPin["d2", [100, 0, 104, 4], metal2];

d2 ← Route.CreatePin[d2cd, top];

d3cd ← RouteUtil.CreateCDPin["d3", [180, 0, 184, 4], metal2];

d3 ← Route.CreatePin[d3cd, top];

Route.IncludeNet[routingArea, "d", LIST[d1, d2, d3]];

result ← Route.ChannelRoute[routingArea, [[0, 0], [200, 0], [0, 30], [0,0]], [0, 0, 200, 30], full];

design ← CDOps.CreateDesign[technology];

object ← Route.RetrieveRouting[result, result.routingArea.name, NIL, NIL].object;

[ ] ← CDCells.IncludeOb[design: design, ob: object];

IF CDIO.WriteDesign[design, result.routingArea.name] THEN

ELSE

END.