InverterTest.cm
Copyright © 1985 by Xerox Corporation. All rights reserved.
Barth, September 16, 1985 4:26:21 pm PDT
Core
← &design ← CoreOps.CreateDesign["Design"]
← &inverter ← CoreCreate.CreateRecordCell[design: &design, name: "Inverter"]
← CoreCreate.CreatePublicWire[design: &design, on: &inverter, names: LIST["Vdd", "Gnd", "In", "Out"]]
← CoreCreate.CreateCellInstance[design: &design, in: &inverter, type: CoreTransistor.Create[args: NEW[CoreTransistor.TransistorRec ← [type: pE]]], bind: "gate: In, ch1: Vdd, ch2: Out"]
← CoreCreate.CreateCellInstance[design: &design, in: &inverter, type: CoreTransistor.Create[args: NEW[CoreTransistor.TransistorRec ← [type: nE]]], bind: "gate: In, ch1: Out, ch2: Gnd"]
← CoreOps.PrintDesign[&design, ProcessProps.GetProp[$CommanderHandle].out]
Rosemary
Run RoseConvertImpl
← RoseConvert.InstantiateCellType ← &inverter
Inverter.roseLoad
← &sim ← RoseCreate.CreateSim[TRUE]
← &test ← RoseCreate.CreateTest[rootName: "InverterTest", typeName: "Inverter", testName: "InverterTest", decider: NIL, sim: &sim]
← &disp ← RoseDisplayOps.NewDisplay[sim:&sim, info: [iconic: FALSE, name: "Inverter.Display"]]
← &bv ← RoseDisplayBrowsing.BrowseDisplay[display:&disp, info: [iconic: FALSE, name: "Inverter.browser"]]
Run InverterTest