DIRECTORY
CD,
CDAtomicObjects,
CDBasics,
CDExtras,
CDOps,
CDStretchyExtras,
CMos,
Rope;

CMosObsImpl: CEDAR PROGRAM 
IMPORTS CDAtomicObjects, CDBasics, CDExtras, CDOps, CDStretchyExtras, CMos, Rope =
BEGIN 

lambda: CD.Number = CD.lambda;
wellSurround: CD.Number = CMos.wellSurround;


MatchTrans: PROC [me: CD.Object, r: CD.Rect, layer: CD.Layer, prim: BOOL, horz: BOOL] RETURNS [BOOL] =
BEGIN
RETURN [layer=me.layer OR layer=CMos.pol]
END;

pForWellTransistor: REF CD.ObjectClass;
pForTransistor: REF CD.ObjectClass;

FillTransistor: PROC [ob: CD.Object] RETURNS [mustFail: BOOL_FALSE] =  
BEGIN
ext: CD.Number = 2*lambda;
wellSurr: CD.Number _ 0;
innerX: CD.Number _ 0;
dif: CD.Layer;
IF ob.layer=CMos.wpdif OR ob.layer=CMos.wndif THEN {
ob.class _ pForWellTransistor;
wellSurr _ wellSurround;
innerX _ wellSurround-ext;
IF ob.layer=CMos.wpdif THEN dif _ CMos.pdif ELSE dif _ CMos.ndif;
}
ELSE {
IF ob.layer=CMos.pdif THEN dif _ CMos.pdif ELSE dif _ CMos.ndif;
};
ob.size.x _ MAX[ob.size.x, MAX[6*lambda, 2*lambda+2*wellSurr]];
ob.size.y _ MAX[ob.size.y, 6*lambda+2*wellSurr];
IF wellSurr#0 THEN
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: 0, x2: ob.size.x, y1: 0, y2: ob.size.y], 
lev: (IF dif=CMos.pdif THEN CMos.nwell ELSE CMos.pwell),
inside: FALSE
];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: innerX+ext, 
x2: ob.size.x-ext-innerX,
y1: wellSurr, 
y2: ob.size.y-wellSurr], 
lev: dif
];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: innerX, 
x2: ob.size.x-innerX,
y1: wellSurr+ext, 
y2: ob.size.y-wellSurr-ext], 
lev: CMos.pol
];
END;

DescribeT: PROC[me: CD.Object] RETURNS [Rope.ROPE] =
BEGIN
RETURN [
Rope.Cat[
"transistor ",
CDOps.LayerName[me.layer],
Rope.Cat[
" [",
CDExtras.ToLambda[me.size.x-4*lambda],
CDExtras.ToLambda[me.size.y-4*lambda],
"]"
]
]
]
END;

DescribeWT: PROC[me: CD.Object] RETURNS [Rope.ROPE] =
BEGIN
RETURN [
Rope.Cat[
"transistor ",
CDOps.LayerName[me.layer],
Rope.Cat[
" [",
CDExtras.ToLambda[me.size.x-2*wellSurround],
CDExtras.ToLambda[me.size.y-2*wellSurround-4*lambda],
"]"
]
]
]
END;

pForWellLTransistor: REF CD.ObjectClass;

