PadFrameTest.mesa
Copyright © 1986 by Xerox Corporation. All rights reserved.
Louis Monier April 23, 1986 10:52:47 pm PST
DIRECTORY CD, CMosB, CoreCreate, PadFrame, PW, PWCore;
PadFrameTest: CEDAR PROGRAM
IMPORTS CMosB, CoreCreate, PadFrame, PW, PWCore =
BEGIN OPEN CoreCreate;
padDesign: CD.Design ← PW.OpenDesign["testpadframe"];
innerCt: CellType ← PWCore.FromLayoutWithoutPublic[PW.Get[padDesign, "inner"]];
CreateWholeChip: PROC RETURNS [cellType: CellType] = {
iL: CellInstances ← LIST [Instance[innerCt]];
iL ← PadFrame.AddPad[iL, "Top1", $In, 2, ["Chip", "top1"]];
iL ← PadFrame.AddPad[iL, "Top2", $In, 6, ["Chip", "top2"]];
iL ← PadFrame.AddPad[iL, "Top3", $In, 11, ["Chip", "top3"]];
iL ← PadFrame.AddPad[iL, "Seul", $In, 15, ["Chip", "seul"]];
cellType ← Cell[name: "WholeChip",
public: Wires["Top1", "Top2", "Top3", "Seul", "PadVdd", "PadGnd", "Vdd", "Gnd"],
onlyInternal: Wires["top1", "top2", "top3", "seul"],
instances: iL];
PWCore.SetLayout[cellType, $PadFrame, PadFrame.padFrameParamsProp, NEW[PadFrame.PadFrameParametersRec ← [nbPadsX: 5, nbPadsY: 4, radialLayer: CMosB.met, ringLayer: CMosB.met2]]];
};
END.