DIRECTORY CD, CoreCreate, PW, PWCore, PWCoreRoute;PWCoreRouteTest: CEDAR PROGRAM				IMPORTS  CoreCreate, PW, PWCore =BEGIN OPEN PWCoreRoute;TestX: PROC RETURNS [channelCT: CellType] = {design: CD.Design _ PW.OpenDesign["PWCoreRouteTest"];left: CD.Object _ PW.Get[design, "left.mask"];right: CD.Object _ PW.Get[design, "right.mask"];leftCT: CellType _ PWCore.FromLayoutWithoutPublic[left];rightCT: CellType _ PWCore.FromLayoutWithoutPublic[right];public: Wire _ CoreCreate.Wires["middlea", "x", "y", "z", "bar", "left", "higha", "highb"];onlyInternal: Wire _ CoreCreate.Wires["middleb", "green", "red", "ring", "foo"];channelCT _ CoreCreate.Cell[public: public, onlyInternal: onlyInternal,instances: LIST [CoreCreate.Instance[leftCT, ["righta", "middlea"], ["rightb", "middleb"]],CoreCreate.Instance[rightCT, ["righta", "middlea"], ["rightb", "middleb"]]],name: "ChannelInX"];PWCore.SetLayout[channelCT, $Channel, $ChannelData, NEW [ChannelDataRec _ [inX: TRUE, extend: TRUE,bottomOrLeftWires: LIST [public[0], public[1], public[2], public[3]], topOrRightWires: LIST[public[0], public[1], public[2], public[3]],trunkLayer: "metal",branchLayer: "metal2"]]];};TestY: PROC RETURNS [channelCT: CellType] = {design: CD.Design _ PW.OpenDesign["PWCoreRouteTest"];left: CD.Object _ PW.Get[design, "rleft.mask"];right: CD.Object _ PW.Get[design, "rright.mask"];leftCT: CellType _ PWCore.FromLayoutWithoutPublic[left];rightCT: CellType _ PWCore.FromLayoutWithoutPublic[right];public: Wire _ CoreCreate.Wires["middlea", "x", "y", "z", "bar", "left", "higha", "highb"];onlyInternal: Wire _ CoreCreate.Wires["middleb", "green", "red", "ring", "foo"];channelCT _ CoreCreate.Cell[public: public, onlyInternal: onlyInternal,instances: LIST [CoreCreate.Instance[rightCT, ["righta", "middlea"], ["rightb", "middleb"]],CoreCreate.Instance[leftCT, ["righta", "middlea"], ["rightb", "middleb"]]],name: "ChannelInY"];PWCore.SetLayout[channelCT, $Channel, $ChannelData, NEW [ChannelDataRec _ [inX: FALSE, extend: TRUE,extendTopOrRight: FALSE,bottomOrLeftWires: LIST [public[0], public[1], public[2], public[3]], topOrRightWires: LIST[public[0], public[1], public[2], public[3]],trunkLayer: "metal",branchLayer: "metal2"]]];};END.    Ú  PWCoreRouteTest.mesaCopyright c 1985, 1986 by Xerox Corporation.  All rights reversed.Bertrand Serlet April 16, 1986 11:13:23 pm PSTmaxSizeY: INT _ MAX [CD.InterestSize[left].y, CD.InterestSize[right].y];extendedLeftCT: CellType _ CoreClasses.CreateIdentity[leftCT];extendedLeft: CD.Object;PWCore.SetLayout[extendedLeftCT, $Stretch, $StretchData, NEW [StretchDataRec _ [inX: FALSE, size: maxSizeY, layer: "met"]]];extendedLeft _ PWCore.Layout[extendedLeftCT];ÊÃ  ˜ –"Cedar" stylešœ™Jšœ
Ïmœ7™BIcode™.—J™ JšÏk	œžœ
žœ˜2J˜ šœžœžœ˜"Jšžœžœ
˜!Jšžœžœ˜˜ Jš	œ
žœžœžœžœ™HJšœ>™>Jšœžœ™Jšœ9žœžœ"™|Jšœ-™-J˜ šÏnœžœžœ˜-Jšœžœ
žœ˜5Jšœžœ
žœ˜.Jšœžœ
žœ˜0Jšœ8˜8Jšœ:˜:Jšœ[˜[JšœP˜Pšœ˜Jšœ˜Jšœ˜šœž˜JšœJ˜JJšœJ˜JJšœ˜J˜—Jšœ˜—šœ4žœ˜KJšœžœ˜Jšœžœ˜Jšœžœ/˜FJšœžœ-˜BJšœ˜Jšœ˜Jšœ˜—J˜—J˜ šŸœžœžœ˜-Jšœžœ
žœ˜5Jšœžœ
žœ˜/Jšœžœ
žœ˜1Jšœ8˜8Jšœ:˜:Jšœ[˜[JšœP˜Pšœ˜Jšœ˜Jšœ˜šœž˜JšœK˜KJšœI˜IJšœ˜J˜—Jšœ˜—šœ4žœ˜KJšœžœ˜Jšœžœ˜Jšœžœ˜Jšœžœ/˜FJšœžœ-˜BJšœ˜Jšœ˜Jšœ˜—J˜——J˜ Jšžœ˜Jšœ˜—— …—    à  }  