<> <> <> <> DIRECTORY Core; CoreTransistor: CEDAR DEFINITIONS = BEGIN OPEN Core; <> <> <> transistorCellClass: CellClass; Transistor: TYPE = REF TransistorRec; TransistorRec: TYPE = RECORD [ type: TransistorType _ nE, length: NAT _ 2, width: NAT _ 4]; TransistorType: TYPE = {nE, pE, nD}; <> Create: PROC [args: TransistorRec] RETURNS [cellType: CellType]; END.