FillLTransistor: PROC [ob: CD.Object] RETURNS [mustFail: BOOL_FALSE] =  
BEGIN
ext: CD.Number = 2*lambda;
wellSurr: CD.Number _ 0;
innerX: CD.Number _ 0;
dif: CD.Layer;
IF ob.layer=CMos.wpdif OR ob.layer=CMos.wndif THEN {
ob.class _ pForWellLTransistor;
wellSurr _ wellSurround;
innerX _ wellSurround-ext;
IF ob.layer=CMos.wpdif THEN dif _ CMos.pdif ELSE dif _ CMos.ndif;
}
ELSE {
IF ob.layer=CMos.pdif THEN dif _ CMos.pdif ELSE dif _ CMos.ndif;
};
ob.size.x _ MAX[ob.size.x, MAX[8*lambda, 6*lambda+2*wellSurr]];
ob.size.y _ MAX[ob.size.y, MAX[8*lambda, 6*lambda+2*wellSurr]];
IF wellSurr#0 THEN {
wR: CD.Rect;
--horizontal piece of nwell
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: 0, x2: ob.size.x, y1: 0, y2: 2*wellSurr+6*lambda], 
lev: (IF dif=CMos.pdif THEN CMos.nwell ELSE CMos.pwell),
inside: FALSE
];
--vertical piece of nwell if ~empty
wR _ [x1: ob.size.x-(2*wellSurr+6*lambda), x2: ob.size.x, y1: 2*wellSurr+6*lambda, y2: ob.size.y];
IF CDBasics.NonEmpty[wR] THEN
CDAtomicObjects.Incorporate[ob: ob, 
r: wR, 
lev: (IF dif=CMos.pdif THEN CMos.nwell ELSE CMos.pwell),
inside: FALSE
];
};
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: innerX+ext, 
x2: ob.size.x-wellSurr,
y1: wellSurr, 
y2: wellSurr+6*lambda], 
lev: dif
];
IF wellSurr+6*lambda < ob.size.y-innerX-ext THEN
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: ob.size.x-wellSurr-6*lambda, 
x2: ob.size.x-wellSurr,
y1: wellSurr+6*lambda, 
y2: ob.size.y-innerX-ext ], 
lev: dif
];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: innerX, 
x2: ob.size.x-wellSurr-ext,
y1: wellSurr+2*lambda, 
y2: wellSurr+4*lambda], 
lev: CMos.pol
];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: ob.size.x-wellSurr-4*lambda, 
x2: ob.size.x-wellSurr-2*lambda,
y1: wellSurr+4*lambda, 
y2: ob.size.y-innerX], 
lev: CMos.pol
];
END;

pForSimpleCon: REF CD.ObjectClass;
pForWellSimpleCon: REF CD.ObjectClass;

FillSimpleCon: PROC [ob: CD.Object] RETURNS [mustFail: BOOL_FALSE] =  
BEGIN
wellSurr: CD.Number _ 0;
dif: CD.Layer;
IF ob.layer=CMos.wpdif OR ob.layer=CMos.wndif THEN {
ob.class _ pForWellSimpleCon;
wellSurr _ wellSurround;
dif _ (IF ob.layer=CMos.wpdif THEN CMos.pdif ELSE CMos.ndif);
}
ELSE {
dif _ ob.layer
};
ob.size _ [4*lambda+2*wellSurr, 4*lambda+2*wellSurr];
IF wellSurr#0 THEN
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: 0, x2: ob.size.x, y1: 0, y2: ob.size.y], 
lev: (IF dif=CMos.pdif THEN CMos.nwell ELSE CMos.pwell),
inside: FALSE
];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: wellSurr, 
x2: ob.size.x-wellSurr,
y1: wellSurr, 
y2: ob.size.y-wellSurr], 
lev: dif
];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: wellSurr, 
x2: ob.size.x-wellSurr,
y1: wellSurr, 
y2: ob.size.y-wellSurr], 
lev: CMos.met
];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: wellSurr+lambda, 
x2: ob.size.x-lambda-wellSurr,
y1: wellSurr+lambda,
y2: ob.size.y-lambda-wellSurr], 
lev: CMos.cut
];
END;

DescribeC: PROC[me: CD.Object] RETURNS [Rope.ROPE] =
BEGIN
RETURN [Rope.Cat["contact ",CDOps.LayerName[me.layer]]]
END;


pForWellDifShortCon: REF CD.ObjectClass;

