PWCoreDecoder.cm
Copyright © 1985 by Xerox Corporation. All rights reversed.
Created by Bertrand Serlet, February 8, 1986 4:21:51 pm PST
Bertrand Serlet March 13, 1987 11:49:04 pm PST
Install PWCore
← CoreProperties.StoreProperties[$CMosBObject, CoreProperties.PutProp[CoreProperties.FetchProperties[$CMosBObject], CoreProperties.propPrint, NIL]]
← CoreProperties.StoreProperties[$CMosBPins, CoreProperties.PutProp[CoreProperties.FetchProperties[$CMosBPins], CoreProperties.propPrint, NIL]]
← CoreProperties.StoreProperties[$CMosBGeometry, CoreProperties.PutProp[CoreProperties.FetchProperties[$CMosBGeometry], CoreProperties.propPrint, NIL]]
← CoreProperties.StoreProperties[$CMosBTrans, CoreProperties.PutProp[CoreProperties.FetchProperties[$CMosBTrans], CoreProperties.propPrint, NIL]]
Run -a PWCoreDecoder
← &ct ← PWCoreDecoder.AlpsDecoderFullArray[3]
← &obj1 ← PWCore.Layout[&ct]
← &ct ← PWCoreDecoder.AlpsDecoderFullArrayQuick[3]
← &obj2 ← PWCore.Layout[&ct]
← &ct ← PWCoreDecoder.AlpsDecoderFullArrayRowTiling[3]
← &obj4 ← PWCore.Layout[&ct]
← &ct ← PWCoreDecoder.AlpsDecoderFullArrayTiling[3]
← &obj5 ← PWCore.Layout[&ct]
← PW.Draw[PW.AbutX[&obj1, &obj2, &obj4, &obj5]]
← &ct1 ← PWCore.FromLayoutWithoutPublic[PW.Get[PWCoreDecoder.schDesign, "AlpsOne.mask"]]
← &ct2 ← PWCore.RotateCellType[&ct1, $FlipX]
← PW.Draw[PW.AbutX[PWCore.Layout[&ct1], PWCore.Layout[&ct2]]]
← &ct ← PWCoreDecoder.AlpsDecoderFullArrayQuick[2]
← PWCore.Store[&ct]
← &obj ← PWCore.Layout[&ct]
← &ct ← PWCoreDecoder.AlpsDecoderFullArrayQuick[2]
← &ct.properties!
← &obj ← PWCore.Layout[&ct]
← &ct.properties!
← PWCore.Store[&ct, TRUE]
← &ct ← PWCore.Retrieve["AlpsDecoderFullArrayQuick"]
← &ct.properties!
← &obj ← PWCore.Layout[&ct]
← PW.Draw[&obj]