DIRECTORYCD USING [Number, Object, Layer, undefLayer];CMosCMContacts: CEDAR DEFINITIONS =BEGINContactType: TYPE = {burr, mDif, difShort, butt, mPol, mm2};ContactPtr: TYPE = REF ContactRec;ContactRec: TYPE = RECORD [typ: ContactType,wExt: CD.Number _ 0,lExt: CD.Number _ 0];CreatePolyCon: PROC [l: CD.Number] RETURNS [CD.Object];CreateDifCon: PROC [l: CD.Number, difLev: CD.Layer_CD.undefLayer] RETURNS [CD.Object];CreateDifShortCon: PROC [difLev: CD.Layer_CD.undefLayer] RETURNS [CD.Object];CreateButCon: PROC [difLev: CD.Layer_CD.undefLayer] RETURNS [CD.Object];CreateBurCon: PROC [w, l: CD.Number, wex: CD.Number_0, lex: CD.Number_0, difLev: CD.Layer_CD.undefLayer] RETURNS [CD.Object];CreateMmCon: PROC [l: CD.Number, wex: CD.Number_0, lex: CD.Number_0] RETURNS [CD.Object];END.   ”  CMosCMContacts.mesa        (part of ChipNDale)Copyright c 1983, 1986 by Xerox Corporation.  All rights reserved.Created by Christian Jacobi   May 3, 1983 11:22 am Last edited by: Christian Jacobi, October 17, 1986 1:37:36 pm PDT--burr, mDif, butt contacts can be characterized by the layer of their diffusion--(ndif, pdif, nwelCont, pwelCont)--difShort contacts can also be characterized by the layer of their diffusion,--but only (ndif, pdif) are allowed--All create procedures may (or may not) create references to--the same object.  Therefore consider the contact objects as --readonly.  If a contact needs to be modified create a new one! ÊÂ  ˜ codešœ.™.Kšœ
Ïmœ7™BKšœ3™3K™A—K˜ šÏk	˜	Kšžœžœ%˜-K˜ —KšÏnœžœžœ˜#Kšž˜K˜ šœžœ+˜<KšœP™PKšœ"™"KšœN™NKšœ#™#—K˜ Kšœžœžœ˜"šœžœžœ˜K˜Kšœžœ˜Kšœžœ˜K˜K˜ —Kš
Ÿœžœžœ	žœžœ	˜7KšŸœžœžœžœžœžœžœ	˜VKšŸœžœ
žœžœžœžœ	˜MKšŸœžœ
žœžœžœžœ	˜HKšŸœžœžœžœžœžœžœžœžœ	˜}KšŸœžœžœžœžœžœžœ	˜YK˜ Kšœ=™=Kšœ>™>Kšœ@™@K˜ Kšžœ˜K˜— …—    *  €  