FillDifShortCon: PROC [ob: CD.Object] RETURNS [mustFail: BOOL_FALSE] =  
BEGIN
dif: CD.Layer;
wellSurr: CD.Number _ 0;
inr: CD.Rect; 
innerW: CD.Number = 4*lambda;
innerH: CD.Number = 8*lambda;
h: CD.Number = innerH/2;
IF ob.layer=CMos.wpdif OR ob.layer=CMos.wndif THEN {
ob.class _ pForWellDifShortCon;
wellSurr _ wellSurround;
IF ob.layer=CMos.wpdif THEN dif _ CMos.pdif ELSE dif _ CMos.ndif;
inr _ [x1: wellSurr, y1: wellSurr, x2: wellSurr+innerW, y2: wellSurr+innerH];
ob.size _ [innerW+2*wellSurr, innerH+2*wellSurr-h];
}
ELSE {
IF ob.layer=CMos.pdif THEN dif _ CMos.pdif ELSE dif _ CMos.ndif;
inr _ [x1: 0, y1: 0, x2: innerW, y2: innerH];
ob.size _ [innerW, innerH];
};
IF wellSurr#0 THEN
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: 0, x2: ob.size.x, y1: 0, y2: ob.size.y], 
lev: (IF dif=CMos.pdif THEN CMos.nwell ELSE CMos.pwell),
inside: FALSE
];
CDAtomicObjects.Incorporate[ob: ob, r: inr, lev: CMos.met];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: inr.x1, 
x2: inr.x2,
y1: inr.y1, 
y2: inr.y1+h], 
lev: dif
];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: inr.x1, 
x2: inr.x2,
y1: inr.y1+h, 
y2: inr.y2], 
lev: (IF dif=CMos.pdif THEN CMos.nwellCont ELSE CMos.pwellCont)
];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: inr.x1+lambda, 
x2: inr.x2-lambda,
y1: inr.y1+lambda,
y2: inr.y1+3*lambda], 
lev: CMos.cut
];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: inr.x1+lambda, 
x2: inr.x2-lambda,
y1: inr.y2-3*lambda,
y2: inr.y2-lambda], 
lev: CMos.cut
];
END;


-- But -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 

pForWellButCon: REF CD.ObjectClass;

MatchButCon: PROC [me: CD.Object, r: CD.Rect, layer: CD.Layer, prim: BOOL, horz: BOOL] RETURNS [BOOL] =
BEGIN
RETURN [layer=me.layer OR layer=CMos.met OR layer=CMos.pol]
END;

FillButCon: PROC [ob: CD.Object] RETURNS [mustFail: BOOL_FALSE] =
BEGIN
polyH: CD.Number = 3*lambda;
diffOffsetY: CD.Number = polyH-lambda;
innerH: CD.Number = diffOffsetY+4*lambda;
innerW: CD.Number = 4*lambda;
wellSurr: CD.Number;
innerY: CD.Number;
inr: CD.Rect;
dif: CD.Layer;
IF ob.layer=CMos.wpdif OR ob.layer=CMos.wndif THEN {
ob.class _ pForWellButCon;
wellSurr _ wellSurround; 
innerY _ wellSurround-diffOffsetY;
IF ob.layer=CMos.wpdif THEN dif _ CMos.pdif ELSE dif _ CMos.ndif;
}
ELSE {
IF ob.layer=CMos.pdif THEN dif _ CMos.pdif ELSE dif _ CMos.ndif;
wellSurr _ 0; 
innerY _ 0;
};
inr _ [x1: wellSurr, y1: innerY, x2: wellSurr+innerW, y2: innerY+innerH];
ob.size _ [innerW+2*wellSurr, innerY+innerH+wellSurr];
IF wellSurr#0 THEN 
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: 0, x2: ob.size.x, y1: 0, y2: ob.size.y], 
lev: (IF dif=CMos.pdif THEN CMos.nwell ELSE CMos.pwell),
inside: FALSE
];
CDAtomicObjects.Incorporate[ob: ob, r: inr, lev: CMos.met];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: inr.x1, 
x2: inr.x2,
y1: inr.y1+diffOffsetY, 
y2: inr.y2], 
lev: dif
];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: inr.x1, 
x2: inr.x2,
y1: inr.y1, 
y2: inr.y1+polyH], 
lev: CMos.pol
];
CDAtomicObjects.Incorporate[ob: ob, 
r: CDBasics.Extend[inr, -lambda], 
lev: CMos.cut
];
END;


