DIRECTORYCMos,CMosObjects,CDAtomicObjects,CD;CMosObjectsImpl: CEDAR PROGRAMIMPORTS CDAtomicObjects, CMosEXPORTS CMosObjects =BEGINSDiff: PROC[l: CD.Layer] RETURNS [CD.Layer] =BEGINSELECT l FROMCMos.wpdif, CMos.wndif, CMos.pdif, CMos.ndif => RETURN [l];ENDCASE => RETURN [CMos.wpdif]END;XDiff: PROC[l: CD.Layer] RETURNS [CD.Layer] =BEGINSELECT l FROMCMos.wpdif, CMos.wndif, CMos.pdif, CMos.ndif, CMos.nwellCont, CMos.pwellCont => RETURN [l];ENDCASE => RETURN [CMos.wpdif]END;CreatePolyCon: PUBLIC PROC [] RETURNS [CD.Object] =BEGINRETURN [CDAtomicObjects.CreateAtomicOb[$CSimpleCon, [0, 0], CMos.cmos, CMos.pol]];END;CreateDifCon: PUBLIC PROC [difLayer: CD.Layer] RETURNS [CD.Object] =BEGINRETURN [CDAtomicObjects.CreateAtomicOb[$CSimpleCon, [0, 0], CMos.cmos, XDiff[difLayer]]];END;CreateDifShortCon: PUBLIC PROC [difLayer: CD.Layer] RETURNS [CD.Object] =BEGINRETURN [CDAtomicObjects.CreateAtomicOb[$CDifShortCon, [0, 0], CMos.cmos, SDiff[difLayer]]];END;CreateButCon: PUBLIC PROC [difLayer: CD.Layer] RETURNS [CD.Object] =BEGINRETURN [CDAtomicObjects.CreateAtomicOb[$CButtingCont, [0, 0], CMos.cmos, SDiff[difLayer]]];END;CreateMmCon: PUBLIC PROC [] RETURNS [CD.Object] =BEGINRETURN [CDAtomicObjects.CreateAtomicOb[$CVia, [0, 0], CMos.cmos]];END;CreateTransistor: PUBLIC PROC [size: CD.Position, difLayer: CD.Layer] RETURNS [CD.Object] =BEGINRETURN [CDAtomicObjects.CreateAtomicOb[$CTrans, size, CMos.cmos, XDiff[difLayer]]];END;CreateAngleTransistor: PUBLIC PROC [size: CD.Position, difLayer: CD.Layer] RETURNS [CD.Object] =BEGINRETURN [CDAtomicObjects.CreateAtomicOb[$CLTrans, size, CMos.cmos, XDiff[difLayer]]];END;END.     ð  CMosObjectsImpl.mesa        (part of ChipNDale)Copyright c 1983, 1985 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:44:10 pm PDT ÊÅ  ˜ šœ/™/Jšœ
Ïmœ7™BJšœ3™3Icode™A—J˜ šÏk	˜	Jšœ˜Jšœž˜J˜Jšžœ˜J˜ —šÏbœžœž˜Jšžœ˜Jšžœ˜—Jšž˜J˜ š
Ïnœžœžœžœžœ	˜-Jšž˜šžœž˜Jšœ0žœ˜;Jšžœžœ˜—Jšžœ˜—J˜ š
 œžœžœžœžœ	˜-Jšž˜šžœž˜JšœPžœ˜[Jšžœžœ˜—Jšžœ˜—J˜ š
 œžœžœžœžœ
˜3Jšž˜JšžœL˜RJšžœ˜—J˜ š
 œžœžœžœžœ
˜DJšž˜JšžœS˜YJšžœ˜—J˜ š œžœžœžœžœžœ
˜IJšž˜JšžœU˜[Jšžœ˜—J˜ š
 œžœžœžœžœ
˜DJšž˜JšžœU˜[Jšžœ˜—J˜ š œžœžœžœ
˜1Jšž˜Jšžœ<˜BJšžœ˜—J˜ š œžœžœžœžœžœ
˜[Jšž˜JšžœM˜SJšžœ˜—J˜ š œžœžœžœžœžœ
˜`Jšž˜JšžœN˜TJšžœ˜—J˜ Jšžœ˜J˜— …—    š  
O  