SCTestAndCompare.cm
Copyright Ó 1987 by Xerox Corporation. All rights reserved.
Preas September 25, 1987 4:21:47 pm PDT
Install SCDAUser PWCoreLichen
TWVelantia.cm
-- From Logic
-- get a cellType to layout through Logic
← &ct ← Sinix.CreateIcon[Logic.CounterUp[10]]
-- layout the cellType
← CoreProperties.PutCellTypeProp[&ct, $Layout, $SCRemoteX]
← &obj ← PWCore.Layout[&ct]
← PW.Draw[&obj]
-- compare layout to the cellType
← PWCoreLichen.SetAutomorphismHack[TRUE];
← PWCoreLichen.Compare[&ct]
-- The DBus Controller
-- get a cellType to layout through a design
← &de ← PW.OpenDesign["ModifiedDBus.dale"]
← &cx ← Sisyph.Create[&de]
← &ct ← Sisyph.ExtractSchematicByName["DBusInterface.sch", &cx]
-- layout the cellType
← CoreProperties.PutCellTypeProp[&ct, $Layout, $SCRemoteX]
← &obj ← PWCore.Layout[&ct]
← PW.Draw[&obj]
-- compare layout to the cellType
← PWCoreLichen.SetAutomorphismHack[TRUE];
← PWCoreLichen.Compare[&ct]
-- The BIC from [Indigo]<Dragon7.0>Top>BIC.df
-- get a cellType to layout through a design
← &de ← PW.OpenDesign["BIC.dale"]
← &cx ← Sisyph.Create[&de]
← &ct ← Sisyph.ExtractSchematicByName["inner.sch", &cx]
-- layout the cellType
← CoreProperties.PutCellTypeProp[&ct, $Layout, $SCRemoteX]
← &obj ← PWCore.Layout[&ct]
← PW.Draw[&obj]
-- compare layout to the cellType
← PWCoreLichen.SetAutomorphismHack[TRUE];
← PWCoreLichen.Compare[&ct]
-- The Arbiter from [Indigo]<Dragon7.0>Top>Arbiter25.df
-- get a cellType to layout through a design
← &de ← PW.OpenDesign["Arbiter25.dale"]
← &cx ← Sisyph.Create[&de]
← &ct ← Sisyph.ExtractSchematicByName["ArbInFrame.sch", &cx]
-- layout the cellType
← CoreProperties.PutCellTypeProp[&ct, $Layout, $SCRemoteX]
← &obj ← PWCore.Layout[&ct]
← PW.Draw[&obj]
-- compare layout to the cellType
← PWCoreLichen.SetAutomorphismHack[TRUE];
← PWCoreLichen.Compare[&ct]