FillVia: PROC [ob: CD.Object] RETURNS [mustFail: BOOL_FALSE] =  
BEGIN
viaRimWidth: CD.Number = lambda;
cut2min: CD.Number = 3*lambda;
ob.size _ [cut2min+2*viaRimWidth, cut2min+2*viaRimWidth];
ob.layer _ CMos.met2;
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: 0, x2: ob.size.x, y1: 0, y2: ob.size.y], 
lev: CMos.met2
];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: 0, x2: ob.size.x, y1: 0, y2: ob.size.y], 
lev: CMos.met
];
CDAtomicObjects.Incorporate[ob: ob, 
r: [x1: lambda, 
x2: ob.size.x-lambda,
y1: lambda,
y2: ob.size.y-lambda], 
lev: CMos.cut2
];
END;


MatchSimpleCon: PROC [me: CD.Object, r: CD.Rect, layer: CD.Layer, prim: BOOL, horz: BOOL] RETURNS [BOOL] =
BEGIN
RETURN [layer=me.layer OR layer=CMos.met]
END;

Init: PROC [] =
BEGIN
Register: PROC [key: ATOM, creator: CDAtomicObjects.FillObjectProc, desc: Rope.ROPE, match: CDStretchyExtras.MatchProc_NIL] RETURNS [p: REF CD.ObjectClass] =
BEGIN
p _ CDAtomicObjects.RegisterAtomicObClass[key, creator, desc, CMos.cmos];
IF p=NIL THEN ERROR;
IF match=NIL THEN match _ MatchSimpleCon; 
CDStretchyExtras.InstallMatch[p, match];
END;
pForTransistor _ Register[$CTrans, FillTransistor, "transistor", MatchTrans];
pForTransistor.describe _ DescribeT;
pForWellTransistor _ Register[$CWellTrans, FillTransistor, "transistor", MatchTrans];
pForWellTransistor.describe _ DescribeWT;
[] _ Register[$CLTrans, FillLTransistor, "L-transistor", MatchTrans];
pForWellLTransistor _ Register[$CLWellTrans, FillLTransistor, "L-transistor", MatchTrans];

pForSimpleCon _ Register[$CSimpleCon, FillSimpleCon, "contact"];
pForSimpleCon.describe _ DescribeC;
pForWellSimpleCon _ Register[$CWellSimpleCon, FillSimpleCon, "contact"];
pForWellSimpleCon.describe _ DescribeC;
[] _ Register[$CDifShortCon, FillDifShortCon, "dif short contact"];
pForWellDifShortCon _ Register[$CWellDifShortCon, FillDifShortCon, "dif short contact"];
[] _ Register[$CButtingCont, FillButCon, "butting contact", MatchButCon];
pForWellButCon _ Register[$CWellButtingCont, FillButCon, "butting contact", MatchButCon];

[] _ Register[$CVia, FillVia, "via"];
END; 

Init[];
END. 

æCMosObsImpl.mesa
Copyright c 1985 by Xerox Corporation.  All rights reserved.
Christian Jacobi, March 22, 1985 11:09:09 am PST 
last edited Christian Jacobi, July 22, 1985 1:55:00 pm PDT
-- straight transistors -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
--poly, dif, welldif, via
-- Don't care about different diffusions and such

-- L transistors -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 

