DIRECTORY Ascii, Atom, CD, CDAtomicObjects, CDBasics, CDCells, CDCommandOps, CDDirectory, CDInstances, CDMakeProcPrivate, CDProperties, CDOrient, CDSequencer, CDSymbolicObjects, Convert, IO, PriorityQueue, RefTab, Rope, SymTab, TerminalIO, TiogaFileOps, TiogaOps, ViewerTools; CDMakeProcCommands: CEDAR PROGRAM IMPORTS Ascii, Atom, Convert, CD, CDAtomicObjects, CDBasics, CDCells, CDCommandOps, CDDirectory, CDInstances, CDProperties, CDOrient, CDSequencer, CDSymbolicObjects, IO, PriorityQueue, RefTab, Rope, SymTab, TerminalIO, TiogaFileOps, TiogaOps, ViewerTools EXPORTS CDMakeProcPrivate = BEGIN Environment: TYPE = REF EnvironmentRep; EnvironmentRep: PUBLIC TYPE = RECORD [ invocationKey: REF, rootNode: TiogaFileOps.Ref, commentNode: TiogaFileOps.Ref, --insert sibling for next comment modHeaderNode: TiogaFileOps.Ref, --DIRECTORY... to excluding BEGIN declNode: TiogaFileOps.Ref, --insert sibling for next declaration on module level procNode: TiogaFileOps.Ref, --insert sibling for next global procedures procDecNode: TiogaFileOps.Ref, --insert sibling for next local declaration postDeclNode: TiogaFileOps.Ref, --insert sibling for next declaration on module level firstModStatementNode: TiogaFileOps.Ref, --reserved for first statement modStatementNode: TiogaFileOps.Ref, --insert sibling for next mudule statement procName: Rope.ROPE, modifier: INT _ 0, directory: SymTab.Ref, imports: SymTab.Ref, declaredLayers: ARRAY CD.Layer OF Rope.ROPE _ ALL[NIL], nameToThing: SymTab.Ref, thingToName: RefTab.Ref, globalThingToName: RefTab.Ref, hasDirGen: BOOL _ FALSE, properties: CD.PropRef ]; ExpressionProc: TYPE = CDMakeProcPrivate.ExpressionProc; GetEnvironmentProp: PUBLIC PROC [env: Environment, key: REF] RETURNS [REF] = { RETURN [CDProperties.GetProp[env.properties, key]] }; PutEnvironmentProp: PUBLIC PROC [env: Environment, key: REF, val: REF] = { CDProperties.PutProp[env.properties, key, val] }; RegisterExpressionProc: PUBLIC PROC [for: REF, ep: ExpressionProc, tech: CD.Technology _ NIL] = { WITH for SELECT FROM c: CD.ObjectClass => CDProperties.PutProp[c.properties, $MakeCallExpression, NEW[ExpressionProc_ep]]; a: ATOM => RegisterExpressionProc[CD.FetchObjectClass[a, tech], ep, tech]; ENDCASE => ERROR }; SpecificCallExpression: PROC [env: Environment, ob: CD.Object] RETURNS [r: Rope.ROPE _ NIL] = { x: REF _ CDProperties.GetProp[ob.class.properties, $MakeCallExpression]; WITH x SELECT FROM rmce: REF ExpressionProc => r _ rmce^[env, ob] ENDCASE => NULL; }; MakeNodeComment: PROC [node: TiogaFileOps.Ref] = { TRUSTED { TiogaOps.PutProp[LOOPHOLE[node], $Comment, NEW[BOOLEAN _ TRUE]] }; }; Reserve: PROC [env: Environment, key: Rope.ROPE] = { [] _ SymTab.Store[env.nameToThing, key, $reserved]; }; IncludeDirectory: PUBLIC PROC [env: Environment, module: Rope.ROPE, import: BOOL_TRUE] = { [] _ SymTab.Store[env.nameToThing, module, $module]; [] _ SymTab.Insert[env.directory, module, module]; IF import THEN [] _ SymTab.Insert[env.imports, module, module]; }; MakeDirectory: PROC [env: Environment] = { r: Rope.ROPE _ NIL; Each: SymTab.EachPairAction = { IF num=0 THEN TiogaFileOps.SetContents[env.modHeaderNode, "DIRECTORY"] ELSE r _ r.Concat[", "]; r _ r.Concat[key]; num _ num+1; quit _ FALSE }; num: INT _ 0; [] _ env.directory.Pairs[Each]; IF num>0 THEN { node: TiogaFileOps.Ref _ TiogaFileOps.InsertNode[env.modHeaderNode, TRUE]; TiogaFileOps.SetContents[node, r.Concat[";"]]; } ELSE TiogaFileOps.SetContents[env.modHeaderNode, ""]; }; MakeImportsExpr: PROC [env: Environment] RETURNS [r: Rope.ROPE _ NIL] = { Each: SymTab.EachPairAction = { IF num=0 THEN r _ "IMPORTS " ELSE r _ r.Concat[", "]; r _ r.Concat[key]; num _ num+1; quit _ FALSE }; num: INT _ 0; [] _ env.imports.Pairs[Each]; }; NewEnvironment: PROC [t: CD.Technology] RETURNS [env: Environment] = { env _ NEW[EnvironmentRep_[properties: CD.InitPropRef[]]]; env.invocationKey _ NEW[INT]; env.rootNode _ TiogaFileOps.CreateRoot[]; env.commentNode _ TiogaFileOps.InsertNode[env.rootNode, TRUE]; TiogaFileOps.SetContents[env.commentNode, "--///temp/ChipNDale/temp.mesa"]; MakeNodeComment[env.commentNode]; env.commentNode _ TiogaFileOps.InsertNode[env.commentNode]; TiogaFileOps.SetContents[env.commentNode, "--created by ChipNDale"]; MakeNodeComment[env.commentNode]; env.modHeaderNode _ TiogaFileOps.InsertNode[env.commentNode]; env.declNode _ TiogaFileOps.InsertNode[env.modHeaderNode]; TiogaFileOps.SetContents[env.declNode, "BEGIN"]; GlobalDeclaration1[env, IO.PutFR["tech: CD.Technology _ CD.FetchTechnology[$%g];", IO.atom[t.key]]]; env.procNode _ TiogaFileOps.InsertNode[env.declNode]; TiogaFileOps.SetContents[env.procNode, ""]; env.postDeclNode _ TiogaFileOps.InsertNode[env.procNode]; TiogaFileOps.SetContents[env.postDeclNode, "table: CDGenerate.Table _ CDGenerate.AssertTable[""USER""];"]; env.firstModStatementNode _ env.modStatementNode _ TiogaFileOps.InsertNode[env.postDeclNode]; env.nameToThing _ SymTab.Create[]; env.directory _ SymTab.Create[]; env.imports _ SymTab.Create[]; env.thingToName _ RefTab.Create[]; env.globalThingToName _ RefTab.Create[]; }; FinishUp: PROC [env: Environment] = { node: TiogaFileOps.Ref; subNode: TiogaFileOps.Ref; fileName: Rope.ROPE _ "///temp/ChipNDale/temp.mesa"; r: Rope.ROPE _ NIL; MakeDirectory[env]; node _ TiogaFileOps.InsertNode[env.modHeaderNode]; TiogaFileOps.SetContents[node, "Temp: CEDAR PROGRAM"]; subNode _ TiogaFileOps.InsertNode[node, TRUE]; TiogaFileOps.SetContents[subNode, Rope.Cat[MakeImportsExpr[env], " ="]]; r _ IO.PutFR["[] _ table.Register[""%g"", %g];", IO.rope[env.procName], IO.rope[env.procName]]; TiogaFileOps.SetContents[env.firstModStatementNode, r]; GlobalStatement[env, "END."]; TiogaFileOps.Store[env.rootNode, fileName]; env.rootNode _ env.commentNode _ env.modHeaderNode _ NIL; env.declNode _ env.procNode _ env.postDeclNode _ NIL; env.firstModStatementNode _ env.modStatementNode _ NIL; env.directory _ env.imports _ env.nameToThing _ NIL; env.thingToName _ NIL; env.globalThingToName _ NIL; TerminalIO.WriteRope[fileName]; TerminalIO.WriteRope[" created\n"]; [] _ ViewerTools.MakeNewTextViewer[info: [ file: fileName, label: fileName, name: fileName, iconic: FALSE ]]; }; MakeProcedureNode: PROC [env: Environment] RETURNS [TiogaFileOps.Ref] = { env.procNode _ TiogaFileOps.InsertNode[env.procNode]; env.procDecNode _ NIL; RETURN [env.procNode] }; MakeDeclarationNode: PROC [env: Environment] RETURNS [TiogaFileOps.Ref] = { env.declNode _ TiogaFileOps.InsertNode[env.declNode]; RETURN [env.declNode] }; GlobalDeclaration1: PUBLIC PROC [env: Environment, line: Rope.ROPE] = { node: TiogaFileOps.Ref _ MakeDeclarationNode[env]; TiogaFileOps.SetContents[node, line]; }; GlobalDeclaration2: PUBLIC PROC [env: Environment, line: Rope.ROPE] = { env.postDeclNode _ TiogaFileOps.InsertNode[env.postDeclNode]; TiogaFileOps.SetContents[env.postDeclNode, line]; }; GlobalStatement: PUBLIC PROC [env: Environment, line: Rope.ROPE] = { env.modStatementNode _ TiogaFileOps.InsertNode[env.modStatementNode]; TiogaFileOps.SetContents[env.modStatementNode, line]; }; MakeDirGenerator: PROC [env: Environment] = { IF ~env.hasDirGen THEN { env.hasDirGen _ TRUE; GlobalDeclaration2[env, "directory: CDGenerate.Table _ CDGenerate.AssertTable[""DIRECTORY""];"]; } }; RequestGlobalIdent: PUBLIC PROC[env: Environment, proposed: Rope.ROPE, whatFor: REF_NIL] RETURNS [Rope.ROPE] = { RETURN [RequestIdent[env, proposed, whatFor, TRUE]]; }; GlobalIdent: PUBLIC PROC [env: Environment, whatFor: REF] RETURNS [Rope.ROPE] = { RETURN [Ident[env, whatFor, TRUE]]; }; RopeToId: PROC [r: Rope.ROPE] RETURNS [id: Rope.ROPE] = { first: BOOL _ TRUE; Trans: Rope.TranslatorType = { IF Ascii.Letter[old] THEN new _ old ELSE IF Ascii.Digit[old] AND ~first THEN new _ old ELSE new _ 'x; first _ FALSE }; id _ Rope.Translate[base: r, translator: Trans]; IF Rope.IsEmpty[id] THEN id _ "x"; }; RequestIdent: PROC [env: Environment, proposed: Rope.ROPE_NIL, whatFor: REF_NIL, global: BOOL_FALSE] RETURNS [r: Rope.ROPE] = { proposed _ RopeToId[proposed]; r _ proposed; DO IF SymTab.Insert[env.nameToThing, r, whatFor] THEN { IF global THEN [] _ RefTab.Store[env.globalThingToName, whatFor, r]; [] _ RefTab.Store[env.thingToName, whatFor, r]; RETURN; }; env.modifier _ env.modifier+1; r _ IO.PutFR["%gx%g", IO.rope[proposed], IO.int[env.modifier]] ENDLOOP }; Ident: PROC [env: Environment, whatFor: REF, global: BOOL] RETURNS [Rope.ROPE_NIL] = { tab: RefTab.Ref _ IF global THEN env.globalThingToName ELSE env.thingToName; WITH RefTab.Fetch[tab, whatFor].val SELECT FROM n: Rope.ROPE => RETURN [n]; ENDCASE =>NULL; }; IdentForLocalObject: PROC [env: Environment, ob: CD.Object] RETURNS [name: Rope.ROPE] = { first: CHAR; name _ Ident[env, ob, FALSE]; IF name#NIL THEN RETURN [name]; name _ CDDirectory.Name[ob]; IF Rope.IsEmpty[name] THEN { name _ Atom.GetPName[ob.class.objectType] }; first _ Rope.Fetch[name]; IF Ascii.Letter[first] THEN first _ Ascii.Lower[first]; name _ Rope.Replace[ base: name, start: 0, len: 1, with: Rope.FromChar[first] ]; name _ RequestIdent[env, name, ob, FALSE]; }; PosToRope: PUBLIC PROC [pos: CD.Position] RETURNS [r: Rope.ROPE] = { RETURN [IO.PutFR["[x: %g, y: %g]", IO.int[pos.x], IO.int[pos.y] ]] }; RectToRope: PUBLIC PROC [rect: CD.Rect] RETURNS [r: Rope.ROPE] = { RETURN [IO.PutFR["[x1: %g, y1: %g, x2: %g, y2: %g]", IO.int[rect.x1], IO.int[rect.y1], IO.int[rect.x2], IO.int[rect.y2] ]] }; LayerIdent: PUBLIC PROC [env: Environment, l: CD.Layer] RETURNS [r: Rope.ROPE] = { IF env.declaredLayers[l]=NIL THEN { r: Rope.ROPE; name: Rope.ROPE _ RequestIdent[env, Atom.GetPName[CD.LayerKey[l]]]; env.declaredLayers[l] _ name; r _ IO.PutFR["%g: CD.Layer _ CD.FetchLayer[t: tech, uniqueKey: $%g];", IO.rope[name], IO.atom[CD.LayerKey[l]] ]; GlobalDeclaration1[env, r]; }; RETURN [env.declaredLayers[l]] }; MapIPos: PROC [inst: CD.Instance] RETURNS [iPos: CD.Position] = { iPos _ CDBasics.BaseOfRect[CDInstances.InstRectI[inst]]; }; MapClientPos: PROC [inst: CD.Instance] RETURNS [originPos: CD.Position] = { RETURN [CDOrient.MapPoint[ pointInCell: CD.ClientOrigin[inst.ob], cellSize: inst.ob.size, cellInstOrient: inst.orientation, cellInstPos: inst.location ]] }; LocalStatement: PUBLIC PROC [env: Environment, line: Rope.ROPE] = { node: TiogaFileOps.Ref; node _ TiogaFileOps.InsertAsLastChild[env.procNode]; TiogaFileOps.SetContents[node, line]; }; ProgramText: PROC [ob: CD.Object, design: CD.Design, env: Environment] = { env.procName _ RequestGlobalIdent[env, CDDirectory.Name[ob], ob]; IF ~CDCells.IsCell[ob] THEN ob _ CDDirectory.Expand[ob, design, NIL].new; IF ob#NIL AND CDCells.IsCell[ob] THEN { pq: PriorityQueue.Ref _ PriorityQueue.Create[SortPred, IF ob.size.x { childName _ IdentForLocalObject[env, inst.ob]; [r, needInst] _ MakeACallExpression[env, inst.ob]; r _ Rope.Cat[childName, " _ ", r, ";"]; LocalStatement[env, r]; IF needInst THEN [] _ RefTab.Store[childs, inst.ob, $hasValueMI] ELSE [] _ RefTab.Store[childs, inst.ob, $hasValue] }; $hasValue => { childName _ IdentForLocalObject[env, inst.ob]; needInst _ FALSE; }; $hasValueMI => { childName _ IdentForLocalObject[env, inst.ob]; needInst _ TRUE; }; ENDCASE => { childName _ "child"; [r, needInst] _ MakeACallExpression[env, inst.ob]; r _ Rope.Cat[childName, " _ ", r, ";"]; LocalStatement[env, r]; }; IF CDProperties.GetInstanceProp[inst, $SignalName]#NIL OR CDProperties.GetInstanceProp[inst, $InstanceName]#NIL THEN needInst _ TRUE; IF needInst THEN { hasInst _ TRUE; r _ Rope.Cat[ IO.PutFR["inst _ CDCells.IncludeOb[cell: ob, ob: %g, position: %g%0g, obCSystem: interrestCoords].newInst;", IO.rope[childName], IO.rope[PosToRope[iPos]], IO.rope[orientationCode] ]]; } ELSE { r _ Rope.Cat[ IO.PutFR["[] _ CDCells.IncludeOb[cell: ob, ob: %g, position: %g%0g, obCSystem: interrestCoords];", IO.rope[childName], IO.rope[PosToRope[iPos]], IO.rope[orientationCode] ]]; }; LocalStatement[env, r]; IF needInst THEN MakeInstanceStuff[env, inst]; }; EachInst[inst]; ENDLOOP; ir _ CD.InterestRect[ob]; r _ Rope.Cat["CDCells.SetInterestRect[ob, ", RectToRope[ir], "];"]; LocalStatement[env, r]; r _ Rope.Cat["[] _ CDDirectory.Include[design: design, object: ob"]; IF cptr.name#NIL THEN r _ Rope.Cat[r, ", alternateName: ", RopeToRope[cptr.name]]; r _ Rope.Cat[r, "];"]; LocalStatement[env, r]; LocalStatement[env, "END;"]; LocalStatement[env, ""]; IF hasInst THEN { env.procDecNode _ TiogaFileOps.InsertNode[env.procDecNode]; TiogaFileOps.SetContents[env.procDecNode, "inst: CD.Instance;"]; }; childs _ NIL; } ELSE { TerminalIO.WriteRope["**could not convert to cell\n"]; ERROR ABORTED; } }; RopeToRope: PUBLIC PROC [r: Rope.ROPE] RETURNS [Rope.ROPE] = { RETURN [Convert.RopeFromRope[r]]; }; AtomToRope: PUBLIC PROC [env: Environment, a: ATOM] RETURNS [Rope.ROPE] = { r: Rope.ROPE _ Atom.GetPName[a]; leng: INT _ Rope.Length[r]; normalCase: BOOL _ leng>0; FOR i: INT IN [0..leng) DO c: CHAR _ Rope.Fetch[r, i]; IF ~(Ascii.Letter[c] OR Ascii.Digit[c]) THEN {normalCase_FALSE; EXIT} ENDLOOP; IF normalCase THEN RETURN [Rope.Cat["$", r]]; IncludeDirectory[env, "Atom"]; RETURN [ Rope.Cat["Atom.MakeAtom[", Convert.RopeFromRope[r], "]"] ]; }; MakeInstanceStuff: PROC[env: Environment, inst: CD.Instance] = { r: Rope.ROPE_NIL; HandleProp: PROC [key: ATOM] = { val: Rope.ROPE _ CDCommandOps.ToRope[CDProperties.GetInstanceProp[inst, key]]; IF ~Rope.IsEmpty[val] THEN { r: Rope.ROPE _ Rope.Cat[ "CDProperties.PutInstanceProp[inst, ", AtomToRope[env, key], ", ", RopeToRope[val], "];" ]; IncludeDirectory[env, "CDProperties"]; LocalStatement[env, r]; }; }; IF CDSymbolicObjects.IsSymbolicOb[inst.ob] THEN { l: CD.Layer; owner: ATOM; name: Rope.ROPE _ CDSymbolicObjects.GetName[inst]; IF ~Rope.IsEmpty[name] THEN { r _ Rope.Cat["CDSymbolicObjects.SetName[inst, ", RopeToRope[name], "];"]; LocalStatement[env, r]; }; l _ CDSymbolicObjects.GetLayer[inst]; IF l#CD.undefLayer THEN { r _ Rope.Cat["CDSymbolicObjects.SetLayer[inst, ", LayerIdent[env, l], "];"]; LocalStatement[env, r]; }; owner _ CDSymbolicObjects.GetOwner[inst]; IF owner#NIL THEN { r _ Rope.Cat["CDSymbolicObjects.SetOwner[inst, ", AtomToRope[env, owner], "];"]; LocalStatement[env, r]; }; } ELSE { HandleProp[$SignalName]; HandleProp[$InstanceName]; } }; SortPred: PriorityQueue.SortPred = { p1: CD.Position _ CDBasics.BaseOfRect[CDInstances.InstRectI[NARROW[x]]]; p2: CD.Position _ CDBasics.BaseOfRect[CDInstances.InstRectI[NARROW[y]]]; IF data=$y AND p1.y#p2.y THEN RETURN[p1.yKšœK˜KKšœ!˜!—šœ;˜;KšœD˜DKšœ!˜!—Kšœ=˜=Kšœ:˜:Kšœ0˜0KšœžœΠfs-œžœ˜dKšœ5˜5Kšœ+˜+Kšœ9˜9Kšœj˜jKšœ]˜]Kšœ"˜"Kšœ ˜ Kšœ˜Kšœ"˜"Kšœ(˜(Kšœ˜—K™šŸœžœ˜%Kšœ˜Kšœ˜Kšœžœ!˜4Kšœžœžœ˜K˜Kšœ˜Kšœ2˜2Kšœ6˜6K˜Kšœ(žœ˜.KšœH˜HK˜Kš œžœ£œžœžœ˜_Kšœ8˜8K˜Kšœ˜Kšœ+˜+Kšœ5žœ˜9Kšœ1žœ˜5Kšœ3žœ˜7Kšœ0žœ˜4Kšœžœ˜Kšœžœ˜Kšœ˜Kšœ#˜#šœ*˜*Kšœ˜Kšœ˜Kšœ˜Kšœž˜ Kšœ˜—Kšœ˜—K˜šŸœžœžœ˜IKšœ5˜5Kšœžœ˜Kšžœ˜Kšœ˜—K˜šŸœžœžœ˜KKšœ5˜5Kšžœ˜Kšœ˜—K˜šŸœž œžœ˜GKšœ2˜2Kšœ%˜%Kšœ˜—K˜šŸœž œžœ˜GKšœ=˜=Kšœ1˜1Kšœ˜—K˜šŸœž œžœ˜DKšœE˜EKšœ5˜5Kšœ˜—K™šŸœžœ˜-šžœžœ˜Kšœžœ˜Kšœ£Dœ˜`Kšœ˜—Kšœ˜—K˜šŸœžœžœ"žœ žœžœžœžœ˜pKšžœ'žœ˜4Kšœ˜—K˜š Ÿ œžœžœžœžœžœ˜QKšžœžœ˜#Kšœ˜—K˜š Ÿœžœ žœžœ žœ˜9Kšœžœžœ˜š‘œ˜Kšžœžœ ˜#Kšžœžœžœžœ ˜2Kšžœ ˜Kšœž˜ Kšœ˜—Kšœ0˜0Kšžœžœ ˜"Kšœ˜—K˜šŸ œžœ#žœžœ žœžœ ž œžœ žœ˜Kšœ˜Kšœ ˜ šž˜šžœ,žœ˜4šžœžœ˜Kšœ5˜5—Kšœ/˜/Kšžœ˜K˜—Kšœ˜Kš œžœ£œžœžœ˜>Kšž˜—Kšœ˜—K˜šŸœžœžœ žœžœžœžœ˜VKšœžœžœžœ˜Lšžœ žœž˜/Kšœžœžœ˜Kšžœžœ˜—Kšœ˜—K˜š Ÿœžœžœ žœ žœ˜ZKšœžœ˜ Kšœžœ˜Kšžœžœžœžœ˜Kšœ˜šžœžœ˜Kšœ)˜)K˜—Kšœ˜Kšžœžœ˜7šœ˜Kšœ˜Kšœ˜K˜—Kšœ#žœ˜*Kšœ˜K˜—K˜š Ÿ œž œžœ žœ žœ˜Dšžœžœ£˜"Kšžœ ˜Kšžœ ˜Kšœ˜—Kšœ˜—K˜š Ÿ œž œžœžœ žœ˜Bšžœžœ£"˜4Kšžœ˜Kšžœ˜Kšžœ˜Kšžœ˜Kšœ˜—Kšœ˜—K˜š Ÿ œž œžœžœ žœ˜Ršžœžœžœ˜#Kšœžœ˜ Kšœ žœ#žœ˜CKšœ˜šœžœ£5œ˜FKšžœ ˜Kšžœžœ ˜Kšœ˜—Kšœ˜K˜—Kšžœ˜Kšœ˜K˜—š Ÿœžœžœ žœžœ˜AKšœ;™;Kšœ8˜8Kšœ˜—K˜š Ÿ œžœžœ žœ žœ˜Kšžœ˜Kšœ žœ˜&Kšœ˜Kšœ!˜!Kšœ˜K˜—Kšœ˜—K˜šŸœž œžœ˜CKšœ˜Kšœ4˜4Kšœ%˜%Kšœ˜—K˜šŸ œžœžœžœ˜JKšœA˜AKšžœžœ%žœ˜Išžœžœžœžœ˜'Kšœ7žœžœžœ˜_Kšœžœ˜ Kšœ žœžœ˜Kšœžœ˜ Kšœžœžœ˜Kšœžœ žœ˜*K˜%Kšœ0˜0Kšœ7£œ˜WKšœ?˜?Kšœ+£œ˜3Kšœ™š žœžœ)žœžœž˜FKšœžœ+˜1Kšœ%˜%šžœžœžœ˜Kšœ ˜ Kšœ0˜0K˜—šžœžœ žœ˜Kšœžœ+˜7Kšœ ˜ Kšœ3˜3Kšœ!£ œ˜1Kšœ˜—Kšžœžœ˜ Kšžœ˜—Kšžœžœ£œ˜7Kšœ£%œ˜=Kšœ£œ˜7Kšœ™šžœžœžœž˜.Kšœžœ žœ˜5K˜šŸœžœžœ˜&Kšœ žœžœ˜Kšœžœ£œ˜Kšœžœ˜&Kšœžœ˜"Kšœžœžœ˜!šžœžœ˜Kšœžœ£œžœ˜J—šžœ#ž˜-šœ ˜ Kšœ.˜.Kšœ2˜2Kšœ£œ£˜'Kšœ˜Kšžœ žœ0˜@Kšžœ.˜2Kšœ˜—šœ˜Kšœ.˜.Kšœ žœ˜K˜—šœ˜Kšœ.˜.Kšœ žœ˜K˜—šžœ˜ Kšœ˜Kšœ2˜2Kšœ£œ£˜'Kšœ˜K˜——Kš žœ1žœžœ3žœžœ žœ˜…šžœ žœ˜Kšœ žœ˜šœ ˜ Kšžœ£Xœ£˜lKšžœ˜Kšžœ˜Kšžœ˜Kšœ˜—K˜—šžœ˜šœ ˜ Kšžœ£X˜bKšžœ˜Kšžœ˜Kšžœ˜Kšœ˜—K˜—Kšœ˜Kšžœ žœ˜.Kšœ˜—K˜Kšœ˜Kšžœ˜ —K˜K˜šœ™Kšœžœ˜Kšœ£œ£œ˜CKšœ˜—šœ™Kšœ£3œ˜Dšžœ žœžœ˜Kšœ<˜<—Kšœ£œ˜Kšœ˜—Kšœ£œ˜Kšœ˜šžœ žœ˜Kšœ;˜;Kšœ+£œ˜@K˜—Kšœ žœ˜ Kšœ˜—šžœ˜K˜6Kšžœž˜K˜—Kšœ˜—K˜š Ÿ œž œ žœžœžœ˜>Kšžœ˜!Kšœ˜—K˜š Ÿ œž œžœžœžœ˜KKšœžœ˜ Kšœžœ˜Kšœ žœ ˜šžœžœžœ ž˜Kšœžœ˜Kš žœžœžœ žœžœ˜EKšžœ˜—Kšžœ žœžœ˜-Kšœ˜Kšžœ £œ£œ˜DKšœ˜—K˜šŸœžœžœ˜@Kšœžœžœ˜K˜šŸ œžœžœ˜ Kšœ žœ@˜Nšžœžœ˜šœžœ ˜Kšœ£#œ˜'Kšœ˜Kšœ£œ˜Kšœ˜Kšœ£œ˜Kšœ˜—Kšœ&˜&Kšœ˜K˜—Kšœ˜—K˜šžœ)žœ˜1Kšœžœ˜ Kšœžœ˜ Kšœ žœ$˜3šžœžœ˜Kšœ£Οsœ€œ˜IKšœ˜K˜—Kšœ%˜%šžœž œžœ˜Kšœ£€œ€œ˜LKšœ˜K˜—Kšœ*˜*šžœžœžœ˜Kšœ£€œ€œ˜PKšœ˜K˜—Kšœ˜—šžœ˜Kšœ˜Kšœ˜K˜—Kšœ˜—K˜šŸœ˜$Kšœžœ6žœ˜HKšœžœ6žœ˜HKšžœ žœ žœžœ ˜0Kšžœ žœžœ ˜$Kšžœ ˜K˜—K˜šŸœžœžœ žœ žœžœžœžœ˜}Kšœ$˜$šžœžœ˜šžœžœ˜Kšœ˜Kšœ£*œ#£œ£˜aK˜—šžœžœ žœ˜-Kšœ)˜)Kšœ0˜0KšœK˜KKšœžœ˜6Kšœ£œ£œ˜EKšœ˜—šžœžœžœ˜*Kšœ+˜+Kš œžœ£œ£œžœ˜MKšœž˜Kšœ˜—šžœžœ!žœ˜.Kšœ+˜+Kšœžœ£(œ£œ£œžœ£žœ˜rKšœžœ˜Kšœ˜—šžœžœžœ˜+Kšœ+˜+Kš œžœ£(œ£œžœ˜OKšœžœ˜Kšœ˜—šžœžœžœ˜!Kšœ!˜!Kšœ£œ˜ Kšœžœ˜0Kšœ£œ£œ˜9Kšœ˜—šžœ˜Kšœ£ œ˜Kšœ!˜!Kšœ£œ˜-Kšœžœ˜0Kšœ£œ£œ˜+Kšœ˜—Kšœ˜—Kšœ˜—K˜šŸœžœ ˜8Kšœžœ@˜Hšžœžœžœ˜Kšœ;˜;Kšœ˜Kšœ˜Kšœ˜Kšœ˜Kšœ˜Kšœ˜Kšœ˜Kšœ˜Kšœ˜Kšœ˜Kšœ!˜!Kšœ$˜$Kšœ˜Kšœ%˜%Kšœ'˜'Kšœ˜Kšœ˜—Kšœ˜—K˜K™Kšœ>˜>KšœI˜IKšœ6˜6Kšžœ˜K˜K˜K˜—…—HΆao