TestPipalSinix.cm

Install PipalExtract

Run -a PipalExtractPackage

Run -a TestPipalSinix

CDRead TestSinixB

← CoreProperties.StoreProperties[$LayoutObject, CoreProperties.PutProp[CoreProperties.FetchProperties[$LayoutObject], CoreProperties.propPrint, NIL]]

← CoreProperties.StoreProperties[$LayoutPort, CoreProperties.PutProp[CoreProperties.FetchProperties[$LayoutPort], CoreProperties.propPrint, NIL]]

← CoreProperties.StoreProperties[$LayoutGeometry, CoreProperties.PutProp[CoreProperties.FetchProperties[$LayoutGeometry], CoreProperties.propPrint, NIL]]

← CoreProperties.StoreProperties[$LayoutTrans, CoreProperties.PutProp[CoreProperties.FetchProperties[$LayoutTrans], CoreProperties.propPrint, NIL]]

← &box1 ← PipalMos.CreateBox[[20, 32], $Pol]

← PipalSinix.Extract[&box1, PipalSinix.layoutMode]

← &box2 ← PipalInt.TransformObject[[[40, 48]], PipalMos.CreateBox[[48, 20], $Met]]

← PipalSinix.Extract[&box2, PipalSinix.layoutMode]

← &ov ← Pipal.CreateOverlay[LIST[&box1, &box2]]

← PipalSinix.Extract[&ov, PipalSinix.layoutMode]

← &cdcontact ← CDSimpleRules.Contact[CMosB.cmosB, CMosB.pol, CMosB.met]

← &contact ← PipalCD.CDToPObject[&cdcontact]

← PipalSinix.Extract[&contact, PipalSinix.layoutMode]

← &cdtrans ← CMosBObjects.CreateTransistor[[56, 52], CMosB.ndif]

← &trans ← PipalCD.CDToPObject[&cdtrans]

← &ct ← PipalSinix.Extract[&trans, PipalSinix.layoutMode].result

← &cdtrans ← CMosBObjects.CreateAngleTransistor[[40, 32], CMosB.wpdif]

← &trans ← PipalCD.CDToPObject[&cdtrans]

← &ct ← PipalSinix.Extract[&trans, PipalSinix.layoutMode].result

← &font ← Imager.FindFontScaled["Xerox/XC1-2-2/Modern", 20.0]

← &star ← PipalMos.CreateStar[&contact, LIST [PipalMos.CreateText["Name", &font]]]

← PipalSinix.Extract[&star, PipalSinix.layoutMode]

← &overlay ← Pipal.CreateOverlay[LIST [&star]]

← &ct ← PipalSinix.Extract[&overlay, PipalSinix.layoutMode].result

← IF CoreOps.FindWire[&ct.public, "Name"]=NIL THEN ERROR ELSE NIL

← &marker ← PipalInt.TransformObject[[[40, 48]], PipalMos.CreateBox[[48, 20], $Met]]

← PipalSinix.Extract[&marker, PipalSinix.layoutMode]

← &design ← PW.OpenDesign["TestSinixB"]

← &cdobj ← PW.Get[&design, "Test"]

← &obj ← PipalCD.CDToPObject[&cdobj]

← &ct ← PipalSinix.Extract[&obj, PipalSinix.layoutMode].result

← &cdrot ← PW.CreateRotation[&cdobj, mirrorX]

← &rot ← PipalCD.CDToPObject[&cdrot]

← &ct ← PipalSinix.Extract[&rot, PipalSinix.layoutMode].result

We now check the extraction of abuts

← &cdabut ← PW.AbutX[&cdrot, &cdobj]

← &abut ← PipalCD.CDToPObject[&cdabut]

← &ct ← PipalSinix.Extract[&abut, PipalSinix.layoutMode].result

← CoreOps.Print[&ct]

← IF CoreOps.FindWire[&ct.public, "Gate"]=NIL THEN ERROR ELSE NIL

We check the routing class extraction

Run TestPW

← &design ← PW.OpenDesign["TestPW"]

← &cdrout ← TestPW.TestRoutingCellN[&design, NIL, NIL, NIL]

← &rout ← PipalCD.CDToPObject[&cdrout]

← &ct ← PipalSinix.Extract[&rout, PipalSinix.layoutMode].result

← IF &ct.public.size=2 THEN NIL ELSE ERROR

← &cdrout ← TestPW.TestRoutingCellP[&design, NIL, NIL, NIL]

← &rout ← PipalCD.CDToPObject[&cdrout]

← &ct ← PipalSinix.Extract[&rout, PipalSinix.layoutMode].result

← IF &ct.public.size=3 THEN NIL ELSE ERROR

A larger circuit

← &design ← PW.OpenDesign["DynabusPads"]

← &cdobj ← PW.Get[&design, "PadAll.mask"]

← PW.Draw[&cdobj]

← &obj ← PipalCD.CDToPObject[&cdobj]

date

← &ct ← PipalSinix.Extract[&obj, PipalSinix.layoutMode].result

date

← TestPipalSinix.DrawShell[&ct]

Paste buffer

← PipalConnectImpl.debugCache ← TRUE

← PipalSinixImpl.debugCache ← TRUE

← PipalConnectImpl.SetComposite[PipalInt.abutClass, PipalConnectImpl.EnumerationComposer]

← TestPipalSinix.Draw[&abut]

← TestPipalSinix.DrawShell[&ct]