-- simple contacts -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
-- DifShort -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
-- Don't care about different diffusions and such
--via -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
--poly, dif, welldif, via
-- Don't care about different diffusions and such
--transistors
--contacts
�ÊÙ˜š
œ™Jšœ
Ïm
œ1™<Jš
œ1™1Jš
œ:™:J˜—š
Ïk	˜	Jšžœ
˜Jš
œ˜Jš
œ	˜	Jš
œ	˜	Jš
œ˜Jš
œ˜J˜Jš
œ˜J˜—šÏbœžœ
žœ
˜JšžœK˜R—Jšžœ
˜J˜Jšœžœ
žœ˜Jšœžœ˜,J˜Jš
œf™fJ˜šÏn
œžœžœžœžœžœžœžœžœ˜fJš
œ™Jš
ž˜Jš
œ1™1Jšžœžœ˜)Jšžœ
˜—J˜Jšœžœ
žœ
˜'Jšœžœ
žœ
˜#J˜š œžœžœ	žœžœ
žœ˜GJš
ž˜Jšœžœ˜Jšœ
žœ˜Jšœžœ˜Jšœžœ˜šžœžœžœ˜4Jš
œ˜Jš
œ˜Jš
œ˜Jšžœžœžœ˜AJš
œ
˜
—šžœ˜Jšžœžœžœ˜@Jš
œ˜—Jšœžœžœ!˜?Jšœžœ!˜0šžœž˜š
œ$˜$Jš
œ1˜1Jšœžœžœžœ
˜8Jšœž˜
Jš
œ˜——š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ˜—Jš
œ˜Jš
œ˜—š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ˜—Jš
œ
˜
Jš
œ˜—Jšžœ
˜—J˜š
 	œžœžœ	žœžœ˜4Jš
ž˜šžœ˜š
œ	˜	Jš
œ˜Jš
œ˜š
œ	˜	Jš
œ˜Jš
œ&˜&Jš
œ&˜&J˜J˜
—Jš
œ
˜
—Jš
œ
˜
—Jšžœ
˜—J˜š
 
œžœžœ	žœžœ˜5Jš
ž˜šžœ˜š
œ	˜	Jš
œ˜Jš
œ˜š
œ	˜	Jš
œ˜Jš
œ,˜,Jš
œ5˜5J˜J˜
—Jš
œ
˜
—Jš
œ
˜
—Jšžœ
˜—J™Jš
œ_™_J˜Jšœžœ
žœ
˜(J˜š œžœžœ	žœžœ
žœ˜HJš
ž˜Jšœžœ˜Jšœ
žœ˜Jšœžœ˜Jšœžœ˜šžœžœžœ˜4Jš
œ˜Jš
œ˜Jš
œ˜Jšžœžœžœ˜AJ˜
—šžœ˜Jšžœžœžœ˜@Jš
œ˜—Jšœžœžœ!˜?Jšœžœžœ!˜?šžœžœ˜Jš
œ˜Jš
œ˜š
œ$˜$Jš
œ;˜;Jšœžœžœžœ
˜8Jšœž˜
Jš
œ˜—Jš
œ#˜#Jš
œb˜bšžœž˜š
œ$˜$Jš
œ˜Jšœžœžœžœ
˜8Jšœž˜
Jš
œ˜——J˜—š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ˜—Jš
œ˜Jš
œ˜—šžœ*ž˜0š
œ$˜$š
œ%˜%Jš
œ˜Jš
œ˜Jš
œ˜—Jš
œ˜Jš
œ˜——š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ˜—Jš
œ
˜
Jš
œ˜—š
œ$˜$š
œ%˜%Jš
œ ˜ Jš
œ˜Jš
œ˜—Jš
œ
˜
Jš
œ˜—Jšžœ
˜—J™Jš
œa™aJ˜Jšœžœ
žœ
˜"Jšœžœ
žœ
˜&J˜š 
œžœžœ	žœžœ
žœ˜FJš
ž˜Jšœ
žœ˜Jšœžœ˜šžœžœžœ˜4Jš
œ˜Jš
œ˜Jšœžœžœžœ˜=J˜
—šžœ˜Jš
œ˜Jš
œ˜—Jš
œ5˜5šžœž˜š
œ$˜$Jš
œ1˜1Jšœžœžœžœ
˜8Jšœž˜
Jš
œ˜——š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ˜—Jš
œ˜Jš
œ˜—š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ˜—Jš
œ
˜
Jš
œ˜—š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ ˜ —Jš
œ
˜
Jš
œ˜—Jšžœ
˜J˜—š
 	œžœžœ	žœžœ˜4Jš
ž˜Jšžœ1˜7Jšžœ
˜—J˜Jš
œZ™ZJ˜Jšœžœ
žœ
˜(J˜š œžœžœ	žœžœ
žœ˜HJš
ž˜Jšœžœ˜Jšœ
žœ˜Jšœžœ˜Jšœžœ˜Jšœžœ˜Jšœžœ˜šžœžœžœ˜4Jš
œ˜Jš
œ˜Jšžœžœžœ˜AJš
œM˜MJš
œ3˜3J˜
—šžœ˜Jšžœžœžœ˜@Jš
œ-˜-Jš
œ˜J˜—šžœž˜š
œ$˜$Jš
œ1˜1Jšœžœžœžœ
˜8Jšœž˜
Jš
œ˜——Jš
œ;˜;š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ˜—Jš
œ˜Jš
œ˜—š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ
˜
—Jšœžœžœžœ˜?Jš
œ˜—š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ˜—Jš
œ
˜
Jš
œ˜—š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ˜—Jš
œ
˜
Jš
œ˜—Jšžœ
˜J˜J˜—JšÏc	œ
¡œ
¡œ
¡œ
¡œ
¡œ
¡œ
¡œ
¡œ
¡œ
¡œ
¡œ
¡œ
¡œ
¡œ
˜^J˜Jšœžœ
žœ
˜#J˜š œžœžœžœžœžœžœžœžœ˜gJš
ž˜Jš
œ1™1Jšžœžœžœ˜;Jšžœ
˜—J˜š 
œžœžœ	žœžœ
žœ˜AJš
ž˜Jšœžœ˜Jšœ
žœ˜&Jšœžœ˜)Jšœžœ˜Jšœ
žœ˜Jšœžœ˜Jšœžœ˜
Jšœžœ˜šžœžœžœ˜4Jš
œ˜Jš
œ˜Jš
œ"˜"Jšžœžœžœ˜AJ˜
—šžœ˜Jšžœžœžœ˜@Jš
œ˜Jš
œ˜Jš
œ˜—Jš
œI˜IJš
œ6˜6šžœžœ
˜š
œ$˜$Jš
œ1˜1Jšœžœžœžœ
˜8Jšœž˜
Jš
œ˜——Jš
œ;˜;š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ
˜
—Jš
œ˜Jš
œ˜—š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ˜—Jš
œ
˜
Jš
œ˜—š
œ$˜$Jš
œ"˜"Jš
œ
˜
Jš
œ˜—Jšžœ
˜—J˜Jš
œ`™`J˜š œžœžœ	žœžœ
žœ˜@Jš
ž˜Jšœ
žœ˜ Jšœ	žœ˜Jš
œ9˜9Jš
œ˜š
œ$˜$Jš
œ1˜1Jš
œ˜Jš
œ˜—š
œ$˜$Jš
œ1˜1Jš
œ
˜
Jš
œ˜—š
œ$˜$š
œ˜Jš
œ˜Jš
œ˜Jš
œ˜—Jš
œ˜Jš
œ˜—Jšžœ
˜J˜—Jš
œZ™ZJ˜š œžœžœžœžœžœžœžœžœ˜jJš
œ™Jš
ž˜Jš
œ1™1Jšžœžœ˜)Jšžœ
˜—J˜š œžœ˜Jš
ž˜š œžœžœ6žœ$žœžœžœ
žœ˜�
Jš
ž˜Jš
œI˜IJšžœžœ
žœ
žœ
˜Jšžœžœ
žœ˜*Jš
œ(˜(Jšžœ
˜—Jš
œ
™
Jš
œM˜MJš
œ$˜$Jš
œU˜UJš
œ)˜)Jš
œE˜EJš
œZ˜ZJ˜Jš
œ
™
Jš
œ@˜@Jš
œ#˜#Jš
œH˜HJš
œ'˜'Jš
œC˜CJš
œX˜XJš
œI˜IJš
œY˜YJ˜Jš
œ%˜%Jšžœ˜J˜—J˜Jšžœ˜J˜—…—'ú:¹