аЯрЁБс>ўџ ўџџџ     џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџfџџџџџџџџџџџџэёoTVџџџџпHCompObjџџџџџџџџџџџџнpi21RcY n`єЮ›ЭЊ`Žpk+mCBУђ,mCBУfџџџџџџџџџџџџ%сo`bџџџџ"˜CompObjџџџџџџџџџџџџ pi39_ke n`єЮ›ЭЊ`Ž№YbmCBУ№YbmCBУMBD000158D1џџџџ ]iCBУ ]iCBУMBD00018167џџџџџџџџџџџџ ]iCBУ ]iCBУMBD000216ABџџџџ ]iCBУ ]iCBУMBD00027291џџџџџџџџџџџџ ]iCBУ ]iCBУMBD0002D0BDџџџџ ]iCBУ ]iCBУMBD0003077Fџџџџџџџџџџџџ ]iCBУ ]iCBУMBD00038938 џџџџ ]iCBУ ]iCBУMBD00039408џџџџџџџџџџџџ ]iCBУ ]iCBУMBD0003FC47 џџџџ ]iCBУ ]iCBУMBD0005BA94џџџџџџџџџџџџ ]iCBУ ]iCBУMBD0005D5AD џџџџ ]iCBУ ]iCBУMBD00064346џџџџџџџџџџџџ ]iCBУ ]iCBУMBD0006AC8B џџџџ ]iCBУ ]iCBУMBD00083767џџџџџџџџџџџџ ]iCBУ ]iCBУMBD0009FC3Eџџџџ ]iCBУ ]iCBУMBD000AF2E1џџџџџџџџџџџџ ]iCBУ ]iCBУMBD000C8744џџџџ ]iCBУ ]iCBУMBD001D1CF3џџџџџџџџџџџџ ]iCBУ ]iCBУMBD00201C79џџџџ ]iCBУ ]iCBУMBD0061EB36џџџџџџџџџџџџ ]iCBУ ]iCBУMailEnvelopepџџџџ–_VBA_PROJECT_CUR"џџџџџџџџm ]iCBУ `ГmCBУCtls џџџџџџџџџџџџpVBAџџџџџџџџ# ]iCBУАй mCBУўџџџўџџџ  !ўџџџ#$%&'ўџџџ)*+,-./0123456789:;<=>?@ABCDўџџџFGHIJKLўџџџNOўџџџQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~€№РFр€щZр€щZр€щZр€щZ RMmccain.xls#Ъм#Ъм#Ъм@2зiЮЭЇwн5ЦZ ‚ ˜EШЂƒLm^C2ЩЫЎV]qсВБYнˆdЁЄH.д•`АщtДŠАUЯЙям7wЦˆ‹Ь пмsю=?пЙ?яЦp­і+!Вє3РС Pxurpp% нЈе№hHЃпыb­ЎёˆЂЖZ]‹GCђ5ЄVЃ3ЇZk]•кV-Н.yКQЋ'zќ…jеъu№0ЈY2sXщR­ЎФ4ћhєЛ]Ќ5еђiЋ5еСУ5KgЫћфБW>OP—Е4њТв>ѓ§пїьсУыёt"жwьmТМ~Ёц э…ˆп”pUTЈпOКЭoЪ5/Ї‡/_ЮзvУ.яjлб?UяЕ^=ЕфЭМ{]Э.yЮSxxщqxrh7$ъЭоњ#ќ§=ђYИЎzн~џ@mвяoсŸљ˜к№л2NSМЋЉь Ын№ѕžLonГйјВF[vбћ‘ќљ}јžPјiбћМОшБ-#[О2њexŒэ1ИьёјьЂvMЮHZЮ,ЫќЂNQ…pœP$м$œHо _b˜ЙЌœ/OўысБНMё™›D™њŒЫ~•1‡‚ь;чэŽyЩя[œњЄg>зG$юс>f.пС'>гђџшibPС’K8OrUѓ™ ~Цwў69}+Пyгlч„П/ќrёї­iж–8DG[ч=™xFoXw&%kgюBбzѓŠж›PДО™EыŽ­u{‚pPті‹ќVб3 №ПAР@@ё  їќe Range SizeRange midpoint UpperLimit Lower LimitGammaAlphaSample Data Sets:џ o cc МЭЩ€ Ш$,  dќЉёвMbP?_*+‚€%Сƒ„MCAPTURE FAX BVRPм4Cя€ъ odШШLetterџџџџDINU"4Т ŽЁ"dШШр?р?U} Ž } U} Ž } U } Њ } Ž     § § § § § Н№Ž@•@&Рœ@в§DРDР&Š@џDРDР§  § Н•@…@•@џМLўРL§РўМL§РLќРН №Ž@•@№Ž@•@НРr@Рb@Рr@џџН •@…@•@…@Нр…@рu@р…@џџН Рr@Рb@рu@рe@Н‘@<”@Рœ@џp‡@џН р…@рu@h@h€@Н@@ |@р…@џi@џН ‘@<”@‘@<”@Н Œ@Š@P”@џy@џН @@ |@‰@P„@НР‚@Рr@Р‚@ џ џН  Œ@Š@Ј–@Ј†@Н @o@шŒ@ h@ џ ‰@ џН Р‚@Рr@Р‚@Рr@Н ‘@<”@ Рœ@ џ p‡@ џН @o@шŒ@@o@шŒ@Н 0@ь“@ 8˜@ џ @@ џН ‘@<”@‘@<”@Н i@р…@ ‰@ џ Р‚@ џН 0@ь“@0@ь“@Н а‘@и“@ Рœ@џ р…@џН i@р…@i@р…@Нp‡@\’@8˜@џ‰@џН а‘@и“@а‘@и“@Н@u@š@Рœ@џp—@џН p‡@\’@p‡@\’@Н@Š@0–@Рœ@џ@@џН @u@š@@u@š@Нрu@|•@8˜@џР’@џН @Š@0–@@Š@0–@Н№”@H’@Рœ@џ@@џ Н рu@|•@Y@ˆ“@О Н №”@H’@№”@H’@О  О О О О О О О О з>ф 0F†Вvvvvvvvvvvvvvvv€0ьк№в№№К№( № №№‚’ № s №HПA ?Р@џ€УCommandButton1№1Œлi№]` |Hщ1 6$ЄъРœForms.CommandButton.1pP>Ж@я7К Sheet1 ThisWorkbookџџџџLџџџџ)–__SRP_21/"џџџџ>__SRP_20џџџџџџџџџџџџ"dSheet1MNџџџџ(9A@ oџџ`–˜ $œA@ kџџ8oџџ0–јр -- Updated: 04-JUL-03 (MKT)]ђD8џџџџ]ђDPBџџџџ]ђhрI -- Check to see if the User opened this workbook from the File|Open menuр+ rather than from the Tools|AddIns menu: !.œџ ,ў 0“ ,!2 4œр+N "itemTitle" is a Public Constant set in the modAddInMenu Declarations sectionЉrдј ,!6›GЗ'jчц‚@yџџЈkџџ џ ,ўШ€ЧїФ3 œ $8›G !>б< 0B@:j $@'(‘З B(DИ0Е0@З ($0(6З B(D†$http !Ж! has been installed as an Add-In.'*0;09 * FЖ.Use the Tools Add-Ins command to uninstall it.'*0 + * J (A@HР0  *kџџ€kџџxр -- Put item on File menuA@LoџџH–€]ђDшЏЏjЉџ ,ў 0“Ш ,! N!œшк$бЗ'8zџџјkџџ№џ ,ўШiџџи–]ђD˜Ж'@џ ,ў 0“ ,! N!œ ,!2'@zџџxkџџpџ ,ўШiџџXџџџџPџџџџkДAttribute VB_Name = "ThisWorkbook" ŒBasŒ0{00020P819-0C$0046} |GlobalаSpac’False dCreatablPredeclaIdБTru BExposeTemplateDeriv’BustomizD2' --   object for RMmccain6 ‚upd€2d: 04-JUL-03 (MKT) Option Tlici"t Pub€ InstalledProperly As Boрolean€[€, Sub …д_Aаddin„(1€‰%= dEndq[UniУ"ХСDeleteMenHu ]BeРEeClРb(Canc elH2Х(f (NЈot У)@We9OAMСAIf_OиpenA-bUbBim РOInTit€)S@Цng т …msgТ@caitemSТCheck to see if the User •Рsnœt@и w„и from‚FiHle|. mBW')ra@rРanЅG TР‚s|B,s :*If Ї.Is)РinЬTFРЊEaИch -`DCsCЏ€@ С.#"=bcThen ' "С"" is $a ФWCoaFnt€t `modS‚ЁF DbwaС_s§€ckaхІa‚8ZiExit @K хG%Nex џ‚7E сQЦpЋ ГFЂCo vТ(I„ЋCZ„,.  =n ­„:=щ.FulbЃk B #/= GetgB ppРˆт+.EnС—Event>s Ѕфœ%сТ s(љЇ ).G.Ѕ… з C‹/‰Ёf€(Ъ.ТЬ& " has be?`I„Œc Р\`-In.€ЧO  & vРbCrLf  Рjbg"ba, s coиmma œ@pue˜ XM MsgBox Ѕ` ,@ In€•mт&~,Ѓ5B-‡+iGeDНPњuЃH @КЁ;‚r# q–ЅFunтEРZРIbn(Hwb)hЅC DР”i`UС"`Varјian@Чсžz`Uaaу/= wb#O-IўnМ&vq5у5є у џЁ9И5aХ9g†-ѓtџUemёm1ЕЭp "D#пdd`-w џпr)пШт џF4џ%\џ$ L\џўЊ Е\џ54џ/ џVќј\џ\џMDџ @0 l\џ= §П> џ1xџ\џє\џ! \џ Д \џAcџ%lxџFDџ%\џ$ L\џўЂ4џ§ѓ ьўьў,&)\џьў54џєџ\џ! \џ Д \џ џ$ l џ *1tМфˆЋЙ!sЕQ'џџ#ˆЖџџџџџџџџ@џџ“Ч>Д][B–l\Вr}о+РFгDЩW–$DЉ їЈ№’3ZџџџџџџџџџџџџxгDЩW–$DЉ їЈ№’3Z“Ч>Д][B–l\Вr}о+џџMEџџџџџџџџџџпџџ4џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ [LџџџџSџџџџS”џџџџ>"џџџџџџџџџџџџџџџџџџџџLџџџџџџџџLџџџџ”џџџџš џџџџ<8џџ<<џџ<џџџџџџN0{00020819-0000-0000-C000-000000000046}Ј  % %џџџџ X`џџџџџџџџˆ|џ+џџџџџџџџ” ˜`џџџџџџџџ@|џkџџџџџџџџ  ” "ј`џџџџџџџџј|џkиџџџџ$”iƒ$џџџџ џџ џџџџџџ€ &€`џџџџџџџџШьўkџџџџџџџџ( ”`„(џџџџxџџџџџџџџџ`„*8tџџџџџџџџџ@„,џџџџdџџџ џџџџџџ,8`џџџџџџџџрџkР џџ, 5МIƒNџџџџ џџ џџр€џџџџiƒўџџџџџџџџџ џџџџџџ џџџџ`„,џџџџhџџџ џџ,@џџџџ`џџџџџџџџР џkXџџ0 ?МIƒNџџџџ џџ џџx€iƒўџџџџџџџџџџџџџџџ `„,џџџџhџџџ џџ€ўџџџџџџџиџџАџџџџџџџџ%j€џџџџ4 џџ@џџџџџџџџџџџџ€Xјџџџџџџџџџџџџ˜рƒўџџџџџџџџџџџџџџџџџџџџџ‚ џџџџўџџџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(џџџџџџџџ048>@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрџџџџџџџџ  r li@ўџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџАџџџџшИ џџџџџџPџџџџ џџџџџџџџџџџџџџџџџџPџџџџџџџџџџџџџџџџџџџџhџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP џџџџјˆџџџџџџџџџџџџџџџџџџџџИџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh˜џџџџ№џџџџ.048>@@ўџџџџџbџџџ џџ @ўџШ\џџџ џџ @ўџаXџџџ џџ @ўџџџџџTџџ_ џџ @а @ўџ€Dџџџ џџ @ўџ(4џџџ џџ @ўџџџџџ$џџџ џџ џџџџа@ўџџџџџ џџџџџ pBFJHL@ўџ˜џџџ џџ @ўџАџџџ џџ @ўџџџџџ№ўџџ џџ @ўџџџџџьўџџ џџ џџџџџџџџџџџџџџџџџџџџРџџџџџџџџџџџџџџџџџџџџџџџџ˜џџџџџџџџџџџџџџџџшh џџџџP џџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜аАh8џџџџџџ џџ`8€zџџџ џџР˜ €џџџџ0@ўџџџџџdџџџ џџ @ўџ( `џџџ џџ @ @ўџџџџџ\џџ_ џџ А ( @ўџџџџџLџџџ џџ @ўџ€ <џџџ џџ @ўџ˜ ,џџџ џџ @ўџџџџџџџџ џџ џџџџ( џџџџџџџџџџџџџџџџџџџџXџџџџ˜џџџџџџџџџџџџџџџџџџџџx џџџџџџџџџџџџџџџџШ H џџџџ0 џџџџџџџџџџџџџџџџџџџџџџџџр џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџx А  h@џџџџџџџџ`@` xџџџџџ  x ј ` џџџџ0@ўџџџџџdџџџ џџ @ўџ `џџџ џџ р @ўџџџџџ\џџ_ џџ   @ўџџџџџLџџџ џџ @ўџ` <џџџ џџ @ўџx ,џџџ џџ @ўџџџџџџџџ џџ џџџџ џџџџ8џџџџрАџџџџџџџџџџџџрАџџџџџџџџџџџџ`8D4џџџџџџџџџџџџџџџџџџџџџџ ?\@$*\Rffff*0x405c1c9f*\R0*#14*\R0*#1*\R0*#e*\R1*#1bc*\R1*#ce*\R1*#1bd*\R1*#df*\R1*#285$*\Rffff*1<405c1c9fпџџџџ8ўЪI€ ,€ $0€ џџџџ€X€ џџџџ€ `€ џџџџ"p x€€ џџџџ"ˆ˜€ џџџџ"   ЈИРШ€ џџџџ"а€ $и€ џџџџ€ € € € џџџџ€ P(€ 2x АР dа8P X ` p (qx /  А AР а 4р B )`x€€ џџџџ€ ˆЈА€ џџџџB И€ Ра р ј   € џџџџB (€ 0@H X p €ˆ  џџџџАр% -- ThisWorkbook object for RMmccain6рS–р -- updated: 04-JUL-03 (MKT)Эџџ ] ђDр–З'oџџx–Xџ/ џltџ*# џ*1tџ/ џ)'$џ'4џxџMџ@ѕ@tџMDџ@ 64џ$џ = 8 XџTџtџxџdџ  џ\џьў4џ$џДhdџ$ LQdџ[`џhџўr\џ] hџџA<џl џA,џћ36<џ,џPєџpzџџ/ hџўs\џ!џ/Ј `h0`џ\џhџdџ<џ,џџЬ|џ-Cxџdџ$ LQdџ[`џhџўr\џr hџџA<џl џA,џћ36<џ,џehџџA<џ`1xџ5<џџ/ hџўs\џ+џ/€ `|4xџ`џ\џhџdџ<џ,џџ 4 8888%rU€€€ !џџџџџџџџD$Y!`џџџџџџџџ$™!`  џџџџџџџџ(й!`$$џџџџџџџџY#$!`((џџџџџџџџ,Y!`,џџџџџџџџџџqџџџџ/#,™!`0џџџџџџџџџџqџџџџ/0)џџџџ@4n0Ьh=WsЕТgџџcˆЖџџџџџџџџDџџЯM™[RDНfiБaи{ РFџ р‰ЦГ@ЇbйƒЛѓrџџџџџџџџџџџџx,CommandButton1, 1, 0, MSForms, CommandButtonџ р‰ЦГ@ЇbйƒЛѓrЯM™[RDНfiБaи{џџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPSLџџџџSџџџџS”џџџџsџџџџ6"џџџџџџџџš"џџџџ<џџџџџџN0{00020820-0000-0000-C000-000000000046}џџџџи Rџџџџ`џџџџџџџџ|џkџџџџџџџџH”€ўџџџџџџџhџџ@џџџџџџџџ% %*€Sџџџџ4<p@џџџџџџџџxџџџџџџџџƒўџџџџџџџиџџџџџџџџџџџџџџ%‚ Pџџџџўџџџџџўџџџџџџџџџџџ%џџџџшџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџИџџџџџџџџTяОџџџџXџџџџџџџџ@xџџџџџџџџџџџџ@xџџџџџџџџрАHL<џџџџџџџџџџџџџџџџџџџџџџ ?\@*\R8004*#5d$*\Rffff*0y405c1c9f$*\Rffff*0o405c20dcпx8џџџџ<ўЪ€€ џџџџ"  џџџџ0Эџџx– TB@VџџџџoџџXџџџџPџџџџ БAttribute VB_Name = "She@et1" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’Bustom izD2Control–CommandButton1, 0, MSForms, ŠOption €Rlicit` P€E€I ˆSub 1_C@k() RngModel2.Show End rU€€€ №и с[сW \џџџџЙ[ 8IЁ1\Ј§џџ`Сџџџџџџџџџџџџ__SRP_2!џџџџE__SRP_3џџџџџџџџџџџџMŽNameUtility+(џџџџPc __SRP_f&џџџџ†€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ<\СЉ\џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџˆEyЯH$ў €Јw$ 4 8ArU€€€ џџџџџџџџH$Й`Hџџџџџџџџ сџџџџ@< 4n№$диџџџџёU sЕкLџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP6 џџџџџџџџš џџџџLџџџџLџџџџ”џџџџ<џџ<џџџџџџџџџџР Zџџџџ`џџџџџџџџјєўkџџџџџџџџџџ„`„\џџџџzџџџџџ`„^@tџџџџџ`„`џџџџdџџџ џџx`„bџџџџTџџџ џџ``„dџџџџDџџџ џџџџџџџџџџƒXџџџџџџ№џџџџџџџџџџџџџџ%Xџџџџџџџџџџџџџџџџџџџџpˆ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџА`џџџџ0џџџџШџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрџџџџџџџџџџџџџџџџџџџџ˜јџџџџfjln@ўџH@џџџ џџ @ўџџџџџ<џџџџџ @ўџ:џџџџџ р @ўџџџџџ8џџ/џџ Ј @ўџџџџџ(џџџ џџ @ўџџџџџ$џџџ џџ @ўџxџџџ џџ @ўџџџџ џџ @ўџџџџџєўџџ џџ џџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџШџџџџџџџџџџџџџџџџџџџџџџџџџџџџР?\@$*\Rffff*0z405c1c9f:*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#..\..\..\..\..\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*#f$*\Rffff*12405c1c9f*\R1*#d3*\R1*#df*\R1*#285пўЪ€€ џџџџ"€ џџџџ€€$0€>X€>˜€>и€ џџџџ€ џџџџ€ F/`8€˜АШ%р ј  $"  $"H $"p ˜  Ј€ џџџџИџџџџШЭџџx–]ђD@р, loop variable]ђDXр,sheetnames variable]ђDpр,.position in string variable for Instr function]ђDˆр,.position in string variable for Instr function]ђD р,.position in string variable for Instr functionр?--look at each sheet name to see if output sheets already existџџџ \ў f!hЌЌ•џџџџ \$f!'^џџџџџџЌ ^ЖD…'` џџЌ ^Жa…'bџџџџЌ ^Жt…'dџџџџ ` b d ЌœЗ'j ^Ќ›GЌ'ljnMenu ^Ќ›G ^Ќ$ n'ljЗ' ^Ќ›G ^Ќ$ n'ljїФ3 ^Ќ ›G ^Ќ$ n'lj 0yџџ`kџџXџ \ўШ B(oџџ@џџџџ8џџџџВAttribute VB_Nam e = "8Utility" Option Explicit @ Pub, @Sub ShZs().Dim i As Integer>'loop varia ble ;sLK?;SЇng'@sheetnЎs! ADat1? %A‚ƒ„…ўџџџ‡ˆ‰Š‹ŒŽўџџџ‘ўџџџ“”•–—˜™š›œžŸўџџџЁЂЃЄЅІЇЈЉЊЋЌ­ЎЏАБВГДЕЖЗИЙКЛМНОўџџџРСТўџџџФўџџџЦЧўџџџЩЪЫЬЭЮЯабвгдежзийклмнўџџџпўџџџстуфхцчшщъыьэюя№ёђѓєѕіїјљњћќ§ўџVjnt'posiзin sУƒ-…E for€U€ р funcO.2Y.3R.Ь'--Зk at ea(ch ‚Ÿ   to see if€ outputУs alreadРy exis}&*FРEiˆSA_s.Cou€STo 1 Step -1l E0Dr=Р‡@jsp(i).С‰j=c€Yv(1,@С,№ "D"€’…B\Q JaL 3€%InЭtQI If +2 ‚ 15 Th en‡&PriorO@C= Tru€ЇE$С@Len(ЕУ8)@6B€Jt0K 7 Rigˆht$„, 1Ш>UR8293СŒExit >‡@End IfуN`ext i!KЁSub rU€€€€~|  ‘I!1A9Y>сEљEфшFа|/<џ@џ$ И@џ 0l<џфzџєєџ@џўk8џy8$џkzџD(џ%@џ$ И@џ d$џWџ`1tџ)@џ$џ5џѕltџѕў§§i(џќіdџѕltџѕў§§i(џќіTџѕltџѕў§§i(џќіDџ%dџTџћ”џDџћ”џ((џ]ћ36џџmєџzltџJѕЧ єћ§§З ltџJѕЧ$ѕltџ §З ltџJѕЧFѕltџ §З ltџJѕ Чhѕltџ §З y zџe8џ1ˆ|4tџdџTџDџ @џ$џџџєўk__SRP_eџџџџџџџџџџџџgRngModel2џџџџџџџџџџџџHМl__SRP_4 ,џџџџ„˜6__SRP_5џџџџџџџџџџџџ’]rU€€€ џџџџџџџџ$`§џџџџџџџџџџџnrU€€€ џџџџџџџџ№$`@џџџџџџџџ$A`Dџџџџџџџџ$`Hџџџџџџџџ$С`Lџџџџџџџџ$`Pџџџџџџџџ$A`Tџџџџџџџџ$`Xџџџџџџџџ$С`\џџџџџџџџ$``џџџџџџџџџџџџџџџџџџџџџџџџџџшИ№”@џџџџџџџџџџџџџџџџџџџџџџ ?\@$*\Rffff*0o405c20dc*\R0*#12*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\..\..\WINDOWS\System32\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#55<*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#..\..\..\..\..\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*#10*\R0*#11$*\Rffff*11405c1c9f*\R1*#e8*\R1*#df*\R1*#285*\R0*#13*\R0*#1*\R0*#14*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#..\..\..\..\..\P&фtЮ,ь.А]sЕЙжџџˆЖџџџџџџџџьџџЖэKЃвќFД$ЦЫJ&нЛѕЅoА†LЌеFтЕПиЎЦ5Њ/Ы РOЋЫVЅ;G‚h‡5Tћ` LЄ №g\cџџџџџџџџџџџџx‡5Tћ` LЄ №g\cЖэKЃвќFД$ЦЫJ&џџMEџџџџџџџџџџпџџ\џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@SPџџџџSџџџџSџџџџSџџџџ6"џџџџџџџџџџџџџџџџџџџџš џџџџLџџџџLџџџџ”џџџџџџџџџџџџџџџџLџџџџ џџџџ”џџџџš џџџџLџџџџџџџџLџџџџ<`џџLower Domain Limit must be smaller than the Upper Domain Limit иЖLower Domain Input ErrorA@H|џџkџџdџџјЖ3Lower Domain Limit must be greater or equal to zero иЖLower Domain Input ErrorA@H|џџkџџˆoџџ€– ]ђ`]ђx ъ!dЗ œЖ#Please enter the Upper Domain Limit иЖUpper Domain ErrorA@H|џџkџџ ъ!d$кœЖ7Please enter the Upper Domain Limit in numerical values иЖUpper Domain Input ErrorA@H|џџxkџџp ш!dX'ф ъ!dX'ц цЌœ ц'№ ф цœЖ=Upper Domain Limit must be larger than the Lower Domain Limit иЖUpper Domain Input ErrorA@H|џџИkџџАdџџЈЖ,Upper Domain Limit must be greater than zero иЖUpper Domain Input ErrorA@H|џџHkџџ@oџџ8–]ђа є!dЗ œЖ&Please enter the number of domain bins иЖBin Input ErrorA@H|џџШkџџР є!d$кœЖ+Please enter bin number in numerical values иЖBin Input ErrorA@H|џџPkџџH є!dX 'д дЌœ д'іdџџЖ%Bin number must be greater than three иЖBin Input ErrorA@H|џџШkџџРoџџИ–ш]ђ( њ!dЗ œЖ&Please enter the number of simulations иЖSimulation Input ErrorA@H|џџ@kџџ8 њ!d$кœЖ2Please enter simulation number in numerical values иЖSimulation Input ErrorA@H|џџИ kџџА њ!dX 'д дЌ д­œ д'ќ ќ r(ўdџџ` Ж.Simulation number must be between 1 and 65,536 иЖSimulation Input ErrorA@H|џџ kџџј oџџ№ –@ !d'2oџџа –€р1Put in default values in text boxes from last use]ђDР]ђDи]ђ№ ! Ж MidDomain.ini'< <$Зœ А' < ЋЬ   ЂЁ   ЂЁ   мЂЁ   рЂЁ   іЂЁ   ќЂЁ   №ЂЁ   ьЂЁ м$ ж(d р$ Ж(d і$ є(d ќ$ њ(d №$ ъ(d ь$ ш(d Vdџџ Ќd'мЖ100 ж(dЌd'рЖ100 Ж(dЌ<'іЖ60 є(dЌ'ќЖ1 њ(dЌш'№Ж1000 ъ(dЌ'ьЖ0 ш(dkџџh р('Default setting for outputs and optionsЗ |(ЎЗ ‚(ЎЗ †(ЎЗ Š(ЎЗ v(ЎЗ (ЎЗ ”(ЎЗ ˜(ЎЗ |(xЗ (xЗ'zр!Disable seconday analysis optionsЗ Ќ(ЎЗ А(ЎЗ В(ЎЗ Д(ЎЗ'ИЗ'КЗ'МЗ'ОЗ œ(xЗ'ЄЗ'ІЖ'Ж'2Ќ r(x ќ r(ўЗ r(toџџ –р(write default values for form's next use]ђDˆ]ђD ]ђИ ! Ж MidDomain.ini'< А' < ЋЬЖ>Initialization file for Program MidDomain. Updated: 30-Oct-02'  і жЖwritten: '  і ж і мж і рж і іж і ќж і №ж і ьж Voџџџџџџџџџџ№џџџџёДAttribute VB_Name = "RngModel2" " €Bas€0{A5F5BBDD-B06F-4C86-ACD5-46E2B5BFD8AE}{2FAA35C6-09CB-4FC0-AB56A53B478268} dGlobal!‹SpacoFalse ŠCreatablPre declaIdдTru BExpose0TemplateDeriv–Customiz‹DOption 0liciРt P€"€& Sub cmd Activ€_C€k() ProgressBar1.Visiƒoƒ]If Output4.0Valu ThenƒEmpiricalDiќst†€  €2УEnd IfУїCР DР[€ ЩhGra†2&†SHimsЪ3aPR$awF3b CI D>RndVa rF5 Mdpt…‰6ЬSizeЩ.7Ь€Ц8ЩCall Range§CЬbC$rФ™AXР…@Cancel …U€nload M€ЏгAVInРƒ1KУw.‚2€›"& 2?4 Ф!IF Ѓ tAnРalysisCca&WithТ(!1sј.EnjHs lE_H&Midpoint= чД outљпthЫ| Ÿц њ #'tb0Spp2џг&УХv'+‡BcЩmпРuR2#`uИ4гCъ5™6™7“Ћ%1џчЗЂ$—'d!OCe–џrФ•qЇДHUC ф”БD”QЄ“K@ЌTyp\e1Аш ХbВ2хГ2м _=’l[=џШBc;G"ї/;xk§П8lyy%BП88‚MП8ќ= иб ѕП8ˆѓяП8,LcГ1,б УПП<‚Ук87ФbџpУЙ8Љ8Н™8Нџ‰8З™0§н8 ŠЎž:_*`­ё–Ѓ8љЇl &”д|а1Б (”`RNum$`вUBox("How many random numbРers?", Г#0  Check„er€1000ФС`s< 1 ODr У> 5`0&0 œУ= ChoЋ aЄ frщ`1-а,A0с<1žu 'Ѕ  (vbƒˆ) џФІ—ЄЯ Ъ ЏЃМџЏЄц@r€Ы‡N‡$Nї’2dNmQRNs"џП.ЗOgТя э ЦC/ §O[ 9 ž/ /  8) ~4џ;ё/ $ +_3ї  /NБ<я’ џGW† УЙp;xwQ[aŸh 2П^Ÿ ў “Я^С^чS3%П^џr#УП^ШП^ЩП^ёcП^ЗЖ^KД = True  Output6.Enabl4edи7l z4.`Value v>EmpiricalDist>FalZs №1:2  End Sub Private WithoutRangeSizes_C@lick()„SimType1aы € b 2“2 FMidpoјintFH’‰HƒSHtbInёSpp1_AfterUpd@NAGУGDim x As LoŒngƒCIf 0.TexСpРtty` ThenC A‘MsgBox "Please en€ number of e… species", vbExclamation, "SC + Error"ExiЮtƒ~A:IfCC€*(Not IsPNume€œ(M.)Ц)ы,D* in20al vСЙ/d E/A3C0x€ЁCLng.F8x > 0CH1€tCounexћ CEйХfF„c%Іr ….muРsbe gre@Cr than zeroo555T2TT2ƒTTsimul оdTT€.Tcш<#џT‹jTпkсCaзkЁџЃJTу@pTР”[§пS"ЧS@„1пSџˆџˆУЖЫ‰LowerХїSYЈDou€шу §ЁЊzC %‰ џVьVthe`ЕР Doma”LimitџPub…_Њ/U/UdRџB /+`СDя а\UUМ "* ПaЯ+Џ7Y‘UИDbl7ј ѓz `UpperYј >=ЪW‘’ТъYГ +z_g’rЂњ EXsmall€sBXБђКПtџOtOtJtc1}Ÿ – хb@or equ№qtўo_cу}Zu9џTŸ$4Т9!89аŽ9ВАw9B € ц e ’ПЛŽџJ9ЏŽ3%–%ЏŽžRџc+ПŽџ™@~я 9€Н9ќ "* џџy9бУ ПП9`M3 П9П9zП9і ƒЕ9zУw =я9ƒъ Sх9larўgй9џ1п9яп9?xћXџп9б9 о9ЯœWЗъo? w AйUУBiќnsŸ91‘9/Ч'8џС‚ 88б‘бRgЧкdгqb`/"ПœџЂ›@ 886 qљqr € БХQЙЯpO7ў / bK1 / % бг/œРЕ(tbInputBins.Tex t) If x >= 3 pThenL\œNРum = xL0ElseFMs@gBox "V number must be greatthan three", vbExclamation,7” Error"YExit SubEnd I2f   0Privf) tbSims_AfбvUpd(т4DimхAs Lјong…#`€~ƒ‰С€vEmpty …sPlease e nle…yof sаimulkssL „ /wS(Not Is€Щericw€цvф)ЁW‡P…-inAAal vaшlueџ. ‰jA.[Тx@VCLngŠ-ƒХŸ1 A@yx <€= 65536Ь4G@;ŠЃСPro€™ssBar1.Maџƒ CCSЌР Ed Ўbetween ˆ1 aР#65,Р"Пt…EXЏTitlegЏ‚€OtbBB|  жUserFoРrm_ActТЦС 'Put >de`faultФ=!t@ boxes €from lax†uЁ|fFileс. С-РgI@_ger B enamedStrikAwor!Op9#_p`ЇCs#ф,~ „ aп@,ЇS€ppCountї ? РPї ЊјimњUpperLiФmixLownХнР1ЂMр.`;(рїфЦA"'2,яџCЯ$ ърJр`џO bi‡‚‰ЇёˆClo€ЛЎBу/ЋˆcE!р100'40'"џшк @їц(ьC%р6Я `f&"60ПЉ "DЁ iї1шы7!0Ÿ t•! џйWрo тЖ…‡Q''DФIsett D for ouJt@‹sТXopqƒs Г SOт1.Enрabled€!BЙN2П +s3aШFvaЖдbпQ/г4лЯЧ5ЯЧ6ЯЧЦ7ЯЧ1.VazZГAnalysiLsO" €i!€ƒalDi^= w'p1 seРconday 3 zWithRangeSizesп б 6€]poinўtВЇqяш3i= ЈА-TyАpe1aebomа2пA2мs8я6h#b1 З"ю2[”|@"Ф75~ѕпуъ…t5Џ 0ц`qЋisiР1K„tebД„QueryBQ(Cancel €, ‚Mod†eXРT'wri€l†<0m's nџс†т…G„` Q#˜†Аџ†`ёZЯ…Я…Ч…^сљƒ Ђ‚Ц‚уA SRР"Ini@tializbП Žf’KВam * D ѓШd: 30-Oct-02}”Wт?‡№†!ten:" ’Nowc—q­еjuјm, iПБSgПџr臇dПБ—bѓнТ$ UqЃaaSспС ъъъџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ АI!AўўўЈ§џџ` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџДйaaјјјџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџИсСy‚€`IџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџМсС‘   ‚€`‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРйaЉљљљџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџФ СџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџШйaсњњњџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЬ9лллž§џџ` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџайa)   џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ>,ѕ €/;LcmdCanceltezœ1>$е€9#Frame1isЇ> ѓџ ўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9ВqD;<=>?@VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} RngModel2 Caption = "Mid-Domain Simulations" ClientHeight = 10128 ClientLeft = 48 ClientTop = 432 ClientWidth = 9528 StartUpPosition = џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџдйaIќќќџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџиЁЁaхххџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџмйay§§§џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрйa‘џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџфйaЉ   ž§џџ`‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‰W—зW—зW—зW—зW—здchџ%xџ! (xџ,€xџ(Hџxџ! јxџ єHџchџ]ћ3xџ5HџgєџzcHџxџ! ьxџ №xџ5Hџ$Hџxџ! ьxџ єHџќVzxџ5Hџ$Hџxџ! №xџ єHџќVzxџ5Hџ$Hџxџ! єxџ єHџќVzxџ5Hџ$Hџxџ! 0xџ єHџќVzxџ5Hџ$Hџxџ! јxџ єHџќVzxџ5Hџ$Hџxџ! ќxџ єHџќVzxџ5Hџ$Hџxџ! xџ єHџќVz xџ5Hџ$Hџxџ! $xџ єHџќVz xџ5Hџ$Hџxџ! 4xџ єHџќVz xџ5Hџ ќfhџ%xџ! (xџ,€xџDд$ xџHџ8џPl§œxџ $ xџ$ xџDєџzєz$ Dєzєџzџ$ єМєxџ! xџ PxџќfXџxџ! xџ №xџ5Xџєxџ! xџ PxџќfXџxџ! xџ №xџ5Xџєxџ! xџ PxџќfXџxџ! xџ №xџ5Xџєxџ! xџ PxџќfXџxџ! xџ №xџ5Xџєxџ! Иxџ Œxџєџxџ! ьxџ Pxџєџxџ! №xџ Pxџєxџ! єxџ Pxџєxџ! 0xџ Pxџєxџ! јxџ Pxџєxџ! ќxџ Pxџєxџ! xџ Pxџєxџ! $xџ PxџcXџxџ! ьxџ №xџ5XџєџzќfXџxџ! №xџ №rU€€ ШVY]!˜ЌАДИМРФШр С"™"q"”й"œ ЄЈy##™$и $С% %Щ (!&€'y(ˆ1)Й** ,+`,‘-/q.љ0 0Pq1y2q/A3 4pЩ4!6q5‘6x 8а‘I!a й8:99Q9i9‰:9Ё9С9й9:Yљ:q7‰7 <С7й7-]Љ]б]љ]џџџџY]49až§џџ`Щџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ89 ž§џџ` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ<99ž§џџ `‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@9iž§џџ `ЩџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџDЁЁЩїїїџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHсС шшш‚€ `IџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџL))Qџџџџџџџџџџџџ0€`0€`Щ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPЁЁдддџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџT99еееž§џџ`‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџX9Yжжжž§џџ`Щџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ\ЁЁyкккџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ`9™мммž§џџ`Iџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџd9Снннž§џџ `IџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџhсСщццц‚€ ` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџl 1чччџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџp Yщщщџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџt yыыыџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџx ™эээџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ|сСЙююю‚€`‰џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€сСсььь‚€`Щџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ„ щђђђџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџˆЁЁ іііџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџŒ )яяяџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ I!qџџџЈ§џџ`Iџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ”сС‘ёёё‚€` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜ЁЁБ   џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџœ Щџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ щAџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЄ Й№№№џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈйaћћћџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЌ xџ5XџќfXџxџ! єxџ №xџ5XџќfXџxџ! 0xџ №xџ5XџќfXџxџ! јxџ №xџ5XџќfXџxџ! ќxџ №xџ5XџќfXџxџ! xџ №xџ5XџќfXџxџ! $xџ №xџ5Xџєzєzєzєz$М$ xџXџ дєџxџ! xџ Pxџєџxџ! xџ Pxџєxџ! xџ PxџќfXџxџ! xџ №xџ5Xџєxџ! xџ PxџќfXџxџ! xџ №xџ5Xџєxџ! Иxџ Œxџєxџ! ьxџ Pxџєxџ! №xџ Pxџєџxџ! єxџ Pxџєџxџ! 0xџ Pxџєџxџ! јxџ Pxџєџxџ! ќxџ Pxџєџxџ! xџ Pxџєџxџ! $xџ PxџcXџxџ! јxџ №xџ5XџєzќfXџxџ! ьxџ №xџ5XџќfXџxџ! №xџ №xџ5Xџ$д$ xџXџ\ (hџxџ! 4xџ єhџcXџ]ћ3xџ5hџЭC'˜ў'Иў'иў'јў(џш:8џNHџHџ:XџNhџhџ §З6hџHџџјўиўИў˜ўvќ3єывvќ3ѕ ЁьмХЫC'˜ў'Иў'иў'јў(џш:8џNHџHџ:XџNhџhџ §З6hџHџџјўиўИў˜ўvќ3єывvќ3ѕ ЁьмХќfhџxџ! 4xџ №xџ5hџф $ ,xџhџHџџјўиўИў˜ўˆTєџzєzєzєzєџxџ! xџ Pxџєxџ! $xџ PxџBT$ xџˆTєzєџzєzєzєxџ! xџ Pxџєџxџ! $xџ Pxџc(џT$ xџ дєxџ! xџ PxџќfXџxџ! xџ №xџ5Xџєxџ! xџ PxџќfXџxџ! xџ №xџ5Xџєџxџ! xџ Pxџєџxџ! xџ Pxџєџxџ! Иxџ Œxџєxџ! ьxџ Pxџєxџ! №xџ Pxџєџxџ! єxџ Pxџєџxџ! 0xџ Pxџєџxџ! јxџ Pxџєџxџ! ќxџ Pxџєџxџ! xџ Pxџєџxџ! $xџ PxџcXџxџ! јxџ №xџ5XџєzќfXџxџ! ьxџ №xџ5XџќfXџxџ! №xџ №xџ5Xџ$д$ xџXџT$єzєzєџzєz$џ$$ T$єzєzєzєџzv$$ ŒD,pџtџ! Аtџ l>pџFPџ]ќg`џћ3tџ5Pџd3'№ў'џ:0џN@џ@џѕ0:`џNPџPџ 6Pџ@џџ№ў+pџtџ! Аtџ l>pџFPџ Уtџ5PџЧ3'№ў'џ:0џN@џ@џѕ0:`џ NPџPџ 6Pџ@џџ№ў#pџtџ! Аtџ llpџPqxџ/pџtџlxџѕлlxџ{!=3'№ў'џ:0џN@џ@џѕ0:`џ"NPџPџ 6Pџ@џџ№ўѕŒD$ $pџtџPџ@џџ№ўŒD,pџtџ! Иtџ l>pџFPџ]ќg`џћ3tџ5Pџd3'№ў'џ:0џN@џ@џѕ0:`џ#NPџPџ 6Pџ@џџ№ў+pџtџ! Иtџ l>pџFPџ Уtџ5PџЧ3'№ў'џ:0џN@џ@џѕ0:`џ NPџPџ 6Pџ@џџ№ў#pџtџ! Иtџ llpџPqxџ/pџtџlxџѕлlxџ{$=3'№ў'џ:0џN@џ@џѕ0:`џ%NPџPџ 6Pџ@џџ№ўџџŒD$ $pџtџPџ@џџ№ўєЌ,dџhџ! аhџ l>dџFDџ]ќgTџћ3hџ5Dџd3'фў'џ:$џ&N4џ4џѕ0:Tџ'NDџDџ 6Dџ4џџфў+dџhџ! аhџ l>dџFDџ Уhџ5DџЧ3'фў'џ:$џ(N4џ4џѕ0:Tџ)NDџDџ 6Dџ4џџфў$dџhџ! аhџ lldџќ3ttџ/dџhџ$dџhџ! Шhџ lldџќ3tlџ/dџhџ otџєысlotџ~* otџolџсg3'фў'џ:$џ(N4џ4џѕ0:Tџ+NDџDџ 6Dџ4џџфўЄ3'фў'џ:$џ(N4џ4џѕ0:Tџ,NDџDџ 6Dџ4џџфўџџ˜Ќ$ $dџhџDџ4џџфўєЌ,dџhџ! Шhџ l>dџFDџ]ќgTџћ3hџ5Dџd3'фў'џ:$џ-N4џ4џѕ0:Tџ.NDџDџ 6Dџ4џџфў+dџhџ! Шhџ l>dџFDџ Уhџ5DџЧ3'фў'џ:$џ/N4џ4џѕ0:Tџ0NDџDџ 6Dџ4џџфў$dџhџ! аhџ lldџќ3ttџ/dџhџ$dџhџ! Шhџ lldџќ3tlџ/dџhџ olџєысlolџ~1 otџolџсg3'фў'џ:$џ/N4џ4џѕ0:Tџ2NDџDџ 6Dџ4џџфўЄ3'фў'џ:$џ/N4џ4џѕ0:Tџ3NDџDџ 6Dџ4џџфўџџ˜Ќ$ $dџhџDџ4џџфўŒD,pџtџ! мtџ l>pџFPџ]ќg`џћ3tџ5Pџd3'№ў'џ:0џ4N@џ@џѕ0:`џ5NPџPџ 6Pџ@џџ№ў+pџtџ! мtџ l>pџFPџ Уtџ5PџЧ3'№ў'џ:0џ4N@џ@џѕ0:`џ6NPџPџ 6Pџ@џџ№ў#pџtџ! мtџ llpџPqxџ/pџtџlxџѕрlxџ{7=3'№ў'џ:0џ4N@џ@џѕ0:`џ8NPџPџ 6Pџ@џџ№ўŒD$ $pџtџPџ@џџ№ўДl,pџtџ! tџ l>pџFPџ]ќg`џћ3tџ5Pџd3'№ў'џ:0џ9N@џ@џѕ0:`џ:NPџPџ 6Pџ@џџ№ў+pџtџ! tџ l>pџFPџ Уtџ5PџЧ3'№ў'џ:0џ9N@џ@џѕ0:`џ;NPџPџ 6Pџ@џџ№ў#pџtџ! tџ llpџPqxџ/pџtџlxџѕрlxџѕжФ.lxџ{<v<ь§j`џ%tџ! (tџ,tџf3'№ў'џ:0џ9N@џ@џѕ0:`џ=NPџPџ 6Pџ@џџ№ўџŒl$ $pџtџPџ@џџ№ў`( tџxџ! 8xџ l>tџ§З>xџ($ tџxџT0hџѕ lџ?$@ HAlџ 0BlhџC*1tџ/hџlџtџ DєџЦ 'Hџ Epzџ5Hџltџkzџєџў]pџkzџџF pџkzџџF !kzџџG $kzџџG 7kzџџG <kzџџG 1kzџџH *kzџџH 3!MXџ@Hџ IHџ§ўhџlџ! Аlџ h/hџlџ5Hџ3$MXџ@Hџ IHџ§ўhџlџ! Иlџ h/hџlџ5Hџ37MXџ@Hџ IHџ§ўhџlџ! мlџ h/hџlџ5Hџ3<MXџ@Hџ IHџ§ўhџlџ! lџ h/hџlџ5Hџ31MXџ@Hџ IHџ§ўhџlџ! Шlџ h/hџlџ5Hџ3*MXџ@Hџ IHџ§ўhџlџ! аlџ h/hџlџ5Hџkzџ§=н ѕd{!Jlџ! Аlџ hlџ ѕd{$Jlџ! Иlџ hlџ ѕ<{7Klџ! мlџ hlџ ѕ{<Llџ! lџ hlџ ѓшы~1Mlџ! Шlџ hlџєы~*Nlџ! аlџ hlџєџlџ! ьlџ Plџєџlџ! №lџ Plџєlџ! єlџ Plџєlџ! 0lџ Plџєlџ! јlџ Plџєlџ! ќlџ Plџєlџ! lџ Plџєlџ! $lџ PlџcHџlџ! ьlџ №lџ5HџcHџlџ!  lџ №lџ5Hџєџzєlџ! lџ Plџєlџ! lџ Plџєlџ! lџ Plџєlџ! lџ PlџєzєzєzєzќfHџlџ! 4lџ №lџ5Hџєџzєz$:XџONHџHџlџ! 8lџ €lџ5Hџ O§С>єы§jXџ%lџ! (lџ,lџv<ь§jXџ%lџ! (lџ,lџќfXџ%lџ! (lџ,€lџD,tџpџhџlџHџ<є0hџѕ lџ?$@ HAlџ 0BlhџC*1tџ/hџlџ'Hџ Epzџ5Hџltџkzџєџў]PCpџlpџkzџџQ !:XџRHџ SHџћя8џ`1pџ6Hџ8џlpџkzџџQ v!kzџџT v$kzџџT v7kzџџT v<kzџџT w1kzџџUw*kzџџUkzџ§= Dє,tџpџhџlџHџ8џАTXЬ`ф48 d < @ h H|€”ИМLL8$A `dџџџџџџџџ$ `hџџџџџџџџ$С `lџџџџџџџџ$ `pџџџџџџџџ$A `tџџџџџџџџ$`xџџџџџџџџ$С`|џџџџџџџџ$`€џџџџџџџџ$A`„џџџџџџџџ$`ˆџџџџџџџџ$С`Œџџџџџџџџ,` џџџџџџџџY&&nExistUtility=@џџџџ И__SRP_6'*џџџџПм__SRP_7џџџџ-џџџџУpMidDomain.:џџџџЃuУ№дАџџџџUEsЕ…МџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(6 џџџџџџџџ< џџ<џџџџџџџџџџи+џџџџ`џџџџџџџџАXџo@ џџџџ Œiƒ<џџџџ џџџџџџџџ€h|ќ`„џџџџxџџџџџ’nђєџџџџƒџџџџџџЈџџџџџџџџџџџџџџ%џџџџ`џџџџџџџџPџџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџИџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPˆh`џџџџzџџџ џџxPџџџџџџџџџџџџА@ўџџџџџhџџџ џџ @ўџџџџџXџџџ џџ џџџџhџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€џџџџџџџџџџџџџџџџџџџџџџџџџџџџx?\@$*\Rffff*11405c1c9f*\R0*#11пўЪ€€ џџџџB € b€x€ˆ˜ АР€Шаирџџџџ№Эџџx–р[ -- taken from PeterNorton's Visual BASIC for Windows--part of making a default values file†!x]ђ`ЩxЗ' А' < ЋЬџџџџџџ V”zџџ8Ѓ0З'х iџџџџџџџџџџiБAttribute VB_Name = "ExistUtility" Option Explicit Pub, Func6b(Filen!†As SЎng) Boolean ' -- taken from PeterNorton's Visual BASIC for Windows--part of making a default val ues fw  Dim inumvInteg”erOПrrTGoTo Doe№sNotчƒ€}0Trueƒ#= 0Freek Op#€]†s) F€(Inhput8#ƒC`lose €/ti— @:…@FalsAResu€ШNexКEnd rU€€€€~| :|HK6єџpzџ'Xџ pxџ5Xџ€ kxџєџў]kxџ§=єpzџ§ џџtџ$H$ XџkrU€€€ џџџџџџџџ(`§џџџџџџџџџџџЁ0nrU€€€ џџџџџџџџT$ `§џџџџџџџџџџџЉ!Щ!n"q" >ffff*12405c1c9f\1*\R1*#1b0*\R1*#212$*\Rffff*17405c1c9f$*\Rffff*1;405c1c9f$*\Rffff*1:405c1c9f*\R1*#ce$*\Rffff*13405c1c9f$*\Rffff*16405c1c9f$*\Rffff*14405c1c9f$*\Rffff*15405c1c9f№*\G{45936D76-2F41-41A6-B8D4-A62951CE5FA6}#2.0#0#..\Forms\MSComctlLib.exd#Microsoft Windows Common Controls 6.0 (SP6)*#36$*\Rffff*19405c1c9f$*\Rffff*18405c1c9f*\R1*#d3$*\Rffff*0z405c1c9f*\R0*#1d*\R0*#1e$*\Rffff*0o405c20dc*\R0*#14*\R0*#1*\R1*#df*\R1*#285*\R0*#15п1ўЪp€€ џџџџ€D (џџџџœ#˜sЕi-џџЖџџџџџџџџPџџџџџџџџџџџџџџxџџRRџџџџџџџџџџџџџџџџџџџџRxR@@џџџџџџџџџџџџџџџџџџџџMEџџџџџџџџџџпџџlџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@Hџџ"Hџџ*(џџd џџh> џџџџš џџџџš џџџџš џџџџLџџџџš џџџџš џџџџš џџџџš џџџџџџџџLџџџџš џџџџš џџџџLџџџџš џџџџ џџџџ”џџџџš"џџџџџџџџџџџџLџџџџ”џџџџџџџџџџџџHџџџџџnџџ`„@џџџџ@џџџџџr li`„\џџџџ>џџџџџ€`„Bџџџџ<џџџџџns a`„Dџџџџ:џџџџџ˜`„Fџџџџ4џџџџџmula`„Hџџџџ0џџџџџ)`„дџџџџ.џџџџџspec`„Jџџџџ$џџџџџ)`„Lџџџџ"џџџџџspec`„N џџџџџ)'`„P˜џџџ џџoint`„R џџџ џџј`„Tџџџџ№ўџџ џџ emp`„Vирўџџ џџ`„X@аўџџ џџecie`„ZРўџџ џџlysi`„\џџџџАўџџ џџ);`„^PЈўџџџџrepl`„`Іўџџџџcal „bр ўџџИ@% „fјœўџџиrepl %`„jp˜ўџџџџoint`„lX”ўџџџџ)6 „n(ўџџ(lace% „pШŒўџџHts%P p  ъ€№иџџџџ@џџџџџџџџъ€ьPџџџџ@џџџџџџџџъ€ќxџџџџ@џџџџџџџџъ€ЄШ џџ џџ@џџџџџџџџъ€z№$џџ џџ@џџџџџџџџъ€М@*џџ џџ @џџџџџџџџъ€~h.џџ џџ @џџџџџџџџъ€ˆИ4џџ џџ@џџџџџџџџъ€Žр8џџ џџ@џџџџџџџџъ€20@џџџџ@џџџџџџџџъ€šXHџџ џџ@џџџџџџџџPx(ШX0џџџџџџџџџџџџџџџџx џџџџџџџџPИџџџџрџџџџ№x@€џџџџШhА№ џџџџџџџџџџџџ Ри@ џџџџџџџџџџџџџџџџрƒ џџџџџџЈџџџџџџџџџџџџџџ№А Рˆ@јџџџџ8рР0€€hџџџџ€ А  џџџџ џџџџ№џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0 Pџџџџџџџџџџџџџџџџ8Аџџџџ4імр№ьЄd@ўџ˜ `џџџ џџ џџџ@ўџр Pџџџ џџ џџџ@ўџH Šўџџџџ џџџ@ўџИ ˆўџџџ џџџp H 1џџџџа H 4џџџџ@ўџџџџџ„ўџџџџ џџџ@ўџШ tўџџ џџ џџџ@ўџ( pўџџ џџ f@ўџј `ўџџ џџ f@ўџX Pўџџ џџ f@ўџ @ўџџ џџ f@ўџ@ 0ўџџ џџ џџџ@ўџ,ўџџ џџ џџџ@ўџџџџџўџџ џџ ЫЫЫ@ўџp ўџџ џџ ЫЫЫ@ўџˆ ќ§џџ џџ f@ўџџџџџь§џџ џџ fш иHTrІZz~@ўџр ъ§џџџџ fј И Dџџџџ@ўџ ш§џџџ џџџ р Dџџџџ0 р Gwwww@ўџ@ ц§џџџџ wwwX  J@ўџx ф§џџџ h @ Jwww @ Mџџџџ@ўџ  т§џџџџ џџџИ x Pџџџџ@ўџи р§џџџ –––Ш   PЫ–––№   Uwџџџ@ўџо§џџџџ –––и l@ўџ8м§џџџ (lwwwPoџџџџ@ўџ`к§џџџџ џџџx8rџџџџ@ўџ˜и§џџџ џџџˆ`rџџџџА`uwџџџ@ўџРж§џџџџ и˜x@ўџјд§џџџ шРxwwwР~џџџџ@ўџ в§џџџџ џџџ8јџџџџ@ўџXа§џџџ џџџH џџџџp „wџџџ@ўџ€Ю§џџџџ ˜X‰@ўџИЬ§џџџ Ј€‰wwwа€џџџџ@ўџрЪ§џџџџ џџџјИžџџџџ@ўџШ§џџџ џџџ рžџџџџ@ўџ0Ц§џџџџ ВВВHЁ@ўџXФ§џџџ p0Ё@ўџ€Т§џџџџ џџџ˜XЉџџџџ@ўџxР§џџџ џџџЈ€ЉџџџџИ€ЋџџџџШ0ЎџџџџhрЏwззз  €ftv|~jl@ўџџџџџМ§џџџџ @ўџ И§џџ џџ @ўџ8Д§џџ џџ џџџ@ўџџџџџА§џџ џџ џџџ@ўџ№Ќ§џџџџ`џџџPЗџџџџ@ўџ Њ§џџџџ џџџИxК–@ўџ@Ј§џџџ Ш К МиИ„ŒŽ’ќ€‚џ@ўџЄ§џџџџ џџџ0№рџџџџ@ўџ §џџџ џџџXрџџџџ@ўџhž§џџџџ –––€@х@ўџ œ§џџџ hхИhђ@ўџШš§џџџџ wwwр іwwww@ўџ@˜§џџџ www№Шіwwww0Шћwwwwи„ˆŠŒŽB”К@ўџ ”§џџџџ`X@ўџh’§џџџџ €@ @ўџШ§џџџ h Иh @ўџPŒ§џџџџ`р @ўџ№Чџџџџ Ш@ўџ ˆ§џџџ №(№h––МОšФ˜џџ@ўџx„§џџџџ %Pk@ўџ`€§џџџ Иxkџџ@ўџШ~§џџџџ р p@ўџ|§џџџ  №ШpџџўџџџШzџџ@ўџ(z§џџџџ @~@ўџˆx§џџџ P(~ўџџџџџx(ƒџџџџ@ўџшt§џџџџ` `@ўџАr§џџџџ Шˆ‘џџџџџџ@ўџp§џџџ иА‘8%А“џџ@ўџ€l§џџџџ`(ш™џџ@ўџ8j§џџџџ Pš@ўџаh§џџџ џџџџ`8šџџp8œџџ˜x ўџџџџџ@ўџЈd§џџџџ Р€ђ@ўџ`§џџџ шЈђџџ@ўџј^§џџџџ 0аї@ўџ0\§џџџ џџџџ јїџџџџџџHјџџ@ўџXZ§џџџџ €p0 џџ @ўџИX§џџџ %€X ДџџџџЈXџџџџџџ@ўџT§џџџџ`аД€@ўџрR§џџџџ џџџџјИ8%@ўџ@P§џџџ р0рˆ@ўџ L§џџџџ`џџџџX%џџџџ@ўџhJ§џџџџ %€@&џџ@ўџШH§џџџ h&џџИh(ўџџџџџ@ўџ8D§џџџџ`р ,џџ@ўџ№B§џџџџ Ш-џџ@ўџˆ@§џџџ Ј№-(№/`PЈ3@ўџ`<§џџџџ x8šўџџџџџ@ўџH8§џџџ  `šџџ @ўџА6§џџџџ џџџџШˆŸ№@ўџш4§џџџ иАŸАЎџџ @ўџ2§џџџџ џџџџ(шВP@ўџp0§џџџ 8В`З@ўџа,§џџџџ`ˆHФџџ@ўџ˜*§џџџџ аАpХ@ўџј(§џџџ џџџџР˜Хџџџџџџш˜Чџџ@ўџX$§џџџџ`€аЭџџЈ@ўџ "§џџџџ 8јЮџџ@@ўџ€ §џџџ H Ю`p а@ўџџџџџ§џџџџ`˜Xдўџџџџџ@ўџЈ§џџџџ Р€е@ўџџџџџ§џџџ аЈеџџрЈзџџџџџџџџџџ`лџџџџџџџџˆ РАџџџџџџџџџџџџРx€џџџџџџџџџџџџџџџџџџџџ Tџџџџџџџџџџџџџџџџџџџџџџџџџџџџ,h ?\@$*\Rffff*12405c1c9f(*\Rffff*12405c1c9f\0(*\R€€€ €(€0€ џџџџ€8€@€H€P€X€`€h€p€x€€€ џџџџ€ ˆ€&Ј€&а€,ј€&(€,P€,€€8А€,ш€:€LX€JЈ€Fј€F@€8ˆ€8Р€Dј€@@€8€€:И€>ј€<8€&x€B €8ш€D €Dh€ џџџџ€ џџџџ"А€ џџџџ€ *И€ 8ш€  € џџџџ€68€Tp€ZШ8 (€ џџџџ€ `€*€€А€а€№€: €P €p €  €0  €0а €< €<@ €<€ €<Р €< €<@ €<€ €>Р €@ €@ €&` €4ˆ €2Р €<ј €<8 € џџџџx  Ј € џџџџ€ Р и ш € џџџџ€ $ј  8P"h" И($Ш€ џџџџ€ №4 H+`€ џџџџ€ 6x&rА^3и 8HP€ џџџџ€ "X€ ˜7И а€ џџџџ€ р 78 P€ џџџџ€ 0`Ј Ш$и$ (€ џџџџ8€ џџџџ€ џџџџ. @p+ˆ€ џџџџ M ^3Р  08€ џџџџ€ 6@&rx^3  € џџџџ€ $ H `7€ ˜€ џџџџ€ $Ја ш7 € џџџџ€ 40h €ˆ3  (8@ H€ џџџџ€ NXЈ6(Р.$ј (€ џџџџ8€ џџџџ€ H@ˆ tP r3  Ј А€ џџџџ€ JР€ џџџџ€ џџџџ€ @€ :X€ џџџџ ˜€ џџџџ€ 2Ј€ џџџџ€–р€ џџџџx˜  @4Иј  @4H P Xp"ˆ АР Ш а р€ џџџџ€ H№€ џџџџ8|P p€ џџџџ €9ˆAЈР&Gи 7  (0€ џџџџ€ .8€ џџџџ h& x € џџџџ Ј€ џџџџ И'Шш€ џџџџ€ џџџџ€ џџџџ€ @€ TP€ џџџџ Ј€ џџџџИ|аJ№€ џџџџ|(JH`€ џџџџh$€€ џџџџ8€ џџџџШ€ џџџџ 6,р€ џџџџ€ џџџџ tQ € џџџџ * € џџџџ8А € џџџџ ш € џџџџ № € џџџџ€ D!€ џџџџH! `!  €! $! $И! р!€ џџџџ€ џџџџ€ F№!€ џџџџ8"€ џџџџ€ џџџџ€ HP"€ џџџџ ˜" А"€ џџџџР"Ш" Fр" # # #€ џџџџ  # 8#€ џџџџH#P# Fh# ˆ# ˜#  #€ џџџџ Ј#€ џџџџИ# а# р# №# '$ $8$@$€ џџџџ H$ X$kh$Jˆ$  $ А$ 'Р$р$ј$%€ џџџџ% % 0% @% 'P%p%ˆ%%€ џџџџ ˜%. Ј%& и% & '&0&H&P&€ џџџџX& "p& €& "& &€ џџџџ Ј&|И&Jи&№& ' ''8'X'`'€ џџџџh' "€' ' " 'А'€ џџџџ€ џџџџИ'€ џџџџ€ џџџџ€ џџџџ€ @Р'€ V(€ џџџџ X(€ џџџџh(|€(J (И(€ џџџџР(|и(Jј()€ џџџџ)$0)€ џџџџ8@)€ џџџџx)€ џџџџ )˜)4Ј)€ џџџџ >1р)€ џџџџ tQ *€ џџџџ ˜*€ џџџџ€ :Ј*€ џџџџш* +  + $0+ $X+ €+€ џџџџ€ џџџџ€ J+€ џџџџр+€ џџџџ€ џџџџ€ Jј+€ џџџџ€ џџџџ H, `,p,x, F, А, Р, Ш,€ џџџџ а, ш,ј,- F- 8- H- P-€ џџџџ X-€ џџџџh- €- -  - 'А-а-ш-№-€ џџџџ ј- .k.J8. P. `. 'p..Ј.А.€ џџџџИ.а. р. №. '/ /8/@/€ џџџџ H/. X/& ˆ/ А/ 'Р/р/ј/0€ џџџџ0 " 0 00 "@0P0€ џџџџ X0|h0Jˆ0 0 И0 'Ш0ш011€ џџџџ1 "01 @1 "P1`1€ џџџџh1€ џџџџ€ џџџџ€ @p1€ RА1€ џџџџ 2€ џџџџ2|02JP2h2€ џџџџp2|2JА2|Ш2Jш23€ џџџџ3$ 3€ џџџџ803€ џџџџh3€ џџџџ $€3 ˜3  3€ џџџџ 4(Р3€ џџџџ tQј3€ џџџџ *p4€ џџџџ84€ џџџџ Ш4€ џџџџ а4€ џџџџ€ Dр4€ џџџџ(5 @5  `5 $p5 $˜5 Р5€ џџџџ€ џџџџ€ Fа5€ џџџџ6€ џџџџ€ џџџџ€ H06€ џџџџ x6 6 6Ј6 FР6 р6 №6 ј6€ џџџџ 7 70787 FP7 p7 €7€ џџџџ ˆ7˜7 7 FИ7 и7 ш7 №7€ џџџџ ј7€ џџџџ8 (8 88 H8 'X8x88 ˜8 Ј8 И8 'Ш8ш899€ џџџџ 9 9k09JP9 h9 x9 'ˆ9Ј9Р9Ш9€ џџџџа9ш9 ј9 : ':8:P:X:€ џџџџ `:. p:&  : Ш: 'и:ј:;;€ џџџџ€ џџџџ ; "8; H; "X;h;€ џџџџ p;|€;J ;И; а; 'р;< <(<€ џџџџ,&0<€ џџџџ`<|x<J˜<А< Ш< 'и<ј<= =€ џџџџ (= "H= X= h= "x=ˆ=€ џџџџ€ џџџџ=€ џџџџ€ џџџџ€ @˜=€ Tи=€ џџџџ 0>€ џџџџ@>|X>Jx>>€ џџџџ˜>|И>Jи>|№>J?(?€ џџџџ0?$H?€ џџџџ8X?€ џџџџ?€ џџџџ $Ј? Р? Ш?€ џџџџ€ џџџџ ш?№?4@€ џџџџ 4)8@€ џџџџ tQp@€ џџџџ ш@€ џџџџ€ :ј@€ џџџџ8A PA  pA $€A $ЈA аA€ џџџџ€ џџџџ€ JрA€ џџџџ0B€ џџџџ€ џџџџ€ JHB€ џџџџ€ џџџџ ˜B АBРBШB FрB C C C€ џџџџ  C @CPCXC FpC C  C€ џџџџ ЈCИCРC FиC јC D D€ џџџџ D€ џџџџ(D HD XD hD 'xD˜DАD ИD ШD иD 'шDE E(E€ џџџџ 0E @EkPEJpE ˆE ˜E 'ЈEШEрEшE€ џџџџ№EF F (F '8FXFpFxF€ џџџџ €F. F& РF шF 'јFG0G8G€ џџџџ€ џџџџ@G "XG hG "xGˆG€ џџџџ G| GJРGиG №G 'H H@HHH€ џџџџ,&PH€ џџџџ€H|˜HJИHаH шH 'јHI8I@I€ џџџџ HI "hI xI ˆI "˜IЈI€ џџџџАI€ џџџџ€ @ИI€ јI€ џџџџ J|(JJHJ`J xJ'ˆJЈJРJШJ€ џџџџ аJрJ€ џџџџџџџџ№JЭџџx№^ђ^ђ0^ђH^ђ`pџџH№x^ђ^ђЈ^ђР^ђи^ђ№^ђ^ђ ^ђ8pџџxрDeclare Public Variables] ђDАр)upper limit of domainџџ] ђDир)lower limit of domain] ђDPр)number of bins across domain] ђDр)number of simulations] ђDxр)number of empirical speciesЌ(] ђD р)number of simulated speciesВ(] ђD(р)'range sizes and midpoint empirical data] ђDШр)range limits empirical data€] ђDPр))empirical species richness curve analysis] ђD№р);Simulations without replacement using empirical range sizes] ђDр)9Simulations without replacement using empirical midpoints] ђDxр)6Simulations with replacement using empirical midpoints] ђD@р)6Simulations with replacement using empirical midpoints] ђD р)'output empirical species richness curve] ђDhр)'output empirical species richness graph] ђDр)3output simulation species richness curve(s)--sorted] ђDШр)0output simulation species richness curve(s)--raw] ђDИр)'output 95% simulation prediction curves] ђD№р)*output randomized midpoints, sizes or both] ђDрр).output randomized midpoint frequency histogram] ђDр)+output randomized sizes frequency histogram] ђD р)string for data title] ђ0р)4variable for the number of random numbers for tester] ђD@ р)(variable for random number tester option] ђDXр)3variable to assess existence of prior output sheets] ђD€р)3string to hold Dat extension if prior output exists–Рр#--Attempt 2 with user-defined typesр1--Simulation program for species diversity curvesр--C. M. McCain]ђр 'bin array including lower, upper, count]ђ@р Especies ranges array including lower, upper, count, size and midpoint]ђ€р Lsimulation spp ranges array including lower, upper, count, size and midpointA@4р ,set the random number generator to the timer]ђDРр,range of domain]ђDир,size of bins across domain]ђD№р, loop variable]ђDр, loop variable]ђD р, loop variable]ђD8р,*variable to select cells of empirical data]ђDPр, loop variable]ђDhр, loop variable]ђD€]ђD˜р, variable for bin counting: lower]ђDАр, variable for bin counting: upper]ђDШр,+variable for adding a sheet for data export]ђDрр,+variable for adding a sheet for data export]ђDјр,+variable for adding a sheet for data export]ђDр,+variable for adding a sheet for data export]ђD(р,+variable for adding a sheet for data export]ђD@р,+variable for adding a sheet for data export]ђDXр,+variable for adding a sheet for data export]ђDpр,.randomly generated value between Domain limits]ђDˆр,/randomly generated value between 1 and SppCount]ђD р,range to chart]ђDРр,embedded chart object]ђDрр,#column width measurement for charts]ђDјр,!row height measurement for charts]ђDр,,range variable for pasting ranges for charts]ђD0р,,range variable for pasting ranges for chartsЌ іс8hЌ мс:ˆЌ рс<Јр--Setting bins № ь '> > іX'@р -- loop to create bin array: ьЌ$8($ ь @ Ќ$8(&џ \ўЌ і’ \Ќ $8!& \$8($ \$8!$ @ \$8(&џ \ўШ і$8!&ДёhуˆЕјф> і$8(&р--Select Empirical Data ЄЗœр$$select range sizes and midpoint dataЖB мЌ 'FЖA2 F$dB@Hр/--check if first and last input cells have dataЖA2$dЖ F$dЖœЖ1Please check that you have entered empirical data иЖEmpirical Data Input ErrorA@H TA@r|џџАkџџЈр--Import Species Range Sizesџ \ўЌ м’ЖAЌ \Ќ  'F F$d \$:(,џ \ўШр--Import Species Midpointsџ \ўЌ м’ЖBЌ \Ќ  'F F$d \$:(.џ \ўШр)--determine range limits of each species:џ \ўЌ м’ \$:!,'Jр(code JЌ'J \$:!. J  \$:($ \$:!. J  \$:(&џ \ўШkџџР ІЗœр$select range range limits dataЖE мЌ 'FЖD2 F$dB@HЖD2$dЖ FЖœЖ1Please check that you have entered empirical data иЖEmpirical Data Input ErrorA@H TA@r|џџШ kџџР р/--check if first and last input cells have dataЖD2$dЖ F$dЖœЖ1Please check that you have entered empirical data иЖEmpirical Data Input ErrorA@H TA@r|џџш kџџр р--Import Species Upper Limitsџ \ўЌ м’ЖDЌ \Ќ  'F F$d \$:(&џ \ўШр--Import Species Lower Limitsџ \ўЌ м’ЖEЌ \Ќ  'F F$d \$:($џ \ўШр.make sure lower data not entered in upper dataџ \ўЌ м’ \$:!$ \$:!&œІЖSPlease check that you have not switched the placement of upper and lower limit data иЖEmpirical Data Input ErrorA@H TA@r|џџР kџџИ џ \ўШрGconvert limit data to range sizes and range midpoints for randomizationџ \ўЌ м’ \$:!$ \$:!& Ќ \$:(. \$:!& \$:!$  \$:(,џ \ўШkџџРрA'Check to see that empirical data is all within domain boundariesџ \ўЌ м’І \$:!. \$:!,Ќ  №З \$:!. \$:!,Ќ  ьЗœІЖ>One or more empirical species ranges are outside domain limits иЖEmpirical Data Input ErrorA@H TA@r|џџXkџџPџ \ўШрC'Check to see if prior output sheets exist for naming output sheetsAZр:'''-------------------------------------------------------р3--Produce species richness curve for empirical data zЗœр,--determine which species fall in which binsІџрˆif overlap between Ranges bins(i).lower to bins(i).upper and sppRange(i).lower to sppRange(i).upper then increment bins(i).count by 1џ \ўЌ м’Ќ'LЌ'Nџ BўЌ і’ \$:!$ B$8!$ \$:!$ B$8!& œ B'Lkџџј \$:!& B$8!$ \$:!& B$8!& œ B'NkџџЈ LЌ NЌœџ Dў L N’ D$8!hЌ D$8(hџ DўШyџџ8kџџ0џ BўШџ \ўШрA--export species richness per bin values (species richness curve) ~З €Зœ f!h$fбr fB@:э t.V VѕЖDataЌЌ$v(xЗЌЌ$v!x(zџ \ўЌ і’ \$8!h \Ќ Ќ$v(xџ \ўШЌЌ$vB@HqџџаkџџШр(--graph empirical species richness curve €Зœ VA|р)embed chart and formatkџџX VA~ jЗœЖEmpDat lЌ  V(dFЖEmpDat V(kџџјkџџ№р:'''-------------------------------------------------------рN--simulation procedure for sampling WITHOUT replacement; randomizing midpoints ИЗœ „З ŒЗœ f!h$fбr fB@:э f!h$f.Pkџџ№ ŽЗ ’Зœ f!h$fбr fB@:э f!h$f.Rkџџ˜џ HўЌ ќ’ H T!r(x м$8$:A€р; reinitialize values to zeroџ \ўЌ м’ \$:!, >›G \$:!. \$:(0jІ \$:!0 \$:!,Ќ  №З \$:!0 \$:!,Ќ  ьЗa № ь  ‚ ь X'^ ^ \$:(0р8 assign random value to midpointsЙџџџ \ўШр=--determine range limits of each midpoint randomized species:џ \ўЌ м’ \$:!,'Jр,code JЌ'J \$:!0 J  \$:(4 \$:!0 J  \$:(6џ \ўШр@--determine which midpoint randomized species fall in which bins м$8$:A„рA--export species richness per bin values and randomized midpoints „З ŒЗœ PB@† Pѕџ \ўЌ і’ \$8!( H \$v(xџ \ўШqџџшkџџр ŽЗ ’Зœ RB@† Rѕџ \ўЌ м’ \$:!0 H \$v(xџ \ўШqџџ`kџџXџ HўШ ŽЗ ’Зœ RB@† RA~ jЗœЖMdtDat lЌ  R(dFЖMdtDat R(kџџРkџџИ ˆЗœ PB@† Š!h$Šбr tB@ˆэ f!h$f.X XA~ jЗœЖRawDat lЌ  X(dFЖRawDat X(kџџkџџј „З ŒЗœ P мAŒ PA~ jЗœЖSrtDat lЌ  P(dFЖSrtDat P(kџџpkџџh ŒЗœ V PAŽр,select and paste CI limits VA|р,embed chart and format jЗœЖSimDat lЌ  V(dFЖSimDat V(kџџАkџџЈ ŒЗ „ЗœЗ B( PB@’З B(kџџX ’Зœ f!h$fбr fB@:э f!h$f.Z R Z$8A” jЗœЖFrqDat lЌ  Z(dFЖFreqDat Z(kџџ kџџ˜ ŽЗ ’ЗœЗ B( RB@’З B(kџџHkџџ@р:'''-------------------------------------------------------рP--simulation procedure for sampling WITHOUT replacement; randomizing range sizes КЗœ „З ŒЗœ f!h$fбr fB@:э f!h$f.Pkџџ@ ŽЗ –Зœ f!h$fбr fB@:э f!h$f.Rkџџшџ HўЌ ќ’ H T!r(x м$8$:A€р; reinitialize values to zeroџ \ўЌ м’_џџh > ‚X'^ ^ \$:(2р8assign random value to sizes \$:!. >Ќ›G \$:!, \$:(2jІ \$:!. \$:!2Ќ  №З \$:!. \$:!2Ќ  ьЗКџ \ўШр4--determine range limits of each randomized species:џ \ўЌ м’ \$:!2'Jр/code JЌ'J \$:!. J  \$:(4 \$:!. J  \$:(6џ \ўШрC--determine which range-sized randomized species fall in which bins м$8$:A„рC--export species richness per bin values and randomized range sizes „З ŒЗœ PB@† Pѕџ \ўЌ і’ \$8!( H \$v(xџ \ўШqџџ8kџџ0 ŽЗ –Зœ RB@† Rѕџ \ўЌ м’ \$:!2 H \$v(xџ \ўШqџџАkџџЈџ HўШ ŽЗ –Зœ RB@† RA~ jЗœЖSzeDat lЌ  R(dFЖSzeDat R(kџџkџџ ˆЗœ PB@† Š!h$Šбr tB@ˆэ f!h$f.X XA~ jЗœЖRawDat lЌ  X(dFЖRawDat X(kџџPkџџH „З ŒЗœ P мAŒ PA~ jЗœЖSrtDat lЌ  P(dFЖSrtDat P(kџџРkџџИ ŒЗœ V PAŽр,select and paste CI limits VA|р,embed chart and format jЗœЖSimDat lЌ  V(dFЖSimDat V(kџџkџџј ŒЗ „ЗœЗ B( PB@’З B(kџџЈ –Зœ f!h$fбr fB@:э f!h$f.Z R Z$8A– jЗœЖFrqDat lЌ  Z(dFЖFreqDat Z(kџџ№kџџш ŽЗ –ЗœЗ B( RB@’З B(kџџ˜kџџр:'''-------------------------------------------------------рK--simulation procedure for sampling WITH replacement; randomizing midpoints МЗœ „З ŒЗœ f!h$fбr fB@:э f!h$f.Pkџџ ŽЗ ’З –Зœ f!h$fбr fB@:э f!h$f.R f!h$fбr fB@:э f!h$f.Tkџџј џ HўЌ ќ’ H T!r(x р$8$<A€р9 reinitialize values to zeroџ \ўЌ р’ м ‚Ќ '` `'д д$:!, \$<(2 \$<!2 >›G >Ќ \$<(0jІ \$<!0 \$<!2Ќ  №З \$<!0 \$<!2Ќ  ьЗa № ь  ‚ ь X'^ ^ \$<(0р8 assign random value to midpointsЙџџ0 џ \ўШр=--determine range limits of each midpoint randomized species:џ \ўЌ р’ \$<!2'Jр/code JЌ'J \$<!0 J  \$<(4 \$<!0 J  \$<(6џ \ўШр@--determine which midpoint randomized species fall in which bins р$8$<A„рA--export species richness per bin values and randomized midpoints „З ŒЗœ PB@† Pѕџ \ўЌ і’ \$8!( H \$v(xџ \ўШqџџ kџџ ŽЗ ’З –Зœ RB@† Rѕџ \ўЌ р’ \$<!0 H \$v(xџ \ўШqџџx TB@† Tѕџ \ўЌ р’ \$<!2 H \$v(xџ \ўШqџџkџџџ HўШ ŽЗ ’З –Зœ RB@† RA~ jЗœЖMdtDat lЌ  R(dFЖMdtDat R(kџџh TB@† TA~ jЗœЖSzeDat lЌ  T(dFЖSzeDat T(kџџјkџџ№ ˆЗœ PB@† Š!h$Šбr tB@ˆэ f!h$f.X XA~ jЗœЖRawDat lЌ  X(dFЖRawDat X(kџџ8kџџ0 „З ŒЗœ P рAŒ PA~ jЗœЖSrtDat lЌ  P(dFЖSrtDat P(kџџЈkџџ  ŒЗœ V PAŽр,select and paste CI limits VA|р,embed chart and format jЗœЖSimDat lЌ  V(dFЖSimDat V(kџџшkџџр ŒЗ „ЗœЗ B( PB@’З B(kџџ ’Зœ f!h$fбr fB@:э f!h$f.Z R Z$8A” jЗœЖFrqDat lЌ  Z(dFЖFreqDat Z(kџџиkџџа ’З –З›G T Z$8A–j ’З –Зœ f!h$fбr fB@:э f!h$f.Z T Z$8A– jЗœЖFrqDat lЌ  Z(dFЖFreqDat Z(kџџрkџџи ŽЗ ’З –ЗœЗ B( RB@’ TB@’З B(kџџpkџџhр:'''-------------------------------------------------------рM--simulation procedure for sampling WITH replacement; randomizing range sizes ОЗœ „З ŒЗœ f!h$fбr fB@:э f!h$f.Pkџџh ŽЗ ’З –Зœ f!h$fбr fB@:э f!h$f.R f!h$fбr fB@:э f!h$f.Tkџџаџ HўЌ ќ’ H T!r(x р$8$<A€р9 reinitialize values to zeroџ \ўЌ р’ м ‚Ќ '` `'д д$:!. \$<(0_џџ > ‚X'^ ^ \$<(2р8assign random value to sizes \$<!. >Ќ›G > \$<(2jІ \$<!0 \$<!2Ќ  №З \$<!0 \$<!2Ќ  ьЗКџ \ўШр4--determine range limits of each randomized species:џ \ўЌ р’ \$<!2'Jр/code JЌ'J \$<!0 J  \$<(4 \$<!0 J  \$<(6џ \ўШрC--determine which range-sized randomized species fall in which bins р$8$<A„рC--export species richness per bin values and randomized range sizes „З ŒЗœ PB@† Pѕџ \ўЌ і’ \$8!( H \$v(xџ \ўШqџџш<kџџр< ŽЗ ’З –Зœ RB@† Rѕџ \ўЌ р’ \$<!0 H \$v(xџ \ўШqџџX< TB@† Tѕџ \ўЌ р’ \$<!2 H \$v(xџ \ўШqџџ№;kџџш;џ HўШ ŽЗ ’З –Зœ RB@† RA~ jЗœЖMdtDat lЌ  R(dFЖMdtDat R(kџџH; TB@† TA~ jЗœЖSzeDat lЌ  T(dFЖSzeDat T(kџџи:kџџа: ˆЗœ PB@† Š!h$Šбr tB@ˆэ f!h$f.X XA~ jЗœЖRawDat lЌ  X(dFЖRawDat X(kџџ:kџџ: „З ŒЗœ P рAŒ PA~ jЗœЖSrtDat lЌ  P(dFЖSrtDat P(kџџˆ9kџџ€9 ŒЗœ V PAŽр,select and paste CI limits VA|р,embed chart and format jЗœЖSimDat lЌ  V(dFЖSimDat V(kџџШ8kџџР8 ŒЗ „ЗœЗ B( PB@’З B(kџџp8 ’Зœ f!h$fбr fB@:э f!h$f.Z R Z$8A” jЗœЖFrqDat lЌ  Z(dFЖFreqDat Z(kџџИ7kџџА7 ’З –З›G T Z$8A–j ’З –Зœ f!h$fбr fB@:э f!h$f.Z T Z$8A– jЗœЖFrqDat lЌ  Z(dFЖFreqDat Z(kџџР6kџџИ6 ŽЗ ’З –ЗœЗ B( RB@’ TB@’З B(kџџP6kџџH6р:'''-------------------------------------------------------р--random number tester šЗœ f!h$fбr fB@:э f!h$f.\ Ф$8 \A˜ jЗœЖRndDat lЌ  \(dFЖRndDat \(kџџ85kџџ05 TA@roџџ5џџџџ5џџџџФЕAttribute VB_Name = "MidDomain" Option Explicit Type BIN Lower As Double(Upp(Cou„ntRLongNRnd End ƒ\lRANGE1n0Size —нpoŽi… Џ€CMdpN ‘"€’z€ |‰g'Declare P€”ic VarФia€™s „рLimit­€†ЋQ„ 'u­l‚oxf dж ‚K lи BinNumEР@ СkG'nu mb@wbins€ across "SimчsimuŒla›‡BSppƒ†E"empirical specќieŠ€"G/ХŸGШ3 Ф!edŽInput1‹Boolean'rang8e s@РD@Бmi†dУš'data†jM‚2 ‚js ”Eё…>DisBРIL&GEDG РJhne 6curve analysiЈ&imTy }1aХ  *e6 without replacem‚e lusingˆЏШ#F `Т bп o Mйп l Ѕ.n2€ўsb7 п? aX/ шOutрЦNZб;ђ9`;:ц 2/уLaпЁяљ^ыђ?уshw? _№р’з@Њб ыcardтDa 2WТKBieќxpрˆ•бЙЛ‚бJЏŸоbŸ Ÿh‘ў3уX? )ŸŸг48љЕ As Variant№'vhble for adding a@ sheetHdata expo€rt Dim4рwork5| EВ 6VY7а,RndV0alue -€†DouЋƒ 'randomly generated vbetween Domain РlimitsЕ.2Œ..Integ$er%.1 ? S@ppCounrm2ч0я>A ы>Z77тE>гУ$"DŒ>ŸУч:№ч:" w:џбП:РAП:П:П:П:`OџК:џ:Q1?;1;‘wc 2ПK ПKПKq“(џСЧПKџџ@žџџџџ§ПЧ%БOBOS+"~BB b DџЯK‚ƒ1Њ9E1ѕЃЗ/ЯO Uc€O = UПC г.ЯKJ у=hƒO @6make 1ЉА‹pтl not ћЕg`Нuс‘ˆnяKъK€5ё >=бXrH#o6/q*qЁ swit0.d the pxlacЕАV“ сТlяQœЩ’ €'_qџsїщˆџs1 (b@;9Qѕ(Бl convјertИ ЃѓMGѓЅ#И0domizПRУ ЏЊzШl(л[§“"+?ЏdqB"${ћЛs-ЛeчG;''Cђ– ГseepPI‘Жta is all within doma0boundaries For i = 1 To  SppCŒt= Low_Then_MsgBox@ "One xmore empirical sp$ecŠ rp aoutsideE…œlbs",‘]vbExclamation, "E †+Da€ФInput Error"LUnload RngModel2Exit Sub nd If‡ Next i ''Check to see if priР=@5#sheets exist fРnaming" Š CAShNamŒУ''-3%--Produce\ichness curv6e‚"Ged@O7 € †UDA-= Tr8ue C{C @&deter€2e wh;€ЦfA2РCbinР РFoverlap betwаeen УЙ  Л.lA™RuЕ aё@_spp Š ƒ Мt€І incrXemeРЮ…cAм pby 1ƒ$CмхF irstB€4= f0 бLa! jу%|@Num'Ё€+Њ{Тj рk€s(j4).A№< ПХТ}D2с iшjЋўEР ЉXЁ-# ?у_?a g%Рl &<№> 0 !%ѓŽ§a/kaŸХ5€ЌФЋ !уab)k).ТАыо+eDХсТ~kЯ ‡џ+Э-Ђ$ bˆЁ тuexportЯuРКСc valueиs (Јъy)A†a ёР9OutxЂDwСёƒGraШyAaSТ”.Add Aвf{:=#(b$€ хbeРhwork4€ Acti\veТЋ ЋW ф sЃ+A Cells(1, 1).vV "!аЙiFont.BoldџрЁ/ ЁCfя =.sС§GiРэЫЂCрё"!я љЅчЃSele~c 1"1#R!gаraphяs Рtи\Ю4 rfCharVt`t(Є)є 'embed cџ!rW0kpя ђРAttachц ОPсpр'ЄLKє.‘oЧ}р" & s1u„ZE№Œ:u#ЭЯ і •'Ÿt‚-Bsimul"‡А}ocedurt samplб|WITHOUT reаplac2g;!ŽР tizmTœТp!WiРmType1ь8“ с3 Л(ё!s RndVara[ Mdpt  rБEunttEs W№DО2 {t С=s0YƒЕimЪ=іž. ‘gТr Bar1цEБ “‘"-Reinрitial@ЖaЗђВ,уw),СЛ“‹(аЗx '€їЅZЁzјero•с РАЄс5Р€тО= DџуХ!pXpI`Q‘”’~sЁ’хУзх9ХD€o UntilЭЧџEПЧПЧЕЧвe1{ПЧяўd2 ЏЧц€ˆ"‘ІЭу]ы a   cCDbl˜(((Šr -њЫђ*0Рd)^˜;њЅ=С“е'aрssign@у A­‡J@ХqLoop)/ШdW:Зтг Ѓв oшf eРW ѕ–G€\=ф‚:щџ'@8ыdbžl8н$B( 'c дї/А; (ебщK-ч!Пpt`””?o‘1ЭГЈ= ь+ў _в ' ЭOG АЮЂЕl in which bins  Call BinCou@nt(Spp ,AHs(), DRаange)j'--export species rиnes s perш valuand romized midpoint“PIf OutSimsData = Tr ue OrCI„GrThen :>shwork.ActivateƒWith ƒƒ)For i€D1 To‘NumCells(€s, i).V~€Дs(€RndД“Next i= EžQ‹  If‹CSРVar"ЁШRMdpt`SW@Sў2БS'ЮSŸ“ QSџЇƒTA2SwTУТЉsУtSshUQТсСЙAРttach(D ШмС€PriorРФХoCОName@ "Mdt" & 1AJ+ 1Уa/Elјse: ]# Ш`NЅK'MуЃ !tRaw“ЖpтreSheet.Copy A@fter:=СsyЁs(G Р“ˆ!S6e@|5рЂs(яУnO+ƒ5_+‡ с%љ#5.%%@]+т џЇ wW+€ ŸŸabSБColumnџР‚$тИŽЈѓ"п"б"y†SrNЁ"э"  ##NИП‚CIC€utPasteрh)С 4,ФК)$'s@elect aбpЁ CI limiФаa  harтt€Оmat% ""@ 'emb€иcуЁЂ for@‡РKvK4G"imKr~kЧK@ #O ІAP>ЫvFa№A FApplication.DisplayAlertžs08ђ'C .DџЙw!iљ # ЧŸjxд?AddЅDїoAг'D6/Dб­2діpЦYE%6х’П3пZУ‹SC6–FrqŸяЃеZб, eC‘џЏеž#€ѓt‡/O3 ХgL? О ; ‘ 'N- `Њsimul, procedure !`; samР-ng WITHOUT re№-cemehnt;&ЋiрЋg˜e s№Ћ ppType1b€$џ‚•c3SsArАŸ\oЌь Џ,Џ,tФ&g,_,ŸX,пs Ё!ЗzeЁп  { !|2  ЩAЖEBЖpJЖRngModel2@.ProgrЦBјar1іЕ"šБ"cБЂ\ReinitiМalpЮzЮ0'рїХЫto zerўo5БС СЌ!1ћ“ еD Еu‚ вРCDbl(DoфmaPл* €xEх=­ЏS`  Vu'a`ssign,ƒ p ф+eq; р!:M‡”к@Е / 2)bиƒИд 1+лLoop Untixl (dчІ+ ‹а’) = L№ower*щ uЦ 0Gde­mineQ CЃ† of eW ОЄ№dеѓ:&=Ž у0њ dbl6 х †Е 'code  dblW€ork = ((/ 2) SppRanges(i).RndLow erd 0Midp€oint - ”QŒUppF+FN€ext i ŸЄ'--determine wh ich rА-sized domspecies fall inabins*‚ŒCBinCounLt(€r, sа(), ‡{)€q‡CЋ ŠMexport …=r€Ones s = valВu€Ian U‚` `€M,ƒ)‡,€ If OutSimsDataЩTrue Or CIGra ThenJ shw.Act0ivatŒ†AWithD OFor„ iР1 ToGNum  Cel@ls(s, €‘VџС<‚Tƒ•YSХ}A=ЩE€LС(J IfЯKƒN@ГVaСВNюS@Š NСЭ2пN‚ #џA1 OE™“ ‘NGЁУOС-ћSЊO щ'у тЊPП'Ь= B* OshЕ&BnXAttach($Hˆ@Prior^рF A* NamBe "Sze€ "ˆ & !‡+ 1$рElse:€[# ?Ш@LЅI/#у pRawг–lТneSheet.Copy ЄAf`˜:=sЁAƒharтt Jmat•Ё0'emb0vcQёвfor Ч P;Ынh4'im/џu;2 ?A?Ѓ%:ІA€>ЫtFa B LApplication.DisplayAlertоs@8ђT!D€ЙuџQM/ # Яix}ёф?AddЕDAЃН7D6?DБ2дpіY§5%6Х‘Џ3[УSCт6vFrqЃ‰§ ewЉocvГ3ЖzeŸг џŸЄUhЏЯ#Х#ЏСЌ  ёЉ'- @ВsimulВ+ proc@edure №: sam ng W@ITH re`-c@ement;ЦГiЭаm$О B €poрType2lІЃƒЯЁqп[ПЉ џ+џ+ўt&З+Џ+Ј+ s ŸРutMdptшcДП77Я Я Ы б|2п яи ???3?dп?Г‘ЇKbЛ jЛRngM€тl2.ProgrЪBar1>.Лєaƒ1*RbRe€initialРГЇг@јвimф)Ёc'&зхЯto zјerovб FЦPЏПАйк1тPдсI0л‘Fл * А)  ŸћЈI!xPfЧЁ я1 1v№x).1/[л`&ozAЉDoьma чqe -!((4ПјKDo U€ntil ((Ÿ ptPv"Еs(i).RndSize / 2)) <= UpperLimit) = True And _  ((SimRange’Mdp0t - .Т>= Low Т ]˜Val}= CРDbl(((™c‰ D* ,) + YwP_=&ƒ<…w'assign r€andom vKto midpoints6Loop‰qNext i‚'--det@ermine5ge lУs ofр each†7Dлd species: /For iо1 To Spp€s3jdblWxork€@Bj'аcodeU (AП ТiеŠD)[ѓ‚~V+ O…XТ Ywhi[U fa@ll in C b,in€zCABi€nCount(Z, s(), =GB)H7CЧ$exportEr r% ness Рс €љУ›s Ÿ ~ŸG@q@If Out"s0DataРO‚ѓOr!ACIGrFTh en*A@ shw D.Activa†tЌA!WithЄЏ*Q#NumCells(sќ, Р’E‚)У”Ђ,Гїшi fE—aЊМIf +C'‚r '_œH'Ѓ)сfџ)hЁn2џ*Т/с~{…Б)GRC*Aг ?*х хяsэТ3пС3ѓпшп_ƒнS _H ЉHу џтDС"_Hфы_H€lbBGp)‚С{Att€Ф( Ѓ.2HŽрPrior@%Yя}d.Na„meP"Mdt@" & Бj+ 1ƒC!Else: ? hР7y6я / !/ / ) Sмze/ ) 36/ AѓбURaw?ŸATQ02UeSheet.Copy Af :=ђsQs(ЇfшlSeрbТY5pRsо(cОЯA]5ЯЯїД b“ 5Ж ЯџХr ЯAЯЧ`/ЏkЏkГвSрtCo№lumnрdbаxbџXё oo“SН&'r_3фYFSѓOAOCŸ{ІЙB CICutPastцeР@A 4,а:в a€'selectђ„тpQ CI”ІwƒhartXmat •)4'emb0ed cQвfo~r Gр G†4љ'im%)gџyЙAPƒЏbЮы’Fa N ЫRApplication.DisplayРAlerts8ђїѓСФ!D№й“џš™ # ь‡Ы 4@xAddEЯAё z ‡D6DQ­ 3дpжh!J2Ѕ%6…Џ4/4УSC6іFrоqџЃљ eC?‘Љoo$юВzeяlœгiєv3ѓS=ƒ$qєOts.пЄRА8tЏ`у ПЕshWork3, shw€6, Bins())  If PriorOut = True Then€N|.NameJ"FrqDat" & ex t + 1\Elиse:о`e1' nd IfE •RndVa’rpFaU A&(MdptGrFaЎOr S(ize) ФApplication.Displa€yAlerts…-ƒ:uƒ˜2.Delшete 3 ™+M3ƒo ˆ 4 '-3-- simull procedure for sam€yng WITH reР= LoVw, ‰:Nзi)'--dРОrmine/@Ѓlсs oРf each$2 bd specie8wEqп=žWё4ЯoбQ sо pЅ•uу3џ$†§ш3aяяц/џ/Џ!/ƒ/qQЕФѓђ­ёџ#eў ƒ8AЈ"Cџ#ша#1IaБAtt bў(”јUpПжПж'ІгјMdt@Пж Еж?Рй‡щ ƒ П ћ/ Ё3/ ят5qхтSze/ У) 3џ6/ Aх гГPk№sRawu@зЧЏTQ0В?eђЙ.CoЌpyЪAsbЫ(Їo‡ЪЧЪ5pRsяOЭ‘# 5Sdv Ѓ‚чВ shwork5.Name = "RawDat" End If<,4If €OutSimsbaxTrue OBr*CIGr$ThendІCall SortCo@lumns(‚,а SppL) )[РAttach( СPrior†~ ko^рSrtR" & ext + 1‡7Else>:„ˆˆˆ}CICutPaste)h4,„9)W's€elect a3p CI li0mits‡A‚ЁChartFormat…$‚ "€'em`bed c‚&f—"Јž4‡CimЁOџ ‡”,Bƒ @&€t RA€CРH›Fa€k Ы{Application.DisplayAleјrts€‡Т У„…ђD@[te‡YСЗC !ТMdptНSheets.Add After:=C(CountбHЖSet…6€.л ЋƒDpAЩW@є2• 6, Bi@й)ѓЭ"6&?Frq??rk§ e"‡+Q?Ѓ#>L()f>ze + bSiћf3us H— ЃџaE„4П7`П7g ?џП7Ќ`ЁУ[П7`ЩžП7#)9##8RndVдarЅm +(Рv ;яcФФ7€k)‹?y%дДshт].,yУ3Э'џ{Ё'Х  :'-1€--‚r€Кom nu Гr te`Рr ќ f'd!H!_O‡ЧNО7 #ŒBN 5TР(RNum$5B4О7ФB€ vЩ|c&7FBѓPOB )&Ю% Unload RngModel2ѓSubQ__SRP_9)>џџџџј:__SRP_8џџџџџџџџџџџџХЋCIUtilityџџџџџџџџџџџџ*4__SRP_172;џџџџШTrU€€€€~| xСBйRpщG!VIV‘I!AЁAСAqV™V„<vьњš™™™™™Љ?ГхыєыЖхpzџ§Pџ§Ÿў˜lqLџWkzџєЉD`џ%(<џ%lLџџBмў%kzџєЉDџ%v§iќў%lLџџBМў%lLџџBœў§ѓtџ6мўМўœў tџў ы tџў ' ѕqLџ§ Pџ§Ÿў˜l q˜ўU(`џ%(<џ%l˜ўџBмў%vѕЊ§iџ%(ќў%l˜ўџBМў%l˜ўџBœў§ѓpџ6мўМўœў pџў ы:ўС`џјяџџ%ўС<џвяџџ%ќfџ%cќў%pџўЊˆ9:џ%(`џ%(<џ%”ў$ X ”ўўЂмўџC ”ў5мўAcџ%(`џ%(<џ%”ў$ X ”ўўЂмўџ=Мў џC ”ў6мўМў ѕq˜ў§Pџ§Ÿў˜lqў'(`џџ%tџaмў’§ѓ ”ў”ў,c”ў5мў]vkzџчЎ§i`џ%(<џ%lўџBмў%vkzџчЎ§iџ%v§iќў%lўџBМў%lўџBœў§ѓtџ6мўМўœў tџў ы tџў ' ѕqў§ Pџ§Ÿў˜l qŒўU(`џ%(<џ%lŒўџBмў%vѕЊ§iџ%(ќў%lŒўџBМў%lŒўџBœў§ѓpџ6мўМўœў pџў ы:ўС`џјяџџ%ўС<џвяџџ%ќfџ%cќў%rU€€€€~|  6Ey<‘<‘I!Y‰=Б<Щи С"™"q" >!>9>Y>q> @1AYAAЁAСAсA  IB9Y]qEСBёBAC!CaCБCб?СС/ D9DiDбD№8D8 'Pџ 5Pџѕ”xџўŽџџѕ”tџўŽџџ@ѕ”pџўŽџџ@——ЏtHџoHџ”ьЖќ;t@џ—ѕlxџA’—o@џЋѕlxџA’є>џ”фўcˆўљk>џє­чlxџAk>џчlxџA’k>џчlxџAo@џЋk>џчlxџA’ >џdˆўИ$”lxџAњёhуˆЕјф>Ћ”lxџA’ “ єџЦ‚”ѕЊћў#„ў*14џ/„ў+pўl4џFtў%:`џ%$  pўў ыpўrpў'tў%:`џ%$  pўaPџ:`ў]ћ/Pў,ў'0ў%l4џF@ў%$  ,ўa ў:ў]ћ/ќ§ћь§џ)pў,ў6Pџ ў33'ќ§' ў:tўNPўPўѕ0:`џNPџPџ 6PџPў ўќ§ V §œpў $ pўє>џ”фўcш§Ѓєk>џє­Љћ§#„ў*14џ/„ў7pў'tў%l4џF`џ%$  pўaPџBk>џчltџA’pў5Pџ >џdш§Hє>џ”фўcф§єk>џє­Љћ§#„ў*14џ/„ў7pў'tў%l4џF`џ%$  pўaPџBk>џчltџA’pў5Pџ >џdф§Жє>џ”фўcр§‚k>џчltџAt$џ o$џєыЖt$џk>џчltџAo$џЏk>џчltџA’k>џчltџAo$џЋk>џчltџA’ >џdр§$ “"єџЦ ”ѕЊћў#„ў*14џ/„ў+pўl4џFtў%:`џ%$  pўў ыpўMpў'tў%:`џ%$  pўaPџ:`ў]ћ/Pўl4џћ0§ј@ўћ ўџpў6Pџ@ўu3'ќ§' ў:tўNPўPўѕ0:`џNPџPџ 6PџPў ўќ§ V §œpў $ pўrpў'tў%:`џ%$  pўaPџ:`ў]ћ/Pў,ў'0ў%l4џF@ў%$  ,ўa ў:ў]ћ/ќ§ћь§џ)pў,ў6Pџ ў93'ќ§' ў:tўNPўPўѕ0:`џNPџPџ 6PџPў ўќ§ V §œpў $ pўє>џ”фўcм§Љєk>џє­Љћ§#„ў*14џ/„ў7pў'tў%l4џF`џ%$  pўaPџBk>џчltџA’pў5Pџ >џdм§Nє>џ”фўcи§єk>џє­Љћ§#„ў*14џ/„ў7pў'tў%l4џF`џ%$  pўaPџBk>џчltџA’pў5Pџ >џdи§Мє>џ”фўcд§Ђk>џчltџAk>џчltџAс–3'ќ§' ў:tўNPўPўѕ0:`џNPџPџ 6PџPў ўќ§ V §œpў $ pў >џdд§*є>џ”фўcа§ (k>џчltџAk>џчltџAЋєыЖk>џчltџA’$k>џчltџAk>џчltџAЏk>џчltџA’ >џdа§Еє>џ”фўcЬ§ЬPk>џчltџAk>џчltџAєыЖЋэ—зєЦk>џчltџAk>џчltџAєыЖЏэ—сєЦХР3'ќ§' ў:tўNPўPўѕ0:`џNPџPџ 6PџPў ўќ§ V §œpў $ pў >џdЬ§   “$єџЦ5 є>џ”фўcШ§ієp"џєp џє<џ”фўcФ§ь4k>џчltџAk<џчlxџAсk>џчltџAk<џчlxџAвФPk<џp"џ4k>џчltџAk<џчlxџAсk>џчltџAk<џчlxџAвФŽk<џp џk"џєЫk џєЫФрk"џ:џk џўcР§лk:џчlxџAŠѕЊk:џчlxџA :џdР§Гь <џdФ§ >џdШ§ѓ“.єџЦ“0єџЦХЦ |А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5Pџpў$ @QpўќќрўрўqЌ§9:0ў%(`џ%(`ў%pў$ XpўўЂPџџCpў5PџAc0ў%(`џ%(`ў%pў$ XpўўЂPџџ=PўџCpў6PџPўє>џ”фўcЈ§… Gk>џчlxџAЧi0ў%k>џєЉD`џ%(`ў%pў$ XpўўЂPџџCpў5Pџ >џdЈ§4 7(`џ%(`ў%pў$ XpўўЂPў§Ÿў˜pў5Pў ѕqЌ§ “0єџЦп рў  рў  “JєџЦ" '”Lќ3єыЋќ#„ў*FPџ%рўџC/„ў5Pџ3 :`џ%рўџC “&єџЦo“2єџЦ“6єџЦХ |А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќџ)pў,ў“8єџЦ“:єџЦХў |А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќџ)pў,ўѕ0џ”ўd §х$l0џь§j`џ%pў $ ( pў,pўtџxџ ! є>џ”фўcœ§$k>џчltџAoHџШŠ k>џчltџAk>џчltџA’ Qk>џчltџA k>џчltџAєыЖЋэ—зєџЦk>џчltџA k>џчltџAєыЖЏэ—сєџЦФУ*'Pџ "sМ§——ЏnМ§Г—Ћќ;tЈў5PџoЈўk>џчltџA’ Š >џdœ§^ є>џ”фўc˜§•k>џчltџAt$џ o$џєыЖt$џk>џчltџA o$џЏk>џчltџA’0k>џчltџA o$џЋk>џчltџA’8 >џd˜§7tџxџ # “2єџЦ“6єџЦХ? џ§Ÿў˜$џq”§є>џ”фўc§5Fk>џчlxџAЧi0ў%l0џ§i`џ%k>џD`ў%pў$ XpўўЂPџџCpў5Pџ >џd§х ѕq”§“8єџЦ“:єџЦХй џ§Ÿў˜$џqŒ§є>џ”фўcˆ§ЯFk>џчltџA §k0ў%l0џ§i`џ%k>џD`ў%pў$ XpўўЂPџџCpў5Pџ >џdˆ§ ѕqŒ§ 0џf § “8єџЦ“:єџЦХ\ џ§Ÿў˜$ џ  “JєџЦI'%”Lќ3єыЋќ#„ў*FPџ%џџC/„ў5PџZ:`џ%%џџC “4єџЦ џ§Ÿў˜$kИ§М§pў$ иpў 0lМ§§i`џ%,ў$ и,ў dQИ§§oPџ%Д§$ @Д§ўІ&')pў,ўД§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќаў)pў,ў аў  “JєџЦn'(”Lќ3єыЋќ#„ў*FPџ%аўџC/„ў5Pџ:`џ(%аўџC“2єџЦ“6єџЦХќџ ) џ  “JєџЦщ'*”Lќ3єыЋќ#„ў*FPџ%џџC/„ў5Pџњ:`џ*%џџC “6єџЦl џрў + рў  “JєџЦY',”Lќ3єыЋќ#„ў*FPџ%рўџC/„ў5Pџj:`џ,%рўџC“6єџЦ“2єЦФе"єѕ pў$ pў р-pў џ§Ÿў˜."єџѕ pў$ pў р-pў “:єџЦ|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќРў)pў,ўxџРўџ / “JєџЦё'0”Lќ3єыЋќ#„ў*FPџ%РўџC/„ў5Pџ:`џ1%РўџC“8єЦ“:єџЦФm"єѕ pў$ pў р-pў џ§Ÿў˜."єџѕ pў$ pў р-pў “(єџЦ“2єџЦ“6єџЦХZ|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќџ)pў,ў“8єџЦ“<єџЦХ8|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќџ)pў,ўѕ0џ”ўd€§$l0џь§j`џ%pў $ ( pў,pўtџxџ ! є>џ”фўc|§R'Pџ "sМ§oHџnМ§Гќ;tЈў5PџoЈўk>џчltџA’(k>џчltџAoHџєыЖэШїk>џчltџAk>џчltџA’(Qk>џчltџAk>џчltџA(єыЖЋэ—зєџЦk>џчltџAk>џчltџA(єыЖЏэ—сєџЦФУš >џd|§˜є>џ”фўcx§Уk>џчltџA(t$џ o$џєыЖt$џk>џчltџAo$џЏk>џчltџA’0k>џчltџAo$џЋk>џчltџA’8 >џdx§etџxџ # “2єџЦ“6єџЦХm џ§Ÿў˜$џqt§є>џ”фўcp§cFk>џчlxџAЧi0ў%l0џ§i`џ%k>џD`ў%pў$ XpўўЂPџџCpў5Pџ >џdp§ ѕqt§“8єџЦ“<єџЦХ џ§Ÿў˜$џql§є>џ”фўch§§Fk>џчltџA(§k0ў%l0џ§i`џ%k>џD`ў%pў$ XpўўЂPџџCpў5Pџ >џdh§­ ѕql§ 0џf€§O“8єџЦ“<єџЦХŠ џ§Ÿў˜$ џ  “JєџЦw'2”Lќ3єыЋќ#„ў*FPџ%џџC/„ў5Pџˆ:`џ2%џџC “4єџЦЏ џ§Ÿў˜$kИ§М§pў$ иpў 0lМ§§i`џ%,ў$ и,ў dQИ§§oPџ%Д§$ @Д§ўІ&')pў,ўД§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќаў)pў,ў аў  “JєџЦœ'(”Lќ3єыЋќ#„ў*FPџ%аўџC/„ў5Pџ­:`џ(%аўџC“2єџЦ“6єџЦХ*џ ) џ  “JєџЦ'*”Lќ3єыЋќ#„ў*FPџ%џџC/„ў5Pџ(:`џ*%џџC “6єџЦš џрў + рў  “JєџЦ‡',”Lќ3єыЋќ#„ў*FPџ%рўџC/„ў5Pџ˜:`џ,%рўџC“6єџЦ“2єЦФ"єѕ pў$ pў р-pў џ§Ÿў˜."єџѕ pў$ pў р-pў “<єџЦ2|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќРў)pў,ўxџРўџ 3 “JєџЦ'0”Lќ3єыЋќ#„ў*FPџ%РўџC/„ў5Pџ0:`џ1%РўџC“8єЦ“<єџЦФ›"єѕ pў$ pў р-pў џ§Ÿў˜."єџѕ pў$ pў р-pў “*єџЦO*“2єџЦ“6єџЦХˆ|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќџ)pў,ў“8єџЦ“:єџЦХ“<єџЦХ5 |А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќџ)pў,ў|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќ№ў)pў,ўѕ0џ”ўd`§ч#$l0џь§j`џ%pў $ ( pў,pўpџxџ ! є>џ”фўc\§›!$'Pџ "sМ§”ьnМ§ГєыЋћчхpІў5PџkІўp.џk.џчltџAk>џчlpџA’(k>џчlpџA(oHџШ!oHџєыЖk>џчlpџA’ Qk>џчlpџA k>џчlpџA(єыЖЋэ—зєџЦk>џчlpџA k>џчlpџA(єыЖЏэ—сєџЦФУ‘!*'Pџ "sМ§——ЏnМ§Г—Ћќ;tЈў5PџoЈўk>џчlpџA’ ! >џd\§• є>џ”фўcX§ "k>џчlpџA(t$џ o$џєыЖt$џk>џчlpџA o$џЏk>џчlpџA’0k>џчlpџA o$џЋk>џчlpџA’8 >џdX§Ў!pџxџ # “2єџЦ“6єџЦХЖ" џ§Ÿў˜$џqT§є>џ”фўcP§Ќ"Fk>џчlxџAЧi0ў%l0џ§i`џ%k>џD`ў%pў$ XpўўЂPџџCpў5Pџ >џdP§\" ѕqT§“8єџЦ“:єџЦХ“<єџЦХл# џ§Ÿў˜$џqL§є>џ”фўcH§O#Fk>џчlpџA §k0ў%l0џ§i`џ%k>џD`ў%pў$ XpўўЂPџџCpў5Pџ >џdH§џ" ѕqL§ №ў§Ÿў˜$№ўqD§є>џ”фўc@§б#Fk>џчlpџA(§k0ў%l0џ§i`џ%k>џD`ў%pў$ XpўўЂPџџCpў5Pџ >џd@§# ѕqD§ 0џf`§L “8єџЦ“:єџЦХ“<єџЦХШ$ џ§Ÿў˜$ џ  “JєџЦT$'%”Lќ3єыЋќ#„ў*FPџ%џџC/„ў5Pџe$:`џ%%џџC №ў§Ÿў˜$ №ў  “JєџЦЕ$'2”Lќ3єыЋќ#„ў*FPџ%№ўџC/„ў5PџЦ$:`џ2%№ўџC “4єџЦэ% џ§Ÿў˜$kИ§М§pў$ иpў 0lМ§§i`џ%,ў$ и,ў dQИ§§oPџ%Д§$ @Д§ўІ&')pў,ўД§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќаў)pў,ў аў  “JєџЦк%'(”Lќ3єыЋќ#„ў*FPџ%аўџC/„ў5Pџы%:`џ(%аўџC“2єџЦ“6єџЦХh&џ ) џ  “JєџЦU&'*”Lќ3єыЋќ#„ў*FPџ%џџC/„ў5Pџf&:`џ*%џџC “6єџЦи& џрў + рў  “JєџЦХ&',”Lќ3єыЋќ#„ў*FPџ%рўџC/„ў5Pџж&:`џ,%рўџC“6єџЦ“2єЦФA'"єѕ pў$ pў р-pў џ§Ÿў˜."єџѕ pў$ pў р-pў “:єџЦp(|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќРў)pў,ўxџРўџ / “JєџЦ]('0”Lќ3єыЋќ#„ў*FPџ%РўџC/„ў5Pџn(:`џ1%РўџC“:єџЦ“<єџЦФ˜(xџРў№ў 3 “:єЦ“<єџЦФЮ)|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќРў)pў,ўxџРў№ў 3 “JєџЦЛ)'0”Lќ3єыЋќ#„ў*FPџ%РўџC/„ў5PџЬ):`џ1%РўџC“8єЦ“:єџЦ“<єџЦХФM*"єѕ pў$ pў р-pў џ§Ÿў˜. №ў§Ÿў˜."єџѕ pў$ pў р-pў “,єџЦё6“2єџЦ“6єџЦХ:+|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќџ)pў,ў“8єџЦ“:єџЦХ“<єџЦХч,|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќџ)pў,ў|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќ№ў)pў,ўѕ0џ”ўd8§‰0$l0џь§j`џ%pў $ ( pў,pўpџxџ ! є>џ”фўc4§=.$'Pџ "sМ§”ьnМ§ГєыЋћчхpІў5PџkІўp.џk.џчltџAk>џчlpџA’ 'Pџ "sМ§oHџnМ§Гќ;tЈў5PџoЈўk>џчlpџA’(k>џчlpџAoHџєыЖэШт-oHџk>џчlpџA’(Qk>џчlpџA k>џчlpџA(єыЖЋэ—зєџЦk>џчlpџA k>џчlpџA(єыЖЏэ—сєџЦФУ- >џd4§G-є>џ”фўc0§Ў.k>џчlpџA(t$џ o$џєыЖt$џk>џчlpџA o$џЏk>џчlpџA’0k>џчlpџA o$џЋk>џчlpџA’8 >џd0§P.pџxџ # “2єџЦ“6єџЦХX/ џ§Ÿў˜$џq,§є>џ”фўc(§N/Fk>џчlxџAЧi0ў%l0џ§i`џ%k>џD`ў%pў$ XpўўЂPџџCpў5Pџ >џd(§ў. ѕq,§“8єџЦ“:єџЦХ“<єџЦХ}0 џ§Ÿў˜$џq$§є>џ”фўc §ё/Fk>џчlpџA §k0ў%l0џ§i`џ%k>џD`ў%pў$ XpўўЂPџџCpў5Pџ >џd §Ё/ ѕq$§ №ў§Ÿў˜$№ўq§є>џ”фўc§s0Fk>џчlpџA(§k0ў%l0џ§i`џ%k>џD`ў%pў$ XpўўЂPџџCpў5Pџ >џd§#0 ѕq§ 0џf8§ў,“8єџЦ“:єџЦХ“<єџЦХj1 џ§Ÿў˜$ џ  “JєџЦі0'%”Lќ3єыЋќ#„ў*FPџ%џџC/„ў5Pџ1:`џ%%џџC №ў§Ÿў˜$ №ў  “JєџЦW1'2”Lќ3єыЋќ#„ў*FPџ%№ўџC/„ў5Pџh1:`џ2%№ўџC “4єџЦ2 џ§Ÿў˜$kИ§М§pў$ иpў 0lМ§§i`џ%,ў$ и,ў dQИ§§oPџ%Д§$ @Д§ўІ&')pў,ўД§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќаў)pў,ў аў  “JєџЦ|2'(”Lќ3єыЋќ#„ў*FPџ%аўџC/„ў5Pџ2:`џ(%аўџC“2єџЦ“6єџЦХ 3џ ) џ  “JєџЦї2'*”Lќ3єыЋќ#„ў*FPџ%џџC/„ў5Pџ3:`џ*%џџC “6єџЦz3 џрў + рў  “JєџЦg3',”Lќ3єыЋќ#„ў*FPџ%рўџC/„ў5Pџx3:`џ,%рўџC“6єџЦ“2єЦФу3"єѕ pў$ pў р-pў џ§Ÿў˜."єџѕ pў$ pў р-pў “:єџЦ5|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќРў)pў,ўxџРўџ / “JєџЦџ4'0”Lќ3єыЋќ#„ў*FPџ%РўџC/„ў5Pџ5:`џ1%РўџC“:єџЦ“<єџЦФ:5xџРў№ў 3 “:єЦ“<єџЦФp6|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќРў)pў,ўxџРў№ў 3 “JєџЦ]6'0”Lќ3єыЋќ#„ў*FPџ%РўџC/„ў5Pџn6:`џ1%РўџC“8єЦ“:єџЦ“<єџЦХФя6"єѕ pў$ pў р-pў џ§Ÿў˜. №ў§Ÿў˜."єџѕ pў$ pў р-pў “HєџЦ"8|А§ѕ '@ў%'`ў%И§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§§oPџ%'tў%Д§$ ИД§ ()pў,ўД§А§5PџJИ§М§pў$ Иpў 0lМ§§i`џ%,ў$ И,ў dQИ§ќќАў)pў,ўАўxџD 4 “JєџЦ8'5”Lќ3єыЋќ#„ў*FPџ%АўџC/„ў5Pџ 8:`џ5%АўџC V §œpў $ pўdD8tZ ўџœў№ўрўўаўtџРўxџАў4џŒўџpџ8 „ўpў,ўИ§Д§А§PџPў ўќ§ь§kpџўЊˆ9:џ%(`џ%(<џ%”ў$ X ”ўўЂмўџC ”ў5мўAcџ%(`џ%(<џ%”ў$ X ”ўўЂмўџ=Мў џC ”ў6мўМў ѕqŒў§Pџ§Ÿў˜lqˆў'(`џџ%tџaмў’§ѓ ”ў”ў,c”ў5мў ѕqˆў§ Pџ§Ÿў˜ є<,tџpџ”ўмўМўœўkOб@ўџ˜ўџџџџ`xАp@rU€€€ џџџџџџџџ,`§џџџџџџџџџџџ!9//nџџџџџ__SRP_16џџџџџџџџџџџџоyCountUtilityџџџџџџџџџџџџрЎ __SRP_1135џџџџЈ__SRP_10џџџџџџџџџџџџŽ№ФдАџџџџo sЕˆфџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(Иџџ"Иџџ*О џџџџ6 џџџџџџџџџџˆ „џџџџ`џџџџџџџџЈfџ+@џџџџџџ„iƒЎџџџџ џџџџ`€)ƒАџџџџџџ˜Ј€р,, €@%le f)ƒВџџџџџџрџџџџ€@XЌ Ш@%B@†`„\џџџџzџџџџџј`„B@xџџџџџЌ`„Dџџџџvџџџџџ.`„Lџџџџtџџџџџs`„Nrџџџџџ˜џџџџџџџџƒЌџџџџџџ џџџџџџџџџџџџџџ %№P џџџџџџџџџџџџџџџџЈџџџџџџџџџџџџџџџџ8`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџџџџџџџџџџџџџ˜`@ўџppџџџџџ ˆH@ўџАnџџџџ Шpџџџџі@ўџиlџџџџџ №А hх@ўџjџџџџ eи @ўџ(hџџџџџ ˆPЈ@@ўџџџџџfџџџџ P(`(pиџџџџџџpџџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџp?\@(*\Rffff*12405c1c9f\0(*\Rf№Tдиџџџџ! sЕpCџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP(џџd6 џџџџџџџџLџџџџ”џџџџџџџџџџџџš џџџџџџџџџџ№ Žџџџџ`џџџџџџџџˆўk@џџџџџџ00„iƒVџџџџ џџ џџ`€iƒPџџџџџџ џџџџџџ€`„Fџџџџzџџџџџe Pu „nџџџџtџџџАP% „p`pџџџаnџџ%џџџџџџџџƒšџџџџџџџџџџџџџџџџџџџџ%џџџџџџџџџџџџџџџџ@˜џџџџџџџџџџџџ€џџџџџџџџИџџџџџџџџџџџџџџџџџџџџXИџџџџаџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџИџџџџќі Єv@ўџш`џџџ џџ @ўџ(Pџџџ џџ @ўџ0Lџџџџџ`H@ўџ@<џџџ џџ @ўџX,џџџ џџ @ўџpџџџ џџ @ўџˆ џџџ џџ @ўџ ќўџџ џџ @ўџаьўџџ џџ @ўџшмўџџ џџ @ўџЬўџџ џџ og@ўџМўџџ џџ No@ўџџџџџЌўџџ џџ mW@ўџџџџџœўџџ џџ n @ўџp˜ўџџџџ`DJˆ00.I@ўџџџџџ”ўџџ џџ -Oб@ўџ˜ўџџџџ`xАp@ўџРŒўџџџџ`и˜@ўџџџџџˆўџџџџ`џџџџР(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшџџџџџџџџџџџџџџџџџџџџџџџџџџџџр?\@$*\Rffff*13405c1c9f*\R1*#1b0*\R1*#1ab*\R1*#df*\R1*#285*\R1*#10*\R1*#7b$*\Rffff*12405c1c9fпўЪ2€€ џџџџ" €2€<H€<ˆ€ џџџџШ ш ј:W @ P  `€ џџџџ h x.U€ А.:Р9№A  (€ џџџџ 0 @'H:]X ˜ Ј  И€ џџџџ Р а.Uи .:9HAh  €€ џџџџ ˆ ˜'   А И€ џџџџШ€ џџџџ€ џџџџџџџџиЭџџx–]ђD€р,!variable to calculate 95% CI rows]ђD˜р,,range variable for pasting ranges for chartsx]ђDИр,,range variable for pasting ranges for charts ќДš™™™™™Љ?XЌ'F PB@† Pѕэ FЌ Ќ7v FЌ  і7v7d.nmber o nB@Hons nB@ˆр)qџџ˜ VB@†l spec VѕэЌЌ7v іЌ Ќ7v7d.p( pB@Hр)'І   бž ЄбЂЗбІЗбЈ pB@œЖLowerЌЌ$v(xЗЌЌ$v!x(zqџџа PB@† PѕЌџ n!x(Њэ ќ F Ќ7v ќ F  і7v7d.n nB@H nB@ˆqџџ@ VB@† VѕэЌЌ7v іЌ Ќ7v7d.p pB@HІ   бž ЄбЂЗбІЗбЈ pB@œЖUpperЌЌ$v(xЗЌЌ$v!x(zqџџx PB@† PѕЌџ n!x(ЊqџџH VB@†oџџ0џџџџ(џџџџВAttribute VB_Name = "CIUtility" Option Explicit€ Pub, Sub CICutPaste(shwork4 As Varia0nt, &$) € Dim r ;Intege 'vIble to calcul"aЊ95%y rШowsOngPO Range'rƒ Ufor p€^&i€ s  chhart-2‘-<-  r€ДC€v(SimNum * 0.05) / 2 …8 .Activ€| WithБ Set "rk= .(.Cells((rР + 1),‚ (BinР"))РiЩ.Sele†cР€бCopy‹!№End С(KG7К4_74KA„72QсЫ72, 2@7D6У3—A<S52™52.BЗSpecial !:=xlAll, OperaСШNone, SkipBlan@ks:= _/F(als€ T€œspose:=TrueЯ Cl1..ValuчLowerцЭ` Font.№Bold€Gуeп2GaDbCol@k=p 255ЏVS$a-ќ rьS ŸTŸT‡'Ÿ!gТšП!ŸTge…p€T3M“T3ToŸTteŸTo>nŸTE#ŸT#цN3)љ‡TUp b™T€ŸT‹‡џIПЂ#OOTяAc Щ” ЁрпЁс fff*12405c1c9f\1$*\Rffff*12405c1c9f$*\Rffff*14405c1c9fпўЪ!€€ џџџџ"… €€€ €(€ 0€ џџџџ@ X ` h€ џџџџ@4€РШ€ џџџџ@4а€ џџџџ 8"P xˆ     ўџџџўџџџўџџџ !"#$%&'()*+,-./0123456789:;<=>?ўџџџABCDўџџџFGўџџџIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqўџџџstuvwxyўџџџ{ўџџџ}~€ ˜ Ј€ џџџџИ€ џџџџџџџџШЭџџx–]ђ№]ђ]ђ ]ђ8]ђDPCI rowџ \ўЌ Ў’Ќ'LЌ'Nџ BўЌ і’ \$В!4 B$А!$ \$В!4 B$А!& œ B'Lkџџ0 \$В!6 B$А!$ \$В!6 B$А!& œ B'Nkџџр LЌ NЌœџ Dў L N’ D$А!(Ќ D$А((џџџџџ DўШіџџџџyџџpkџџhџ BўШџџџџџ \ўШмџџџџoџџ@џџџџ8џџџџ•БAttribute VB_Name = "CountUtility" Option Explicit Pub, Sub HBin^(x As Long, xbins() BINTypeA&Range*RANGE) ‚ Dim i.€Integer jkFirsцt”Laƒ5BFor€B= 1№ To ƒi0x= 0‹ …. )jЧ€Ќ‚)€MNum‹+!If x˜i).RndLower >=„­j).QƒAnd’<U„ppThen3Q†L= jOEIўfЯOЮ+с+C ф+ЧYН+F><> 0 ПQХ“K@‰k@t‹„ЯE СCФk‚rЫErЩ+ 1“@Next kгE№xit €™O‘oB{ШNтi{Ё zArU€€€€~| pHєzџ€ фўcnџєptџєprџєxџvфўcjџ 4kzџч€A0kxџч€Aсkzџч€A0kxџч€AвФnkxџptџ4kzџч€A8kxџч€Aсkzџч€A8kxџч€AвФЌkxџprџktџєЫkrџєЫФўktџvџkrџўcfџљkvџч€AŠѕЊkvџч€A vџdfџб  xџdjџ2 zџdnџШ$ krU€€€ џџџџџџџџ@` §џџџџџџџџџџџйё (tџџџџtџџџџn№дАџџџџЏ3sЕ0ЙџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(Иџџ"Иџџ*О џџџџ6 џџџџџџџџџџШ ReInitUtilityџџџџџџџџџџџџ __SRP_15D0џџџџ@ __SRP_14џџџџџџџџџџџџEŽSortUtilityFIџџџџHy €џџџџ`џџџџџџџџHrџ+@џџџџџџ„iƒЎџџџџ џџџџ`€)ƒАџџџџџџ˜Ј€B$А €@%В)ƒВџџџџџџрџџџџ€'L@XЌ Ш@%B@†`„\џџџџzџџџџџјџџџџџџџџƒДџџџџџџ@џџџџџџџџџџџџџџ %№@џџџџџџџџџџџџџџџџџџџџЈџџџџџџџџџџџџџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџшџџџџі0џџџџ@ўџ(xџџџџџ @@ўџ`vџџџџ T,ЁP(x(И,Ё@ўџˆtџџџџџ € `@ўџџџџџrџџџџ АˆР„Їџџџџˆ Љш[Їџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ?\@(*\Rffff*12405c1c9f\0(*\Rffff*12405c1c9f\1$*\Rffff*12405c1c9f$*\Rffff*15405c1c9fпўЪ€€ џџџџ"… € џџџџ€ € џџџџF  h €€ џџџџL р ј  ( @€ џџџџPџџџџ`Эџџx–]ђD№џ \ўЌ і’р(.initialize or reinitialize bin counter to zeroџџЌ \$А((џ \ўШџ \ўЌ Ў’р(3initialize or reinitialize randomized spp variablesЌ \$В(4џџЌ \$В(6Ќ \$В(0Q—Ќ \$В(2џ \ўШoџџЈџџџџ џџџџRБAttribute VB_Name = "ReInitUtility" Option Explicit Pub, Sub ReiZialize(xCount As Long, xbins() BINType&Rang‚e*RANGE)VDim i  .IntegeŽrFor= 1 To B`inNum'Uˆ *r˜ ‡ c›er to Рzero =ƒT@i).Rndb= 0Next ~i‡‡ŠJ„ ,™Jr andomœd spp vari`ables‡.$xу˜NLow€a NUppMdptwР{H9S'ЫOBEndA‚ rU€€€€~| pРєzџvфўcvџ/ѕkzџч€A zџdvџєzџ€ фўcrџŠєыkzџч€A’0єыkzџч€A’8єыkzџч€A’ єыkzџч€A’( zџdrџ@e $ krU€€€ џџџџџџџџ@` §џџџџџџџџџџџйё (tџџџџtџџџџn№ŒдиџџџџDАsЕџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP6 џџџџџџџџџџџџџџџџLџџџџ”џџџџš џџџџ<џџџџџџџџџџ( Œџџџџ`џџџџџџџџииўk@џџџџџџ„iƒИџџџџ џџ џџ`€џџџџiƒЎџџџџџџџџџџџџ€`„\џџџџzџџџџџ\ўџџџџџџџџƒЖџџџџџџаџџџџџџџџџџџџџџ%€`џџџџџџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(џџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРјџџџџџџџџџџџџџџџџЈи@ўџhџџџ џџ @ўџpXџџџ џџ џџџџіКМФЪv@ўџшVџџџџџ Р@ўџџџџџTџџџџ шш@ўџXPџџџ џџ @ўџ@@џџџ џџ @ўџџџџџ0џџџ џџ @ўџџџџџ,џџџ џџ @ўџˆџџџ џџ x@ўџ  џџџ џџ ЈЊ@ўџИќўџџ џџ @ўџаьўџџ џџ @ўџџџџџмўџџ џџ ш @ўџџџџџиўџџџџ`џџџџј ЈЊџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ?\@$*\Rffff*16405c1c9f*\R1*#10*\R1*#94*\R1*#1b0*\R1*#df*\R1*#285$*\Rffff*12405c1c9fпўЪ€€ џџџџ" € џџџџ€ n€ џџџџ€ €€ џџџџ  2И2aШ 7 0€ џџџџ8џџџџHЭџџx–рg'Not finsihed yet--I want to have a random number tester, with statistics like a Kolmogrov-Smirnov test]ђD€ ИB@†џ \ўЌ і’ \$КB@HІ МбР ФбТЌбЦ ЪбШ МB@Оџ \ўШџџMS ИѕЌЌ$vB@Hu qџџШoџџРџџџџИџџџџПБAttribute VB_Name = "SortUtility" Option Explicit Pu‚b, Sub VColumns(shworkx As Variant, xCount$Long)z''Not finsihed yet--I w. to have a random number tester, with statistic s lik,Kolmogrov-€Smirnov0kDim i Integer  Ќ.Act€ivate  For€= 1 To BinNum …si).S№elec€… ƒ€“.ˆ Key1:= , Order xlAsc@ending Custom:=1, _5Orienson:=xlTopToBot€ƒNext i=ƒWŠƒНƒHCePlls(€*1‹VExnd ƒq rU€€€€~|  СBp‘I!сAVIUiU‘UЩUL § Xџ§Ÿў˜єzџvфўcTџР2kzџDhџ%Pџ$ `PџўЂ0џ§Ÿў˜Pџ50џaPџѕ $ АQPџ§o@џ%ўСXџ%( џ%ўСьў%,џѕ $ А,џўІ  ,џ5@џ zџdTџ#l qиў7(hџ%(џ%Pџ$__SRP_199<џџџџrќ__SRP_18џџџџџџџџџџџџzyRndUtility%CџџџџO:__SRP_1b8Gџџџџ|д XPџўЂ0џ§Ÿў˜Pџ50џ ѕqиў Є $ Pџ,џ@џ0џkrU€€€ џџџџџџџџ,`§џџџџџџџџџџџСй/(nrU€€€€~| )EP`qEpСBZ‘I!AсAFЉFЩFёF1GIGZСGщGс# HБH‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•–—˜™š›œžŸ ЁЂЃЄЅІЇЈЉЊЋўџџџ­ЎўџџџАБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмнопрстуфхцчшщъыьўџџџюўџџџ№ёђѓєѕіїјљњћќ§ўџь '>*1џ \ўЌ а’`џ% > ‚ ь X \+Юџ \ўШ(.р--Reinitialize counts to zero$:џ \ўЌ і’Ќ \$8(hck to Ќ \$8(( data џ \ўШhin doр"--Count random numbers in each binџ \ўЌ а’!. џ BўЌ і’  \$Ю B$8!$ \$Ю B$8!& œ B$8!hЌ B$8(h more kџџЈџ BўШrangesџ \ўШde domр$--Ouput frequencies to a spreadsheetorA@H ИB@†TA@rЖRnd Num. FrequenciesЌЌ$v(xC'Cџ \ўЌ і’or out \$8!h \Ќ Ќ+v sheetџ \ўШZЌЌ$vB@H----р--Embed frequency chart--ЖA2:A іЌ 'nэ t.ИchnessЌЌ$v!€'jatЌЌ$v!в'lэ jД@ lЌ jЌ lЌ t!д%:.fˆifЖRandom Number Graph f( к f!ж(иІ n t%dбо тбр f!ж!мB@: f!жѕbinsЗ9фЗ ш ъ7ц(ф мЖRandom Numbers/Domain ш ъ7ц!ь!ю(d$:Ќ ш ъ7ц!ь!x(,ЖTimes New Roman ш ъ7ц!ь!x(:З № ъ7ц(ф ЖRandom Number Frequency № ъ7ц!ь!ю(dЌ № ъ7ц!ь!x(,NЖTimes New Roman № ъ7ц!ь!x(qџџ(З f!ж(ђЌ f!ж!є!і(ј ќ f!ж!є!і(њ  f!ж!є!і(ўЌ7Ќ f!ж%м!(јss Ќ f!ж%м!(З № f!ж%ц(З № f!ж%ц( З ш f!ж%ц(З ш f!ж%ц(Ќ f!ж!є!(јЌ f!ж!є!(   f!ж!є!( ИA~ \ўoџџаџџџџШџџџџНЕAttribute VB_Name = "RndUtility" Option Explicit PubA, Sub ЈTest(RNum$, Bins() As BINType, sh workx&Va@riant)†Dim RdArr”ay0 DoW$e 'a to hold random nu€mbers B‡x1uLong?‰ 'vsbleEconvert sѓ'Hƒ#Domјain€#E€<@lengthƒi‚Ž='loop …>j IntАeger ‘rhO2Ёˆ€Šge 4coChart@Objectƒ 'eЁdded c™ oТ)cwЪOTcolumn width measuremen`t forУФfrh\row heightж RQB}ize€d{=` CLngCœ€’RТe‰’1 ToЕР€u= UpperLimit -А LowСЁF-fiН -ХІi)CDbl((Х„*Н) +Р@Next iA'--Reinitial€-@untsСŸzero JЬР*ƒЯi).ьCo @0‹€кHЪУЫЧ €Гeac h bin RСQ{#j` Т‰a I&fFtР >=У{j)B.B( Andщ<УЦТ- Theсa‚@Eы+ 1ЫуAEр IfуТj ЪOupuРMrequencie‚+a spr€eadshee ”ФŽ.Activat GCells(1, 1).ValuE 0. FяЇ €žv4ƒi ? 'Ѕ6Љ Sel@o)aC  CEo feycf !}€ЏAР2:A" &)a Se€–фЈ=ђ BeSуРubEА3).Wсr  h`{†рHmc рƒЪ.(„s.Add(Р €* 5.5,  x,* €"8ф20ё@^co.&ЦCГ@ГР Graph ( У СС`xlCˆClustereˆd цSer 9Oрс% ЮA _#AS€ource:=Ј".`ƒge('),‘ХRow”:=Х с`‘ Wi@•Ѕ У €.HasTitУР= FalsDaOР.Axes(€@Fgory, xlPrimary)QITru?)  iЃ B acs.TчA…Сь‰&s/У‹Р&ўAxЅ Font.ТSЁŒ= 12$Y#Lх7TimP4Neшw R€pnLв2ŸџУŸяWё oa}Д#џu8Ё‡‰OЌ _‚џ|/%qH‘#cС5{(+`$LP| Kv$ц,PlotA0I.Border€]lorрIndexp0OЭ„WВ:Т2Thс[Ÿ”LineStyb,!/ntinuonuR/Fm5(PС‡rdioL 55Ј o)Ђ.fPatР,n2 №Soli`<бшd(В3MajorGаridl@ st7sv inp7Cїд:oot->OHј џжЏёа7f Џф M; Р™.ЗCa€ll DatapЛ}А}(TnРXбe+@Й  ˆ€ џџџџ№д дШџџџџЗ ssЕкSџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@Иџџ"(џџhО џџџџ6 џџџџš џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ*LџџџџџџџџџџџџLџџџџ”џџџџџџџџџџџџlџџџџџШЉ`„\џџџџhџџџџџ.`„Bfџџџџџ`„nџџџџTџџџ џџe „fџџџџPџџџ%`„jџџџџLџџџџџШЉ`„lџџџџHџџџџџ>Ш џџџџџџџџƒЬџџџџџџ џџџџџџџџџџџџџџ %0Hџџџџxџџџџ`ШАЈџџџџ˜џџџџ@џџџџџџџџџџџџАРјџџџџрџџџџ`џџџџџџџџџџџџџџџџHџџџџџџџџџџџџ8џџџџџџџџџџџџџџџџј(џџџџ4№ь‚іvtк,P@ўџЈ8џџџ џџ §&ё@ўџ˜(џџџ џџ ы,K@ўџ8$џџџџџ ё˜>АBnШ &08p@€ џџџџ xˆ.4BЈBр.B.06BHB€.B а€ џџџџ(иRшUU€ џџџџI0LP€ џџџџGpGˆG GИ€ џџџџRаRшU€ џџџџ € џџџџ€ џџџџ(џџџџ8Эџџx–]ђDШр$array to hold random numbers]ђDр$!variable to convert string numberџџџџ]ђDр$ domain length†]ђD0р! loop variableџџ]ђDHр$ loop variable]ђD`р$range variableО]ђDxр$embedded chart objectk>]ђD˜р$#column width measurement for chartsџA]ђDАр$!row height measurement for chartsltџAA@4 ФX 'а>џdр§Ќ асЮр” № сZIAIyIЁA™IЙI9I[aJ XyK9XБJK‰J 4 д  '(џ 5(џ € PqtџѕltџxџўŽ€ yyЏtlџѕhџltџўd џ|$'(џ sџolџnџГyЋќ;lhџlxџІ5(џ hџf џNѕhџvўdџЛѕlhџ€Aѕlhџ€A hџfџѕhџltџўd џ?єfџvфўcџ5,lhџlxџЁkfџч€AсlhџlxџЁkfџч€AвФ)kfџч€AŠѕЊkfџч€A fџdџп hџf џЮ§јў§Ÿў˜9:Фў%(8џ%(фў%єў$ X єўўЂ(џџC єў5(џѕhџvўdЌўцAlhџѕЊ§i8џ%(фў%lhџ€AЧiФў%єў$ X єўўЄєў hџfЌў›7(8џ%(фў%єў$ X єўўЂœў§Ÿў˜ єў5œў vѕЊћў#˜ў*F(џќіTџ/˜ўєў$ @ Qєў§,>(8џ%(фў%єў$ X єўўЂ(џџAœў ќ"qLџєў6(џœў>(8џ%(фў%єў$ X єўўЂ(џџAœўќ"qHџєў6(џœўnlLџьњ@Г§k8џ%lHџѕВ§iфў%lLџѕВ§iФў%lHџѕВ§iˆў%єў$ @ єўW(џџBœў§ѓPџєў6(џœў:8џ%Pџ,n&ѕ3Pџa(џ§ѓєўєў єў5(џpTџ§“ @єў$ @ єўўšœў%ўСдў%pўѕ 'јў%Pџa(џ§ѓtўtў шpўўІ)єўtўpў6(џœўPџa(џ§ѓlў5(џєѕ lў p.cјў%єўѕ ѕўС8џ%lў Фєўў›єўB:јў%єўѕ ѕўС8џ%lў ФєўW(џџ=œўџCєў6(џœўB(јў %єўѕ ѕўС8џ%lў ФєўW(џџ=œўџCєў6(џœўB:јў%єўѕ ѕўС8џ%lў ФєўW(џџ=œўџCєў6(џœў.cјў%єўѕ ѕўС8џ%lў Фєўў›єўB:јў %єўѕ ѕўС8џ%lў ФєўW(џџ=œўџCєў6(џœўB(јў %єўѕ ѕўС8џ%lў ФєўW(џџ=œўџCєў6(џœўB:јў%єўѕ ѕўС8џ%lў ФєўW(џџ=œўџCєў6(џœўќcќјlў(єѕ Pџa(џ§ѓєўєў hєў5(џR(8џ%tўѕ Pџa(џ§ѓєўєў Рtўaœў€§ѓ!pўpў,a)єўtўpў6(џœўUўС8џ%tўѕ Pџa(џ§ѓєўєў Рtўaœў€§ѓ!pўpў,x)єўtўpў6(џœўUўС8џ%tўѕ Pџa(џ§ѓєўєў Рtўaœў€§ѓ!pўpў,w)єўtўpў6(џœўI(јў7%tўѕ (8џ%Pџa(џ§ѓєўєў шtўWœў"џC#)єўtў6(џœўLўСјў%tўѕ (8џ%Pџa(џ§ѓєўєў шtўWœў"џC$)єўtў6(џœўGќfјў%tўѕ ѕўС8џ%Pџa(џ§ѓєўєў Фtўў›%)єўtў5(џGќfјў%tўѕ ѕўС8џ%Pџa(џ§ѓєўєў Фtўў›&)єўtў5(џGќfјў%tўѕ ѕўС8џ%Pџa(џ§ѓєўєў Фtўў›%)єўtў5(џGќfјў%tўѕ ѕўС8џ%Pџa(џ§ѓєўєў Фtўў›%)єўtў5(џR(8џ%tўѕ Pџa(џ§ѓєўєў Рtўaœў§ѓ'pўpў,a)єўtўpў6(џœўR(8џ%tўѕ Pџa(џ§ѓєўєў Рtўaœў§ѓ'pўpў,b)єўtўpў6(џœўUўС8џ%tўѕ Pџa(џ§ѓєўєў Рtўaœў§ѓ'pўpў,_)єўtўpў6(џœў l (д <"lўPџTџxџ=P$˜ўєўtўpў(џœўkrU€€€ џџџџџџџџ<` §џџџџџџџџџџџ‰qС0tџџџџ/nrU€€€€~|  -__SRP_1aџџџџџџџџџџџџЌˆChartUtility71џџџџe__SRP_b?AџџџџЏp__SRP_aџџџџџџџџџџџџэpю(dЌ ш ъ7ц!ь!x(,ЖTimes New Roman ш ъ7ц!ь!x(ўЗ № ъ7ц(фјЖSpecies Richness № ъ7ц!ь!ю(d,Ќ № ъ7ц!ь!x(, SЖTimes New Roman № ъ7ц!ь!x(ЌqџџpЗ f!ж(ђFЌ f!ж!є!і(ј ќ f!ж!є!і(њ  f!ж!є!і(ўЌ f!ж!є!(јЌ f!ж!є!(   f!ж!є!(З № f!ж%ц(З № f!ж%ц( З ш f!ж%ц(З ш f!ж%ц(Ќ9Ќ f!ж%м!і(ј ќЌ f!ж%м!і(њit Ќ f!ж%м!і(ўFЌ9Ќ f!ж%м(D2$Ќ9Ќ f!ж%м(1Plea Ќ f!ж%м(ered eЗЌ f!ж%м(ЌЌ f!ж%м(HЗЌ f!ж%м( ŒЗœ/--ЌЌ f!ж%м!і(јce ќЌ f!ж%м!і(њ Ќ f!ж%м!і(ўeaЌЌ f!ж%м!і(ј e ќЌ f!ж%м!і(њl Ќ f!ж%м!і(ўrkџџˆ ИB@†џџр ЌЌ$vB@Hes UoџџXџџџџPџџџџѓДAttribute VB_Name = "ChartUtility" Option Explicit Pub, Sub XFormat(shworkx As Variant)ZDim 8co *AObject 'embedded ’c… o CBwCLong'column width measurementP forWsQrhЄ(row he№ight›'ˆB‰,ˆ ƒ 'vble range aspsignQ… œ' --mak ŒŠin activ„e ИsheeЫIf OutEmpGraуTrue Then ErO€яA2:A" & BinN@um + 1‡Sˆet …q= A&SУEcw@Cells(1, 2X).WСYHhЬH/NЫРƒŠ.Hs.Add(€* 5.5, @i* €eB8Ф20Р–†$o.ЏР?iricaфl €AphРЏ ƒTypЛxlLHineЧ&coƒ.SeriesCoœllРЅРПС$ _ ASource:R=ˆI.Rt(@Z)", Row@І:=xl€ЈЁEnd˜ IfСzCoCI oцCoH= fР7) ?3 ?3РNPredўiJ`‰_3`_3_3_3ЃCZ3С3У Wi@Š…DЋA.HasTit€z= FalsЈJЁ.Axes(`?ategory, xlPriрmary)Iсv q9AxiЃтV ‚e€rs.Text (€"Domainh`Ч Font.SфizЁd12?fLsTimes N0ew R •Vaјlue_#сiЯЇCсWь"Spec { Richnessч4$Й п#xlў#„?aNы/A'f–PLege`Š.PfPlotArea.Bo rder. HorрIndex#ˆ`Wcp=р+ThiиeVSty‚1БOntinuouрO5 П .v Int= Xoœ )&PaкtРn? @‰Ф^Я”0xlSolќid' Я‘Šх=2=MajorGriєdlfsLAv ф=й˜inŸOjt-EoпoG\EЯЯ Žr˜(1)П%а57ЯџЯЧ&C -z˜/'%'D_…~QMarkerBackg`round $ rЏ€Rь‚WАБe_ _ _nWј3ircl‡Я /СSmookпя@oŽcŽЃ_5__СPShado‘Ё\.џчŽьЉЁF1Ю€ІєDны<6œ(Џ%џ‘4d†я%э%СћŸ•3/2тWП Т—џП t ЩП Н ›GЊ”С.тЁpŒ жІ=! eё б’Рс 8pј0€ џџџџ 8H>`>xBnи&ј8p@€ џџџџ€ џџџџ€ џџџџ H X .` $Bx BАFp‘I!ЉFЩFёF1GIGqGСGщGс# HМ1HYHБHсHIAIyIЁA™IЙI9 JaJ‰JБJKQKyKБKйK LLљL1MYM‘MСBсAА \  uєџЦвvѕЊћў#\џ*FLџќі`џ/\џHџ$ @QHџ§, >(8џ%(џ%Hџ$ XHџўЂLџџAјўќ"qtџHџ6Lџјў>(8џ%(џ%№МдШџџџџ:sЕмџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџDџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@(џџh6 џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ*LџџџџџџџџџџџџLџџџџ”џџџџš џџџџџdH"џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџа?\@$*\Rffff*18405c1c9f*\R1*#212*\R1*#10*\R1*#22a*\R1*#31*\R1*#2c*\R1*#229*\R1*#249*\R1*#19*\R1*#1c*\R1*#15*\R1*#d2*\R1*#3c*\R1*#1b0*\R1*#df*\R1*#285$*\Rffff*12405c1c9fпўЪS€€ џџџџ" € џџџџ€&€48€2p€2Ј€ џџџџ€ 2р ( @>P>hBn€Ш&ш8pј0€ џџџџ 8H>`>xBnи&ј8p@€ џџџџ€ џџџџ€ џџџџ H X .` $Bx B  .BР .№ .B B8 .BXˆ€ џџџџ(R UИUа€ џџџџ€ џџџџRшRU€ џџџџG0GHG`Gx€ џџџџILАLа@№@C0?P@h?ˆ€ џџџџ   IА Lа L№ I L0 LPp€ џџџџ x7ˆ€ џџџџ џџџџАЭџџx–]ђD`р,embedded chart object]ђD€р,#column width measurement for chartsџџџџ]ђD˜р,!row height measurement for charts]ђDАр,"variable range assignment variableр+--make a embedded chart in active worksheethart o €ЗœђD˜ЖA2:A іЌ 'nэ t.Иor chaЌЌ$v!€'j!ЌЌ$v!в'l fэ jД@ lЌ jЌ lЌ t!д%:.f№ ьЖEmpirical Graph f(%  f!ж(иІ  n t%dбо тбр f!ж!мB@:kџџШ ŒЗœуˆЕјф>ЖA2:C іЌ 'nЌЌ$v!€'jЌЌ$v!в'l rэ jД@ lЌ jЌ lЌ t!д%:.f$dЖPrediction Graph f(st a  f!ж(иІ  n t%dбо тбр f!ж!мB@:kџџИ f!жѕt yoЗ9фЗ ш ъ7ц(фa ЖDomain ш ъ7ц!ь!Hџ$ XHџўЂLџџAјўќ"qpџHџ6Lџјўnltџьњ@Г§k8џ%lpџѕВ§iџ%ltџѕВ§iшў%lpџѕВ§iШў%Hџ$ @HџWLџџBјў §ѓ xџHџ6Lџјў:8џ %xџ,n&ѕxџaLџ§ѓ HџHџ  Hџ5Lџp`џ§“ @Hџ$ @Hџўšјў %ўСџ%Аўѕ '(џ%xџaLџ§ѓ ДўДў ш АўўІ )HџДўАў6Lџјў uєџЦvѕЊћў#\џ*FLџќі`џ/\џ>(8џ%(џ%Hџ$ XHџўЂLџџAјўќ"qtџHџ6Lџјў>(8џ%(џ%Hџ$ XHџўЂLџџAјўќ"qpџHџ6Lџјўnltџьњ@Г§k8џ%lpџѕВ§iџ%ltџѕВ§iшў%lpџѕВ§iШў%Hџ$ @HџWLџџBјў §ѓ xџHџ6Lџјў:8џ%xџ,n&ѕxџaLџ§ѓ HџHџ  Hџ5Lџp`џ§“ @Hџ$ @Hџўšјў %ўСџ%Аўѕ '(џ%xџaLџ§ѓ ДўДў ш АўўІ )HџДўАў6LџјўxџaLџ§ѓ Ќў5Lџєѕ Ќў p .c(џ%Hџѕ ѕўС8џ%Ќў Ф Hџў›HџB:(џ%Hџѕ ѕўС8џ%Ќў Ф HџWLџџ=јўџCHџ6LџјўB((џ %Hџѕ ѕўС8џ%Ќў Ф HџWLџџ=јўџCHџ6LџјўB:(џ%Hџѕ ѕўС8џ%Ќў Ф HџWLџџ=јўџCHџ6Lџјў.c(џ%Hџѕ ѕўС8џ%Ќў Ф Hџў›HџB:(џ%Hџѕ ѕўС8џ%Ќў Ф HџWLџџ=јўџCHџ6LџјўB((џ %Hџѕ ѕўС8џ%Ќў Ф HџWLџџ=јўџCHџ6LџјўB:(џ%Hџѕ ѕўС8џ%Ќў Ф HџWLџџ=јўџCHџ6LџјўќcќјЌў(єѕ xџaLџ§ѓ HџHџ h Hџ5LџR(8џ%Дўѕ xџaLџ§ѓ HџHџ Р Дўaјў€§ѓАўАў,a)HџДўАў6LџјўUўС8џ%Дўѕ xџaLџ§ѓ HџHџ Р Дўaјў€§ѓАўАў,x)HџДўАў6LџјўUўС8џ%Дўѕ xџaLџ§ѓ HџHџ Р Дўaјў€§ѓАўАў,w)HџДўАў6LџјўR(8џ%Дўѕ xџaLџ§ѓ HџHџ Р Дўaјў§ѓАўАў,a)HџДўАў6LџјўR(8џ%Дўѕ xџaLџ§ѓ HџHџ Р Дўaјў§ѓАўАў,b)HџДўАў6LџјўUўС8џ%Дўѕ xџaLџ§ѓ HџHџ Р Дўaјў§ѓАўАў,_)HџДўАў6LџјўGќf(џ%Дўѕ ѕўС8џ%xџaLџ§ѓ HџHџ Ф Дўў›)HџДў5LџGќf(џ%Дўѕ ѕўС8џ%xџaLџ§ѓ HџHџ Ф Дўў› )HџДў5LџGќf(џ%Дўѕ ѕўС8џ%xџaLџ§ѓ HџHџ Ф Дўў›)HџДў5LџGќf(џ%Дўѕ ѕўС8џ%xџaLџ§ѓ HџHџ Ф Дўў›)HџДў5LџI((џ9%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш ДўWјў!џC")HџДў6LџјўLўС(џ%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш ДўWјў!џC#)HџДў6LџјўLўС(џ%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш ДўWјў!џC$)HџДў6Lџјў@((џ9%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш Дўў›%)HџДў5Lџ@((џ9%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш Дўў›&)HџДў5LџCўС(џ%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш Дўў›')HџДў5Lџ?ќf(џ%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш Дўў›()HџДў5Lџ@((џ%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш Дўў›))HџДў5Lџ?ќf(џ%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш Дўў›*)HџДў5Lџ uєџЦ I((џ%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш ДўWјў!џC")HџДў6LџјўLўС(џ%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш ДўWјў!џC#)HџДў6LџјўLўС(џ%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш ДўWјў!џC$)HџДў6LџјўI((џ%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш ДўWјў!џC")HџДў6LџјўLўС(џ%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш ДўWјў!џC#)HџДў6LџјўLўС(џ%Дўѕ (8џ%xџaLџ§ѓ HџHџ ш ДўWјў!џC$)HџДў6Lџјў§ (џ§Ÿў˜+7(8џ%(џ%Hџ$ XHџўЂјў§Ÿў˜,Hџ5јўџџа\ 0Ќўxџ`џ$\џHџДўАўLџјўkrU€€€ џџџџџџџџ( `§џџџџџџџџџџџС/nrU€€€€~|  $AttachUtility4џџџџ}__SRP_dB$џџџџя __SRP_cџџџџџџџџџџџџ(pMdptUtilityџџџџџџџџџџџџ“У= r‚g sizes -b>-midpointэ 2п,2,2,кI+ AxDЂ.Act0ivat@™Х}For@І= 1 ToР 65531C Х@h eSheet.C@†s(i, ф1)U""yK Aс + 2… СШР & TitН…Х.Font.№Bold€AŒЊCрUnderBДУЊАvSрL8_р%€3ё„Now_HП Ј3  4E-Species Numb`yр˜€.SppCoьun`–џ.iЅ `K‹ЫD@5UppрAcŽLimit€'"џ`тп"У"B ПБт6ЅLowВтПпх`B ПБ7Ѕ„3с ЋBins#@р_Ÿ"ƒ"b пб8ХA@nalysicc}QНOr џХПFžgЧЋhJЃсY§s‡9-чЫE r.oќllГbП;_ й‘510e Ч ?;3; QПЗП { E nd IfEx :аa›нNextм i7—№i,!ej2_b qgj№rg2<56‡х  1,ь jŸg oaА:џCkпgќтOF#hџl_hтolяПaiя`xjХпhДџof%љГя№oVў".._iІ џVяFŒ r пi“rпiџЋ_ f_ ЋбяРmџW _jS _jЋof_ џЋбя@nW RЁ„пjќum_<џ‘Sіяџ;яРnч_k/д‘Џк‰F??@o/fџёl4Ы?eoof_ яџярhW /en /eTЏІŸ Ÿ dyg š вdjG$5 ‘аѕсцџџџџџџџџџџџџџџџџџџџџџ№џџџџџџџџџџџџџџџџшџџџџzИКМОt2Ž@ўџи\џџџ џџ в‹@ўџXLџџџ џџ ц@ўџHџџџџџ 0№ џџ џџ@ўџ(Dџџџџ џџ ўџP@ўџџџџџ@џџџ џџ €@      !"#$%&'ўџџџ)ўџџџ+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZўџџџ\]ўџџџ_`abcdefghijklmnopqrstuvwxyz{|}~€˜ЙMœ)N  PЄQЈёQСB‘I!йRYљRаЁAСA)S™I <YS€)OP‘O`БSp TITxСTˆЈ `  uєџЦCpџ uєџЦ(Cpџ uєџЦ;Cpџ uєџЦNCpџ uєџЦa Cpџ§ Lџ§Ÿў˜ ѕxџѕћџўdDџp9xџ§“@(Lџ%@џ $ @ @џўšџ: џ]ћ3@џ5џd>lxџѕЊ§i\џ%(0џ%v*Fџ%@џ $ @ @џўœ@џ5џGc№ў%lxџѕЊ§i\џ%(0џ%@џ $ @ @џўšџџ=џџC@џ6џџGc№ў%lxџѕЊ§i\џ%(0џ%@џ $ @ @џўšџџ=џџC@џ6џџI(№ў%lxџѕЊ§i\џ%(0џ%@џ $ @ @џўšџџ=џџC@џ6џџ?lxџѕЊ§i\џ%(0џ%џ ќэџ@џ $ @ @џўœ@џ5џI(№ў%lxџѕЊ§i\џ%(0џ%@џ $ @ @џўšџџ=џџC@џ6џџFlxџѕЊ§i\џ%(0џ%vћў#мў*Fџ%@џ $ @ @џўœ/мў@џ5џI(№ў%lxџѕЊ§i\џ%(0џ%@џ $ @ @џўšџџ=џџC@џ6џџFlxџѕЊ§i\џ%(0џ%yќ#мў*Fџ%@џ $ @ @џўœ/мў@џ5џI(№ў%lxџѕЊ§i\џ%(0џ%@џ $ @ @џўšџџ=џџC@џ6џџFlxџѕЊ§i\џ%(0џ%yќ#мў*Fџ%@џ $ @ @џўœ/мў@џ5џI(№ў%lxџѕЊ§i\џ%(0џ%@џ $ @ @џўšџџ=џџC@џ6џџFlxџѕЊ§i\џ%(0џ%vћў#мў*Fџ%@џ $ @ @џўœ/мў@џ5џI(№ў%lxџѕЊ§i\џ%(0џ%@џ $ @ @џўšџџ=џџC@џ6џџ>lxџѕЊ§i\џ%(0џ%lpџ*Fџ%@џ $ @ @џўœ@џ5џI(№ў%lxџѕЊ§i\џ%(0џ%@џ $ @ @џўšџџ=џџC@џ6џџ uєџЦuєџЦХuєџЦХuєџЦХ]Flxџѕ Њ§i\џ%(0џ% v!ћў#мў*Fџ%@џ $ @ @џўœ/мў@џ5џI(№ў%lxџѕ Њ§i\џ%(0џ%@џ $ @ @џўšџџ=џџC@џ6џџFlxџѕ Њ§i\џ%(0џ%"v#ћў#мў*Fџ%@џ $ @ @џўœ/мў@џ5џI(№ў%lxџѕ Њ§i\џ%(0џ%@џ $ @ @џўšџџ=џџC@џ6џџp xџfDџ†lxџѕќџЧ[ ѕtџѕўdдў[ 9(\џ%tџ§“@@џ $ @ @џўšџ: џ]ћ3@џ5џO >(\џ%ltVBFrameџџџџџџџџџџџџT3PROJECTwmnPџџџџY9PROJECToџџџџbеPROJECTlkџџџџџџџџџџџџzf№єдиџџџџ™СsЕVвџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP џџd6 џџџџџџџџLџџџџ”џџџџš џџџџ<џџ<џџџџџџџџџџ ~џџџџ`џџџџџџџџдўk@џџџџџџGG„IƒИџџџџ џџ џџџџџџ€`„\џџџџxџџџџџ`„Bџџџџtџџџџџeasu`„"џџџџpџџџџџ „nџџџџlџџџРable%џџџџџџџџƒ џџџџџџџџџџџџџџџџџџџџ%`xџџџџџџџџџџџџЈџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ˆџџџџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№џџџџџџџџџџџџџџџџшџџџџzИКМОt2Ž@ўџи\џџџ џџ в‹@ўџXLџџџ џџ ц@ўџHџџџџџ 0№ џџ џџ@ўџ(Dџџџџ џџ ўџP@ўџџџџџ@џџџ џџ €@ўџp0џџџ џџ џџџџ@ўџИ џџџ џџ ˜@ўџ џџџ џџ А@ўџџџџџџџџ џџ Ш@ўџа№ўџџ џџ џџџџ@ўџџџџџрўџџ џџ јЈм№ьіќр@ўџџџ@ўџџџџџмўџџџџ %@'џџ0@ўџPиўџџџџ h(*џџџџџџ@ўџџџџџдўџџџ џџџџxP*џџџџџџџџџџPBџџџџџџџџџџ№џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџа?\@$*\Rffff*19405c1c9f*\R1*#1b0*\R0*#12*\R1*#df*\R1*#285$*\Rffff*12405c1c9fпўЪI€€ џџџџ" €€0€ P€Fp€ џџџџ,ИPшN8NˆLи€ џџџџ (8 9P*>p"G "GШ$I№?$I84F`$I˜6FР$Iј6F $IX4F€$IИ.>р$I( 8:F`$I >FШ$I08 @ H€ џџџџX h9€*> "Gа"Gј$I ?H$Ih4F$IШ6F№$I(6FP$Iˆ4FА$Iш.> $I@ :Fh $IЈ >Fа $I 8 @  H X € џџџџ` € џџџџџџџџp Эџџx–]ђD` р loop variableџџ]ђDx р loop variableџџ]ђD рstring variable]ђDЈ р6location of cell to enter first line of qualifing data zЗ›GЖEmpirical Distribution'"j ИЗ›GЖ:Simulation WITHOUT replacement using empirical range sizes'"j КЗ›GЖ8Simulation WITHOUT replacement using empirical midpoints'"jД МЗ›GЖ7Simulation WITH replacement using empirical range sizes'"jGr ОЗ›GЖ5Simulation WITH replacement using empirical midpoints'"jray ИB@†lower,џ \ўЌ­ћџ’Pлž \Ќ t%vЖœ incluЖData = 2 \Ќ Ќ t,vtЗ \Ќ Ќ t%v!x(zs arraЗ \Ќ Ќ t%v!x($ize anЌ \Ќ Ќ t%v!x(,rand  \Ќ Ќ t,vimerЌ \Ќ Ќ t%v!x(,иЖSpecies Number = м \Ќ Ќ t,v, Ќ \Ќ Ќ t%v!x(, varЖUpper Range Limit = № \Ќ Ќ t,v*Ќ \Ќ Ќ t%v!x(,l daЖLower Range Limit = ь \Ќ Ќ t,v Ќ \Ќ Ќ t%v!x(,˜ЖNumber of Bins = і \Ќ Ќ t,v, Ќ \Ќ Ќ t%v!x(,ШЖ Analysis = " \Ќ Ќ t,vxpЌ \Ќ Ќ t%v!x(, add ИЗ КЗ МЗ ОЗœЖNumber of Simulations = ќ \Ќ Ќ t,vђDЌ \Ќ Ќ t%v!x(,for ЖSimulation Species Number = р \Ќ Ќ t,vr Ќ \Ќ Ќ t%v!x(,ablekџџШyџџРkџџИџ \ўШt \­ќџœ+џ BўЌЌ’g a shЌ B t%vЖœђDpЖData = 2Ќ BЌ t,vomain ЗЌ BЌ t%v!x(zeneratЗЌ BЌ t%v!x($ђD ЌЌ BЌ t%v!x(,, Ќ BЌ t,vрЌЌ BЌ t%v!x(, chaЖSpecies Number = мЌ BЌ t,vhartЌЌ BЌ t%v!x(,le fЖUpper Range Limit = №Ќ BЌ t,vЌЌ BЌ t%v!x(,ЖLower Range Limit = ьЌ BЌ t,vЌЌ BЌ t%v!x(,ЖNumber of Bins = іЌ BЌ t,vЌЌ BЌ t%v!x(,Ж Analysis = "Ќ BЌ t,vЌЌ BЌ t%v!x(,ЖNumber of Simulations = ќЌ BЌ t,vЌЌ BЌ t%v!x(,ЖSimulation Species Number = рЌ BЌ t,vЌЌ BЌ t%v!x(,yџџРkџџИџ BўШkџџ oџџ˜џџџџџџџџRДAttribute VB_Nam e = " achUtility" Option Explicit Su@b DataЈ(shworkx) Dim i As Long 'loop variablZeVj!+c+SГЖY's YrСYRange<…caаof cell to enter firs€t line € €qualifi#d€tzIf EmpiricalDi= True€ Then c} ­€ЁSimType1a'  ulJWITHOUT re@placem€L ”usBeџѕЊ§i0џ%v*Fџ%@џ $ @ @џўœ@џ5џGc№ў%(\џ%ltџѕЊ§i0џ%@џ $ @ @џўšџџ=џџC@џ6џџGc№ў%(\џ%ltџѕЊ§i0џ%@џ $ @ @џўšџџ=џџC@џ6џџI(№ў%(\џ%ltџѕЊ§i0џ%@џ $ @ @џўšџџ=џџC@џ6џџ?(\џ%ltџѕЊ§i0џ%џ ќэџ@џ $ @ @џўœ@џ5џI(№ў%(\џ%ltџѕЊ§i0џ%@џ $ @ @џўšџџ=џџC@џ6џџF(\џ%ltџѕЊ§i0џ%vћў#мў*Fџ%@џ $ @ @џўœ/мў@џ5џI(№ў%(\џ%ltџѕЊ§i0џ%@џ $ @ @џўšџџ=џџC@џ6џџF(\џ%ltџѕЊ§i0џ%yќ#мў*Fџ%@џ $ @ @џўœ/мў@џ5џI(№ў%(\џ%ltџѕЊ§i0џ%@џ $ @ @џўšџџ=џџC@џ6џџF(\џ%ltџѕЊ§i0џ%yќ#мў*Fџ%@џ $ @ @џўœ/мў@џ5џI(№ў%(\џ%ltџѕЊ§i0џ%@џ $ @ @џўšџџ=џџC@џ6џџF(\џ%ltџѕЊ§i0џ%vћў#мў*Fџ%@џ $ @ @џўœ/мў@џ5џI(№ў%(\џ%ltџѕЊ§i0џ%@џ $ @ @џўšџџ=џџC@џ6џџ>(\џ%ltџѕЊ§i0џ%lpџ*Fџ%@џ $ @ @џўœ@џ5џI(№ў%(\џ%ltџѕЊ§i0џ%@џ $ @ @џўšџџ=џџC@џ6џџF(\џ%ltџѕЊ§i0џ% v!ћў#мў*Fџ%@џ $ @ @џўœ/мў@џ5џI(№ў%(\џ%ltџѕЊ§i0џ%@џ $ @ @џўšџџ=џџC@џ6џџF(\џ %ltџѕЊ§i0џ%"v#ћў#мў*Fџ%@џ $ @ @џўœ/мў@џ5џI(№ў%(\џ %ltџѕЊ§i0џ%@џ $ @ @џўšџџ=џџC@џ6џџ[  tџfдў“Ј` ,lџpџмў@џџџkrU€€€ џџџџџџџџ( `§џџџџџџџџџџџС/nrU€€€€~| '€xСB‘I!ApСVсAFЉFЩFёF1GIG WСGщGс# HБHсHIAIyIЁA™IЙI9WaJ XyK9XБJK‰J ˜ 4 ШЌ'др>--Import data from sheet of random midpoints to array variable ИB@†џ BўЌ м’јџ \ўЌ ќ’ дЌ 'д \ B$v!x д+*џ \ўШџ BўШр--Reinitialize counts to zeroџ \ўЌ і’Ќ \$8(hЌ \$8((џ \ўШр$--Count random midpoints in each binџ \ўЌ м ќ’џ BўЌ і’ \$* B$8!$ \$* B$8!& œ B$8!hЌ B$8(hkџџ@џ BўШџ \ўШр$--Ouput frequencies to a spreadsheetžx (B@†Ж Random MdptsЌЌ$v(xџ \ўЌ і’ \$8!h \Ќ Ќ+vџ \ўШЌЌ$vB@Hр--Embed frequency chartЖA2:A іЌ 'nэ t.(ЌЌ$v!€'jЌЌ$v!в'lэ jД@ lЌ jЌ lЌ t!д%:.fЖMidpoint Frequency Graph f( к f!ж(иІ n t%dбо тбр f!ж!мB@: f!жѕЗ9фЗ ш ъ7ц(фЖDomain ш ъ7ц!ь!ю(dЌ ш ъ7ц!ь!x(,ЖTimes New Roman ш ъ7ц!ь!x(З № ъ7ц(фЖMidpoint Frequency № ъ7ц!ь!ю(dЌ № ъ7ц!ь!x(,ЖTimes New Roman № ъ7ц!ь!x(qџџиЗ f!ж(ђЌ f!ж!є!і(ј ќ f!ж!є!і(њ  f!ж!є!і(ўЌ7Ќ f!ж%м!(ј Ќ f!ж%м!(З № f!ж%ц(З № f!ж%ц( З ш f!ж%ц(З ш f!ж%ц(Ќ f!ж!є!(јЌ f!ж!є!(   f!ж!є!( (A~oџџ€џџџџxџџџџЕЕAttribute VB_Name = "MdptUtility" Option Explicit Pu‚b, Sub VGraph(shworkx As Variant , & (Bins()NBINType)SDim аData R'array to hold midpointЄ dC Mi FCMLong'@loop vZbtlejŠIРnteger ‘ЮxŠ">co“ChartObjectƒ'emb€edded c Ь o‚ bcw–#‹€€ 'column width measuremeQ@TforУsCrhhrow he№ightлЩcˆ@< “'Ej range assig†n‚*Чp Re†”1 To (SppCou4* S@imNum)žxМ0СŸ'--ImporC from€Џeet ofэdР™sУŸGФК.ActivaъtР‘FNjР‚Eь A2i†B#ƒС$x + 1‡ BЦx)@ Cells(i, j).0ValuРС Ne@xt i Тj4Reiniti€alize cС>B.zero Š `r"у тsi).ƒ%= Р#! ХRndѓ(х (у 2‹%in each јbinЬp2cF'' †!If#…i)0 >= т€!LoЂw€rAnd†ј>Bn($p&˜8pЈ€ џџџџ р№.ј$BB8.BX.ˆ0B Bа.B№ € џџџџ((R8UPUh€ џџџџI€L € џџџџGРGиG№G€ џџџџR R8UP€ џџџџ h€ џџџџxџџџџˆЭџџx–]ђDШр0array to hold midpoint data]ђDр- loop variable]ђDр0 loop variable]ђD0р- loop variablet ]ђDHр0embedded chart object]ђDhр0#column width measurement for charts ]ђD€р0!row height measurement for charts]ђD˜р0"variable range assignment variableЌ м ќс*__SRP_13E6џџџџ*( __SRP_12џџџџџџџџџџџџ[ˆSizeUtilityџџџџџџџџџџџџЋŸ"__SRP_1fJџџџџ^и ѕvvВxџўŽ € ѕqlџ§ 0џ§Ÿў˜єrџvфўc,џРѕtџvўd$џЖllџѕЊqlџCltџ§i@џ%krџDџ% џ$ X џўЂ№ўџAрўllџlxџR џ6№ўрў tџf$џ[ rџd,џHѕtџvўdиўџѕltџ€Aѕltџ€A tџfиўгѕtџvvВўdаўžєrџvфўcЬў”Cltџlxџќ–krџч€A§k@џ]ћV№ўltџlxџќ–krџч€A§k0џ]ћcрўћ'Мўџˆkrџч€AŠѕЊkrџч€A rџdЬў' tџfаў§0џ§Ÿў˜9:Ќў%(@џ%(џ% џ$ X џўЂ№ўџC џ5№ўѕtџvўd”ўEAltџѕЊ§i@џ%(џ%ltџ€AЧiЌў% џ$ X џўЄ џ tџf”ўњ7(@џ%(џ% џ$ X џўЂрў§Ÿў˜  џ5рў vѕЊћў#ў*F№ўќіPџ/ў џ$ @Q џ§,>(@џ%(џ% џ$ X џўЂ№ўџAрў ќ"qdџ џ6№ўрў>(@џ%(џ% џ$ X џўЂ№ўџAрў ќ"q`џ џ6№ўрўnldџьњ@Г§k@џ%l`џѕВ§iџ%ldџѕВ§iЌў%l`џѕВ§i€ў% џ$ @ џW№ў џBрў§ѓhџ џ6№ўрў:@џ%hџ,n&ѕ3hџa№ў§ѓ џ џ  џ5№ўpPџ§“ @ џ$ @ џўšрў%ўСџ%hўѕ '0џ%hџa№ў§ѓlўlў шhўўІ) џlўhў6№ўрўhџa№ў§ѓdў5№ўєѕ dў p.c0џ% џѕ ѕўС@џ%dў Ф џў› џB:0џ% џѕ ѕўС@џ%dў Ф џW№ўџ=рўџC џ6№ўрўB(0џ % џѕ ѕўС@џ%dў Ф џW№ўџ=рўџC џ6№ўрўB:0џ% џѕ ѕўС@џ%dў Ф џW№ўџ=рўџC џ6№ўрў.c0џ% џѕ ѕўС@џ%dў Ф џў› џB:0џ% џѕ ѕўС@џ%dў Ф џW№ўџ=рўџC џ6№ўрўB(0џ % џѕ ѕўС@џ%dў Ф џW№ўџ=рўџC џ6№ўрўB:0џ% џѕ ѕўС@џ%dў Ф џW№ўџ=рўџC џ6№ўрўќcќјdў(єѕ hџa№ў§ѓ џ џ h џ5№ўR(@џ%lўѕ hџa№ў§ѓ џ џ Рlўaрў€§ѓhўhў,a) џlўhў6№ўрўUўС@џ%lўѕ hџa№ў§ѓ џ џ Рlўaрў€§ѓhўhў,x) џlўhў6№ўрўUўС@џ%lўѕ hџa№ў§ѓ џ џ Рlўaрў€§ѓhўhў,w) џlўhў6№ўрўI(0џ7%lўѕ (@џ%hџa№ў§ѓ џ џ шlўWрў џC!) џlў6№ўрўLўС0џ%lўѕ (@џ%hџa№ў§ѓ џ џ шlўWрў џC") џlў6№ўрўGќf0џ%lўѕ ѕўС@џ%hџa№ў§ѓ џ џ Фlўў›#) џlў5№ўGќf0џ%lўѕ ѕўС@џ%hџa№ў§ѓ џ џ Фlўў›$) џlў5№ўGќf0џ%lўѕ ѕўС@џ%hџa№ў§ѓ џ џ Фlўў›#) џlў5№ўGќf0џ%lўѕ ѕўС@џ%hџa№ў§ѓ џ џ Фlўў›#) џlў5№ўR(@џ%lўѕ hџa№ў§ѓ џ џ Рlўaрў§ѓ%hўhў,a) џlўhў6№ўрўR(@џ%lўѕ hџa№ў§ѓ џ џ Рlўaрў§ѓ%hўhў,b) џlўhў6№ўрўUўС@џ%lўѕ hџa№ў§ѓ џ џ Рlўaрў§ѓ%hўhў,_) џlўhў6№ўрў l &4 <"dўhџPџxџ(ў џlўhў№ўрўМўkrU€€€ џџџџџџџџ8` §џџџџџџџџџџџСQq//tџџџџnrU€€€€~| *€xСB‘I!Apџ BўЌ м’џ \ўЌ ќ’ дЌ 'д \ B$v!x д+*џ \ўШџ BўШр--Reinitialize counts to zeroџ \ўЌ і’Ќ \$8(hЌ \$8((џ \ўШр$--Count random midpoints in each binџ \ўЌ м ќ’џ BўЌ і’ \$* B$8!$ \$* B$8!& œ B$8!hЌ B$8(hkџџџ BўШџ \ўШјр$--Ouput frequencies to a spreadsheet (B@† ’З –ЗœЖRandom Range SizesЌЌ$v(xџ \ўЌ і’ \$8!h \Ќ Ќ+vџ \ўШ ’З –ЗeЖRandom Range SizesЌЌ$v(xџ \ўЌ і’ \$8!h \Ќ Ќ+vџ \ўШkџџЌЌ$vB@Hр--Embed frequency chart ’З –З›GЖB2:B іЌ 'nj ’З –З›GЖA2:A іЌ 'njэ t. 1 'CenterOwner TypeInfoVer = 159 End ThisWorkbookThisWorkbookSheet1Sheet1MidDomainMidDomainRngModel2RngModel2CountUtilityCountUtilityReInitUtilityReInitUtilitySortUtilitySortUtilityExistUtilityExistUtilityChartUtilityChartUtilityCIUtilityCIUtilityAttachUtilityAttachUtilityMdptUtilityMdptUtilitySizeUtilitySizeUti(ЌЌ$v!€'jЌЌ$v!в'l ’З –Зœэ jДЭЬЬЬЬЬ@ lЌ jЌ lЌ t!д%:.f ’З –Зeэ jД@ lЌ jЌ lЌ t!д%:.fkџџ№ЖSize Frequency Graph f( к f!ж(иІ n t%dбо тбр f!ж!мB@: f!жѕЗ9фЗ ш ъ7ц(фЖRange Sizes/Domain ш ъ7ц!ь!ю(dЌ ш ъ7ц!ь!x(,ЖTimes New Roman ш ъ7ц!ь!x(З № ъ7ц(фЖRange Size Frequency № ъ7ц!ь!ю(dЌ № ъ7ц!ь!x(,ЖTimes New Roman № ъ7ц!ь!x(qџџ0З f!ж(ђЌ f!ж!є!і(ј ќ f!ж!є!і(њ  f!ж!є!і(ўЌ7Ќ f!ж%м!(ј Ќ f!ж%м!(З № f!ж%ц(З № f!ж%ц( З ш f!ж%ц(З ш f!ж%ц(Ќ f!ж!є!(јЌ f!ж!є!(   f!ж!є!( ’Зœ (A~kџџШoџџРџџџџИџџџџ]ЖAttribute VB_Name = "SizeUtility" Option Explicit Pu‚b, Sub VGraph(shworkx As Variant , & (Bins()NBINType)SDim аData R 'array to hold midpointЄ dH Ri KRInteger 'loop Ђv`ble"jŒЫ*"xA"co“"€DChartObject 'embedded c™ o‚ ƒfcw–!Long'column width measureme€Wfor%УsCrhdrow heightПлH!I@9„–C'…i range a`ssign‚( pmоyР2IФSР†„'Cƒ= т€!Low @AndE† ЖC!Брm= X.Hms.Add(P * 5.95Ф, €* 2А 2:80`Xё&= §пršпп#vкХ0)ПВ? co".Љ– Frƒ>y ’” 6’ѓ1’аxBlгiClusаieЦd’sSer`B№'с(рšБ _у SoРurce:=y’=(p&),eRow@r:=eА} Wi еу.HaspTitlЁЂђdA0xes(РАjgory, xlPrРimary))‘cAxiS"aтcs.TQi€1xI€/DomainфI.OG'Fontц.aMP12ппж#ЂеTimАYNeјw RPMтto“oя?r?ze џі#\/Q-|џџѕЁm1#3Ё/5Ш*=$LЗ019ИPlotA`n.Border. -orIxndeQŒŒ–1WsRHb2Th‘Ÿ$LРineSty,С.€ntinuouђ.F№” дШџџџџd 8sЕсёџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџLџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@Иџџ"(џџhО џџџџ6 џџџџš џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ*LџџџџџџџџџџџџLџџџџ”џџџџ  Ши(9№">0 Xh7p€ џџџџ€ џџџџ€ ˆ00Ј00и€ џџџџ >>0€ џџџџHBn`ЈBnР€ џџџџ &08p@€ џџџџ xˆ.0BЈBи.Bј.(2B@Bx.B˜Ш€ џџџџ(аRрUјU € џџџџI( LH € џџџџGh G€ G˜ GА € џџџџRШ Rр Uј € џџџџ   0 € џџџџ8 € џџџџ€ џџџџ€ џџџџџџџџH Эџџx–]ђDШр5array to hold midpoint data]ђDр5 loop variable]ђDр5 loop variable]ђD0р5 loop variableџџ]ђDHр,embedded chart objectџџ]ђDhр,#column width measurement for charts ]ђD€р,!row height measurement for charts]ђD˜р,"variable range assignment variable]ђDАр,Column letter variableЌ м ќс*рЌ'др>--Import data from sheet of random midpoints to array variableј ИB@† 5(Р^Уrio™L 55ш o).fPaQЅn2 Sol~i<бшф+R3MajorGridzl@ s7v iюnPCt:ooўt}5OHј FЏёП 7f Џф SQ./Ръ i alоl2žА№`Ѕuьx`d…š ‘рюƒ~ ФШaXсAСXFЉFЩFёF1GIGщXСGщGс# HБHQYIAIyIЁA™IЙI9БYaJ XyK9XБJK‰J 0 Ш ѕvvВxџўŽ €єprџ§ 0џ§Ÿў˜єtџvфўc,џИєvџvфўc(џЎ krџєЉprџCkvџD@џ%ktџDџ%$џ$ X$џўЂєўџAфўkrџчlxџR$џ6єўфў vџd(џV tџd,џEєvџvфўcрўїѕkvџч€Aѕkvџч€A vџdрўЩєvџvvВфўcмў–єtџvфўcиўŒEkvџчlxџќ–ktџч€A§k@џ]ћVєўkvџчlxџќ–ktџч€A§k0џ]ћcфўћ'Шўџ€ktџч€AŠѕЊktџч€A tџdиў vџdмў §0џ§Ÿў˜uєџЦu єџЦФM9:Иў %(@џ%(џ%$џ$ X$џўЂєўџC$џ5єўєvџvфўcЄўJ>kvџєЉD@џ%(џ%kvџч€AЧiИў%$џ$ X$џўЄ$џ vџdЄўёuєЦu єџЦФё9:Иў %(@џ%(џ%$џ$ X$џўЂєўџC$џ5єўєvџvфўc ўё>kvџєЉD@џ%(џ%kvџч€AЧiИў%$џ$ X$џўЄ$џ vџd ўЉ7(@џ%(џ%$џ$ X$џўЂфў§Ÿў˜ $џ5фўuєџЦu єџЦФZ vѕЊћў#œў*FєўќіTџ/œўuєЦu єџЦФŠ vѕЊћў#œў*FєўќіTџ/œў$џ$ @Q$џ§,>(@џ%(џ%$џ$ X$џўЂєўџAфўќ"qhџ$џ6єўфў>(@џ%(џ%$џ$ X$џўЂєўџAфўќ"qdџ$џ6єўфўuєџЦu єџЦФ nlhџьњЭЬЬЬЬЬ@Г§k@џ%ldџѕВ§iџ%lhџѕВ§iИў%ldџѕВ§iŒў%$џ$ @$џWєўџBфў§ѓlџ$џ6єўфў uєЦu єџЦФ nlhџьњ@Г§k@џ%ldџѕВ§iџ%lhџѕВ§iИў%ldџѕВ§iŒў%$џ$ @$џWєўџBфў§ѓlџ$џ6єўфў:@џ%lџ,n&ѕ3lџaєў§ѓ$џ$џ $џ5єўpTџ§“ @$џ$ @$џўšфў%ўСџ%tўѕ '0џ%lџaєў§ѓxўxў шtўўІ)$џxўtў6єўфўlџaєў§ѓpў5єўєѕ pў p.c0џ%$џѕ ѕўС@џ%pў Ф$џў›$џB:0џ%$џѕ ѕўС@џ%pў Ф$џWєўџ=фўџC$џ6єўфўB(0џ %$џѕ ѕўС@џ%pў Ф$џWєўџ=фўџC$џ6єўфўB:0џ%$џѕ ѕўС@џ%pў Ф$џWєўџ=фўџC $џ6єўфў.c0џ%$џѕ ѕўС@џ%pў Ф$џў›$џB:0џ!%$џѕ ѕўС@џ%pў Ф$џWєўџ=фўџC$џ6єўфўB(0џ %$џѕ ѕўС@џ%pў Ф$џWєўџ=фўџC$џ6єўфўB:0џ%$џѕ ѕўС@џ%pў Ф$џWєўџ=фўџC $џ6єўфўќcќјpў(єѕ lџaєў§ѓ$џ$џ h$џ5єўR(@џ%xўѕ lџaєў§ѓ$џ$џ Рxўaфў€§ѓ"tўtў,a)$џxўtў6єўфўUўС@џ%xўѕ lџaєў§ѓ$џ$џ Рxўaфў€§ѓ"tўtў,x)$џxўtў6єўфўUўС@џ%xўѕ lџaєў§ѓ$џ$џ Рxўaфў€§ѓ"tўtў,w)$џxўtў6єўфўI(0џ7%xўѕ (@џ%lџaєў§ѓ$џ$џ шxўWфў#џC$)$џxў6єўфўLўС0џ%xўѕ (@џ%lџaєў§ѓ$џ$џ шxўWфў#џC%)$џxў6єўфўGќf0џ%xўѕ ѕўС@џ%lџaєў§ѓ$џ$џ Фxўў›&)$џxў5єўGќf0џ%xўѕ ѕўС@џ%lџaєў§ѓ$џ$џ Фxўў›')$џxў5єўGќf0џ%xўѕ ѕўС@џ%lџaєў§ѓ$џ$џ Фxўў›&)$џxў5єўGќf0џ%xўѕ ѕўС@џ%lџaєў§ѓ$џ$џ Фxўў›&)$џxў5єўR(@џ%xўѕ lџaєў§ѓ$џ$џ Рxўaфў§ѓ(tўtў,a)$џxўtў6єўфўR(@џ%xўѕ lџaєў§ѓ$џ$џ Рxўaфў§ѓ(tўtў,b)$џxўtў6єўфўUўС@џ%xўѕ lџaєў§ѓ$џ$џ Рxўaфў§ѓ(tўtў,_)$џxўtў6єўфў uєЦТ l ) Ш @&pўlџPџTџxџK‚(œў$џxўtўєўфўШўkrU€€€ џџџџџџџџ8` §џџџџџџџџџџџСQq//tџџџџ__SRP_1eџџџџџџџџџџџџ–ˆAddInUtilityџџџџџџџџџџџџХA__SRP_1dKHџџџџ™h__SRP_1cџџџџџџџџџџџџЋЙnrU€€€€~| и Y‘I!Y  Љ б љ !!ЙI!H$ў €џџџ$ @рKџџєpvџBHџLџ:Pџ%`џ$ d`џ HLџ „QHџ[Dџdџ)`џLџўr@џ…dџџA0џ:Pџ ]ћ350џxєџpvџ§Ы@џ… dџўs@џP kvџУйdЬў'аў%'рў%'№ў%'џ%ўСџ%Hectџџџџџџџџ)ГAttribute VB_Name = "AddInUtility" ' --€ modulelilOption Explicit Pub Const €itemTitv As SмngШMid_Domain_Null" ' the nƒof your ProjecУUNMenuЇhУ UFileВЙ~CaЅ.…-ƒB ‚B`OnAcŸ‚p‚ `]5 w Sub M€ ()™€Sheets„("‚1").%va€Е' spock6RngModel2.Sho†wƒ„ End €)№ -Ъ}ƒ.ШUpd%d: 21-MAY-€03 (MKT€>UDim newI€ОzCommandBarBu0tton? Fo8undA€ Р8Bo№oleaШСpC CO@|rror RˆesuРŒNexiG= False… FР EachBƒ˜ InР†Х"s( t).Р]trolІs С-If‚ .…p†=‚EThenL$etРŽisCœann General Decla3џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџTџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрџџџџџџџџџџџџџџџџџџџџџџџџџџџџрpџџџџјџџџџџџџџџџџLџ:Pџ%`џ$ d`џ HLџ „Hџ $ lЬў= xџ)`џLџHџЬў lxџќјШўѕШў x  Шў ˆ  Шў ф ќcќјШўdЬў'аў%'рў%'№ў%'џ%ўСџ%HџLџ:Pџ%`џ$ d`џ HLџ „Hџ $ lЬў= xџ)`џLџHџЬў lxџќјФўѕФў x ѕФў \  Фў ˆ  Фў ф ќcќјФўџџИр<$Dџ@џШўФўdџxџ$`џLџHџЬў0џ џєДKџџT'<џ%Lџ:Pџ %`џdџ:hџ%xџ$ dxџ Hdџ „`џ , Lџ ” )xџdџ`џLџT'<џ%Lџ:Pџ %`џdџ:hџ%xџ$ dxџ Hdџ „`џ , Lџ ” )xџdџ`џLџ@Д$ xџdџ`џLџaџџ џџ џџџџџџџџrU€€€ џџџџџџџџ$`§џџџџџџџџџџџ$Љ`§џџџџџџџџџџџ$б`§џџџџџџџџџџџnџ џџ  З€0* pH‚dфMid_Domain_NullNPA Monte Carlo simulation program for geometric constr„ts of s_VBA_PROJECTџџџџџџџџџџџџгШ+dirџџџџџџџџџџџџЎ__SRP_0џџџџOџџџџэИ5__SRP_1џџџџџџџџџџџџЫžzeUtilityџџсё џџџџP>џџAddInUtility1<405c1c9fџџ0AddInUtilityџџИоHџџџџhџџџџџџˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџh`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№џџџџџџџџџџџџPџџџџиџџџџџџџџџџџџџџџџџџџџџџџџРџџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ №ф д(џџџџ" sЕИоџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ<џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ  џџ<> џџџџLџџџџџџџџ*LџџџџPџџџџLџџџџџџџџLџџџџLџџџџџџџџLџџџџ”џџџџџџџџš"џџџџ<џџџџџџH0Mid_Domain_NullџџџџFileMainъ4˜Hџџџџџџџџџџџџџџˆ@Ma 8 `џџџџџџџџp|џkџџџџџџџџџџ„ L0`џџџџџџџџ(Фўoџџџџџџџџџџ!! „ „;џџџџxџџџј%`„>џџџџvџџџ џџ@„,џџџџdџџџ џџ  џџџџ`џџџџџџџџX<џoџџџџџџџџџџ-„Mid-Domain Nullџџџџ X6џт2Hџџџџџџџџџџџџџџт6џџџџ Hџџџџџџџџџџџџџџƒ0џџџџџџџџџџџџџџџџџџџџ%т4РpHџџџџџџџџџџџџџџџџџџ(џџџџџџџџ` 0˜РџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџTџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрџџџџџџџџџџџџџџџџџџџџџџџџџџџџрpџџџџјџџџџџџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџШPџџџџ2@4FJ6N@ўџ`џџџ џџ џџ@ўџАPџџџ џџ џџ@ўџ(Lџџџ џџ џџ@ўџ0Hџџџ џџ џџ@ўџXDџџџ џџ џџ@ўџP@џџ_ џџ џџ@ўџˆ0џџџ џџ @ўџџџџџ џџџ џџ pX џџ@ўџШџџџ џџ €@ўџшџџџ џџ џџџџџџџџ@ўџ№ўџџ џџ џџџџ@ўџрўџџ џџ џџџџ@ўџџџџџаўџџ џџ џџџџ@ўџџџџџЬўџџ џџ џџџџ@ўџ€Шўџџh`џџџџ% PџџџџџџўџџџџџФўџџ˜`g(%џџџџ€џџ џџџџџџ42@ўџhџџџџџ@ўџјxџџџ џџ џџ@ўџ(hџџџ џџ џџ@ўџdџџџ џџ џџ@ўџј`џџџ џџ џџ@ўџPџџџ џџ џџџџџџџџџџ€џџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџШџџџџџџџџрџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџАџџџџ@ўџџџџџLџџџ џџ @ўџџџџџ<џџџ џџ џџџџ€`џџџџ(џџџџџџџџџџџџ0џџџџРџџџџџџџџџџџџџџџџџџџџшџџџџџџџџџџџџџџџџџџџџџџџџџџџџ @?\@$*\Rffff*1<405c1c9f*\R3*#92*\R3*#50*\R3*#34*\R3*#51*\R3*#51*\R3*#4f*\R3*#30*\R3*#4e*\R3*#4d*\R3*#8c*\R1*#df*\R1*#285$*\Rffff*0o405c20dcпўЪ4€ € „>ш„H„(„`€ џџџџ"x€ ,€АШ€ џџџџ"а€ $и€ € € € џџџџ(0B8@P  ˜  Ј€ џџџџ И"dШ № ј 8  8 8p€ џџџџ*dx Ј А И 8 а 8 @HP€ џџџџ"X€ $`ˆT"TАи€ џџџџџџџџ0р -- module "AddinUtility"ЭџџX]ЖMid-Domain NullђH t]ЖFileђH˜џџџџ]ЖMainђHРђDH–`р% Sheets("Sheet1").Activate ' spockmn w TB@Vр spockhaoџџ– р -- Updated: 21-MAY-03 (MKT)hart]ђDрђD˜]ђDriable]ђЩ З'>џ ,ў 2$@!B“ ,!D 4œр+* set this Constant in General DeclarationsЗ'>yџџ0kџџ(џ ,ўШ >œэ Fбl 2$@!B%:.: :ѕ J9H 49Dр#* set this Constant in General Declarations 69Lр%* set this Constant in General DeclarationsqџџXэ FбlЖStandard$@!B%:.: :ѕ N9HЌ9Pр push-pin 49Dр#* set this Constant in General Declarations 69Lр%* set this Constant in General Declarationsqџџˆkџџ€oџџx–0р -- Updated: 21-MAY-03 (MKT)Щ@ 4 2$@%BB@’ 4ЖStandard$@%BB@’јoџџ№џџџџш]$ЖMid_Domain_NullђH(р: the name of your Projџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџјрСПвVKЌЅ]– лЁџџџџ‘^ЦHAЛЫ'2x!‚џџџџЫЂЋ`NKЇGКрБXџџџџNу4tИЪ2AšZюA•м$џџџџŸqY\љЋF‚ўуfмrЧ]џџџџjz!EЭ0rE˜ЧЧиD]ЌF0‡jŸJБŸO˜!RИЖэЪџџџџIгЅg”УПMП"`Ш)k—)џџџџ1 ЁVАhмDІн%Ь‚CџџџџSmoothцт MarkerSize&~Shadowƒў AttachUtilityДћcZ UnderlineѓЩ MdptUtilityu2shworkxx XData; SizeUtility1(mycolEk AddInUtilityчпMenuNameD itemCaptionФД itemOnAction,їЌ(Mainˆ,newItemIŸCommandBarButton9г FoundMenuьw CommandBars ControlsЬKCaptionxmsoControlButtonnѕStyleХpmsoButtonCaptionЈБOnAction„  msoButtonIconJцFaceIdЪiCommandButton1|дWorkbookk €џAddinInstall˜€џAddinUninstallВ €џBeforeClose~;€џ_DefaultjТ WorksheetСў€џClickŠу _B_var_StringгŠ €џџџ_B_var_Constg Mid_Domain_NullжэUserFormNEmpiricialDataзђ DataInput1ML DataInput2NLAnalysisNТAnalysisOption2эиAnalysisOption3юи SpeciesNumber Љ SimSpeciesвW SpeciesTitle;N RangeLimitsWA RangeUpperГу RangeLowerВ DomainBinsІe BinsLabelЌџ Simulationsг  cmdActivateгЗ cmdCancelЭ NumberSimsœˆFrame1Й TitleLabelЅђ €џAfterUpdateНФ €џџџQueryCloseTє _B_var_StrЈ’ _B_str_Right#(Analysis_ClickQЊџџџџџџџџ›џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ­fџџџџџџџџџџ Е З џџџџџџџџџџџџџџџџџџџџџџџџQџџџџџџ! UY' Э џџ-џџ1!џџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ%. D 1С “€4А€ @€pecies hness@œS Mo nte C arl €simu Šai% p(oga Њfr9g?oЊe+r9cc3Zsa2s€ oЋ€/p€c€ e€5‚ €(ich€Es€O=­‚”† ‚€?\@ ‚ <‚‚stdoXle>‚ @d€ElE€7 €0^€*\G{00020А430-C 0046}#2.0#0#C:\WINDOWS\System32\ƒ22.tlb#OLE AutлЪEƒEOffTic„EOР>fР(SF€Sr€{s3@SD452EE1-E08"F0A-8-02608C4D0BB4SFM20L'B Р_Ь&/;§"1РƒjIqAHqА00}#@8@q#Р Ѓ€ž50Ї€ ‰РAB712A69A-5F99-4D44-960D-E946202 AFE9Dˆ6DO€CUME~1\РYhael\LOCALSTemp\Excel8.УС1.exdH2•`@с.E р….`ŒMˆ Д`  DMS @ctlр7>E O {SCР3mUрjtрxLрNb6|€Ё831FDD16-0C5C-11D2-A9FCт&F8754D4A16sЅ_OM€CTL.OCXшWindows dRC –rols ‚6@L(SP4)П7Р7Л7џц0Џр‘dBBFFF2AD-FECD-€4ACC-97€3B7B7F8!mуЉl<9VBE`jЦ. 9!6)`@нƒ\ вЉќ јuMЁaФтСˆтsЕ™ThisWork€bookG`*TР™iРЇWРNameUtilityЊGЂ\N`жm€UрЬji >iрyРŒ2˜Џ[ ­кL!Њ  RngMo€del2GС зg"ъd l2›рЪ2o 2Ж]Йжѓ2( UСoExistf‘!Exџр>Ёo§“!џƒŸ тKŸ…МПPŒCŒEГMрdD*mхiБfГ“o˜Пi- CI&бCI?ЭfoЃ pCqCouжn{YuРtЎ§Osџ; ? ˆф; ` ReInЊiG r+eАnGo .A-R.IOp бKп9Ÿ 0FЙ› с:Sorw ѕp Sа"r№<]ЬГ=‘ЯtyŸ5Жпл RnŠdц#Bnd^Й›2ŸџѓyVјкS{2!@œgБ=ОCpVКЯ§5$h 7›Ÿ р ]Gм; !Attachцѕ1$Apt`1М§.3$/l"(_Ч1Ÿ Vв› a!Mdъp;$M@p?$#“ЧO3$Я?$qм -ЅЂщпSizлjSfz 3-Ш-i6Я_> ]сёƒл‘!AddInFѕ‘$AРdЂ? §“$7џп-г-W= Ио9 05rU€€€~~~~~~~~~~~~~e aџџџџџџџџ             NA Monte Carlo simulation program for geometric constraints of species rich installed as an Add-In.   \Use the Tools Add-Ins command to uninstall it.љ(VBE6.DLL ЉџџџџS 8Name ѓAнйPEИ›%x?351ДzЪЗ\GˆЇLф9EШЮЩ(kОEюFИуˆCп`єˆц@ E‘ €ЧКѓўЄ.Лѕ§HБpi‚Мz(Rв‹BьЮž Њ`ѓWithRangeSizes!ш-ЌЂ6Я€SЊ` њ ‰џџџџџџџџбXWithRangeMidpointsWithoutRangeSizesWithoutRangeMidpoints ”?ЯFѕЮ›ЮЊ`ŽOutputв‹BьЮž Њ`ѓ tbInputSpp2Ш[qJ—І eР‹UserForm€ѓОО‡EЇ‰_ь $ѕ( F3Dynamic qџџџџ џџџџ™hEmpiricialData DataInput1 DataInput2AnalysisAnalysisOption2AnalysisOption3 tbInputSpp1"žŒ—АдЮП-Њ?@а SpeciesNumber SimSpecies RangeLimits RangeUpper tbInputLower tbInputUpper Simulations RangeLowerС{lЏЮŸFЊWJO cmdCancel tbInputBinsFrame1 NumberSims!:5‰…бБjР№(6( ProgressBar1vm“EA/ІAИдІ)QЮ_І 9џџџџџџџџБ x DomainBinsBв‹BьЮž Њ`ѓOutput4 SpeciesTitle cmdActivateOutput1tbSimstbTitleOutput2 TitleLabelOutput3aAnalysisOption1Output3bOutput5DataOutput6Output7Output8cmdActivate_ClickcmdCancel_ClickDataInput1_ClickDataInput2_ClickAnalysisOption1_ClickAnalysisOption2_Click Output8_ClickWithRangeSizes_ClickWithRangeMidpoints_ClickAnalysisOption3_ClickWithoutRangeSizes_ClickWithoutRangeMidpoints_ClicktbInputSpp1_AfterUpdatetbInputSpp2_AfterUpdatetbInputLower_AfterUpdatetbInputUpper_AfterUpdatetbInputBins_AfterUpdatetbSims_AfterUpdatetbTitle_AfterUpdateUserForm_ActivateUserForm_QueryClose № РF РFCaption РF РF РF StandardCв‹BьЮž Њ`ѓ  @@ RangeModel2b T@DL#=ћќњ hЇ8+3qЕРG?,2qЯ”ЊЇLаI"q"џџџџI"8в‹BьЮž Њ`ѓ 0How many random numbers? *Random Number Checker Source <Choose a number from 1-500,000 ЉџџџџT H PPlease enter number of empirical species &Species Input Error dPlease enter number of species in numerical values jNumber of Empirical Species must be greater“K*s0џџџџ          rU €€~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ сRыCЪиm;@ЗЫиШ*ЅЎ  фџџџџƒŠa !iџџџџI  Й ё IџџЙƒŠa )]џџџџё\џџсˆa йџџџџџџџџAџџљƒ€a 9 џџџџС 1a‘Щ)aЁйQ‰СAyЉй џџˆa йџџџџˆџџџџ!9џџ9ˆa "џџџџPџџџџщ!џџaˆa йџџџџџџџџсCџџˆa йџџџџ`џџџџЁBџџЁˆa йџџџџHџџџџyBџџЩˆa йџџџџxџџџџ‘Cџџёˆa йџџџџиџџџџЙDџџˆa йџџџџџџџџ Bџџ1ˆa йџџџџ0џџџџ)BџџYˆa йџџџџЈџџџџщ/џџˆa йџџџџРџџџџ™DџџЁˆa йџџџџ(џџџџ‰ЁЙџџСљ щ щб  ThisWorkbookSheet1 NameUtility RngModel2 ExistUtility MidDomain CIUtility CountUtility ReInitUtility SortUtility RndUtility ChartUtility AttachUtility MdptUtility SizeUtility AddInUtility RMmccain6 Mid_Domain_Null File RMmccain6 MainMid_Domain_Null Mid-Domain NullяРF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA Yџџџџ щРF7C:\Program Files\Microsoft Office XP\Office10\EXCEL.EXEExcel Qџџџџyё 0РFC:\WINDOWS\System32\stdole2.tlbstdole aџџџџ‰бАLај-њ[НхЊDоR?C:\Program Files\Common Files\Microsoft Shared\Office10\MSO.DLLOffice AџџџџiёРс.E р….`ŒM ДC:\WINDOWS\System32\FM20.DLLMSForms aa‰баšІЗ™_DM– щF *ў6C:\DOCUME~1\Michael\LOCALS~1\Temp\Excel8.0\MSForms.exd A ai брнƒ\ вЉќјuMЁ  C:\WINDOWS\system32\MSCOMCTL.OCX MSComctlLib 9 9 a Б №­ђџЛЭўЬJ—в;{ŠB5C:\DOCUME~1\Michael\LOCALS~1\Temp\VBE\MSComctlLib.exdWРF ) 9 Q Б кРF“Ч>Д][B–l\Вr}о+РFгDЩW–$DЉ їЈ№’3ZDРFWorkbookWorkbook_AddinInstallWorkbook_AddinUninstallWorkbook_BeforeClose Workbook_OpenInAddInCollectionGetTitle DMainAddMenu DeleteMenu РFйРFљ!џџџџ TitleInstalledеРF BinsLabel B has been than zero Љџџџџ1 h PPlease enter number of simulated species jNumber of Simulated Species must be greater than zero FPlease enter the Lower Domain Limit $Lower Domain Error nPlease enter the Lower Domain Limit in numerical values 0Lower Domain Input Error! |Lower Domain Limit must be smaller than the Upper Domain Limit fLower Domain Limit must be greater or equal to zero FPlease enter the Upper Domain Limit $Upper Domain Error Bin Input Error Delete MdptGraph nPlease enter the Upper Domain Limit in numerical values 0Upper Domain Input Error zUpper Domain Limit must be larger than the Lower Domain Limit XUpper Domain Limit must be greater than zero LPlease enter the number of domain bins VPlease enter bin number in numerical values JBin number must be greater than three LPlease enter the number of simulations ,Simulation Input Error dPlease enter simulation number in numerical values ˆ written: ƒ … \Simulation number must be between 1 and 65,536 MidDomain.iniExist e e e 100 60 1 1000 0 Љџџџџˆ   Љџџџџe Р! |Initialization file for Program MidDomain. Updated: 30-Oct-02 Љџџџџ" р B A2 bPlease check that you have entered empirical data 4Empirical Data Input Error A E D2 D+ ІPlease check that you have not switched the placement of upper and lower limit data SimDat! |One or more empirical species ranges are outside domain limitsShNamesзРF Data ValueFontBold Select ChartFormat DataAttach EmpDat ReinitializeBinCountActivate MdtDat AfterCopy RawDat SortColumns SrtDat CICutPaste FrqDat FreqDat SzeDat SizeGraphRndTest RndDat ЉџџџџR  ЉџџџџQ ( a t Љџџџџj H A2:A Width HeightChartObjectsAddЯРF Empirical GraphжРF Range Rowcol A2:C Prediction GraphHasTitle DomainAxisTitleCharactersTextSize Times New Roman Species RichnessTРFpРF "HasMajorGridlines "HasMinorGridlines BorderColorIndex WeightLineStyle4MarkerBackgroundColorIndex4MarkerForegroundColorIndexMarkerStyle SmoothMarkerSize Shadow ,Empirical Distribution tSimulation WITHOUT replacement using empirical range sizes (Upper Range Limit = (Lower Range Limit =  pSimulation WITHOUT replacement using empirical midpoints nSimulation WITH replacement using empirical range sizes jSimulation WITH replacement using empirical midpoints CelityRndUtilityRndUtilityNameUtilityNameUtilityAddinUtilityAddinUtility ID="{00000000-0000-0000-0000-000000000000}" Document=ThisWorkbook/&H00000000 Document=Sheet1/&H00000000 Module=MidDomain Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=RngModel2 Module=CountUtility Module=ReInitUtility Module=SortUtility Module=ExistUtility Module=ChartUtility Module=CIUtility Module=AttachUtility Module=MdptUtility Module=SizeUtility Modullls Data = Underline "Species Number = "Number of Bins =  Analysis =  0Number of Simulations =  8Simulation Species Number = Key1 Order1OrderCustomOrientationSortFРF LowerMРF Upper Random Mdpts 0Midpoint Frequency Graph $Midpoint Frequency РFInteriorPattern $Random Range Sizes B2:B (Size Frequency Graph $Range Sizes/Domain (Range Size Frequency (Rnd Num. Frequencies &Random Number Graph *Random Numbers/Domain .Random Number FrequencyиРFЯM™[RDНfiБaи{џ р‰ЦГ@ЇbйƒЛѓrCommandButton1@2зiЮЭЇwнZмМЩђЖэKЃвќFД$ЦЫJ&нЛѕЅoА†LЌеFтЕПиЎЦ5Њ/Ы РOЋЫVЅ;G‚h‡5Tћ` LЄ №g\cВпlї!zQ@Пu\ZшЕ„- !^џџџџ џџџџ™@,ness  InstalledProperlyCancelwb Б9 БЁ( Бс8 Й)H Б X БIh aщx Бйˆ CloseModeFilenameshworkxxCountxbinsxRangesshwork4shworkshworkxxBinsRNum с Y\˜ \‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•ўџџџ—˜ўџџџš›œžŸ ЁЂЃЄЅІЇЈЉЊўџџџЌ­ўџџџЏАБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪўџџџЬЭЮЯабвгдежзийўџџџлмMоўџџџрстуфхцчшщъыьўџџџюя№ёђѓєўџџџіўџџџјљњћќ§ўџe=RndUtility Module=NameUtility Module=AddinUtility HelpFile="" Name="Mid_Domain_Null" HelpContextID="0" Description="A Monte Carlo simulation program for geometric constraints of species richness" VersionCompatible32="393222000" CMG="FCFE508A50AE54AE54AA58AA58" DPB="1C1EB0EAF0170D170DE8F3180D497119B967CC909CD3DE574798FF1DD0BF1C9EB225A7A74BC3" GC="3C3E90CA90EB91EB91EB" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 &H00000002={00020818-0000-0000-C000-000RngModel2џџџџџџџџWАй mCBУ ІˆmCBУfџџџџџџџџџџџџкыoQSџџџџBœi10џџџџџџџџU n`єЮ›ЭЊ`ŽАй mCBУАй mCBУfџџџџџџџџџџџџэo\^џџџџФCompObjџџџџџџџџџџџџpi38џџџџџџџџa n`єЮ›ЭЊ`ŽPžTmCBУPžTmCBУfџџџџџџџџџџџџ:ёodfџџџџ+МCompObjџџџџџџџџџџџџ)pi57џџџџџџџџi n`єЮ›ЭЊ`ŽРнwmCBУРнwmCBУўџџџ§џџџ§џџџ§џџџ§џџџ§џџџ|$#!ўџџџ"ўџџџ%ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‚ƒŒ…†‡ˆ‰Š‹}Ž‘’“”•–—˜™ўџџџœžŸ ЂГЄЅІЇЈЉЊЋЌ­ЎЏАБВЁДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмнопрстуфхцчшщъыьэюя№ёђѓєѕіїјљњћќ§ўўџџџ&%      !"#$ўџџџ'9()3+,-./012ўџџџ5G678:E;<=>?@ABCDF^XwIJKLMNўџџџPQRSTUVWHYZ[\]dt`abcўџџџmfghijkl_nopqrsxœvўџџџyz{ˆ ~€‚ƒ„…†‡u‰Š‹Ž‘’ўџџџ”•–—˜™š›ŒНžŸ ЁЂЖЄІџЇЈЉЊЕЌ­ЎЏАБВГДЃўџџџЗИЙКЛМОУСРўџџџТуЮЦЧШЩЪЫЬЭПЯабвлдежзийкФмнопрстўџџџфхцшщъыьѕюя№ёђѓєчіїјљњћќ§ўџ!A'  ўџџџ9#$%&ўџџџ(3*+,-./012"45678:D;<=>?@B4CE›šG[IJKLMNOPQRSTUVWXYZF\]^_`abcdefghijklmnopqrstuvwxyz{|ўџџџ~€ЅfџџџџџџџџџџџџIсohjџџџџGPCompObjџџџџџџџџџџџџEpCompObjglџџџџRaЈCommandButton1 с Щ\И I^)Шw8Ю  ррр>@€џџŸ}ЁAУERу ‘ЮуЊKИQМРдTahomaH{@$ ":5‰…бБjР№(6(!:5‰…бБjР№(6( :5‰…бБjР№(6((‡$еўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9ВqXFР€ррр€€€ЪN1`ЌDisplay Empirical PatternAnalysis OptionsЗ€@УМTahoma\FР€ррр€€€њ0`ЌSimulation without ReplacementAnalysis OptionsЗ€@УМTahomaXFР€ррр€€€Й0`ЌSimulation with ReplacementAnalysis OptionsЗ€@УМTahomaPFР€ррр€€€ €7f0`ЌEmpirical Range SizesnWith Options5€УTahomaTFР€ррр€€€ €О{0`ЌEmpirical Range MidpointsWith Options5€УTahomaTFР€ррр€€€€Ѓ{0`ЌEmpirical Range SizesnWithout Options 5€УTahomaXFР€ррр€€€€nN0`ЌEmpirical Range MidpointsWithout Options 5€УTahomaPЮ  ррр€5Р€€џџ!}˜№Mid-Domain AnalysisyRу ‘ЮуЊKИQМwTahomad‡,х€ |AnalysisOption1{Ї,х€ ўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9ВqgeSizes3q €H€,q{ ї€@УМTahomae4+ррр€Number of Simulationsn“ " ї€@УМTahomaeq' ѓџHЮ  ррр€1Р€ €џџ}˜ Simulations.Rу ‘ЮуЊKИQМwTahoma\‚$х€0<tbSims"O,ѕ €12\Num€AnalysisOption2{і,х€ |AnalysisOption3{Ж,х€2pWithRangeSizes3q 0х€3tWithRangeMidpointszeqg 0х€4tWithoutRangeSizesszeqи4х€5xWithoutRangeMidpointsnq' ѓџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq€H€,Ъ{ ї€@УМTahoma4000000046};Excel8.0;&H00000000 [Workspace] ThisWorkbook=154, 154, 741, 649, Sheet1=176, 176, 763, 671, MidDomain=22, 29, 852, 505, RngModel2=154, 154, 741, 649, , 22, 29, 1066, 695, Z CountUtility=132, 174, 962, 650, ReInitUtility=66, 87, 896, 563, SortUtility=132, 174, 962, 650, ExistUtility=154, 203, 984, 679, ChartUtility=88, 116, 918, 592, CIUtility=110, 145, 940, 621, AttachUtility=66, 87, 896, 563, MdptUtility=0, 0, 830, 476, SizeUtility=110, 145, 940, 621, RndUtility=88, 116, 918, 592, NameUtility=44, 58, 874, 534, AddinUtility=198, 198, 785, 693, Z РF @б":5‰…бБjР№(6(H9368265E-85FE-11d1-8BE3-0000F8754DA1 ј-ўџр…ŸђљOhЋ‘+'Гй0˜ X`xаьD` x „фMid_Domain_NullOA Monte Carlo simulation program for geometric constraints of species richness+ррр€Number of Empricial SpeciesS{З€@УМTahoma€H€,Ъ{ ї€ @УМTahoma4+ррр€Number of Simulation Species{З€@УМTahoma,+€ррр€Species in Analysis‰{З€@УМTahoma$+€ррр €Range Limits{З€@УМTahoma€H€,Ъ{ ї€@УМTahoma,+ррр€Upper Range LimitsŠ{З€@УМTahoma€H€,Ъ{ ї€@УМTahoma,+ррр€Lower Range LimitsŠ{З€@УМTahoma$+€ррр €Domain Binssg {З€@УМTahoma€H€,Ъ{ ї€@УМTahoma(+ррр€Number of Binsт{З€@УМTahoma€H€,]{З€@УМTahoma$+€ррр €Data Titlee.ЇЗ€@УМTahomaHЮ  ррр€>Р€ €џџ6}˜o2Data Inpute.Rу ‘ЮуЊKИQМ8vTahomaь(х €<tbInputSpp1.Їі0ѕ €2XSpeciesNumberEЪ(х €<tbInputSpp2eЇ ,ѕ €2XSimSpecies2eEь ,ѕ €2PSpeciesTitleд{,ѕ €2HRangeLimitseЇ(х €<tbInputUpperЇ‰,ѕ €2PRangeUpperer ](х €<tbInputLowerЇЌ,ѕ €2P RangeLowerer ,ѕ € 2H DomainBinserЇЮ(х €!< tbInputBinsrЇ,ѕ €"2L BinsLabelnsr №,е€# EmpiricialData{? $х€<8tbTitleЇІ,,ѕ €>2HTitleLabelDaЌz- ѓџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9ВqDFР ррр€€€S@a1`ЌRange Size and MidpointџЗ€@УМTahoma8FР ррр€€ €La{0`ЌRange LimitsЗ€@УМTahomaTЮ  ррр€ Р€€џџ }'ь Type of Empirical DataџџRу ‘ЮуЊKИQМwTahoma\‚(х €hDataInput1tsд{(х €\DataInput2tsдЪ ѓџўџџџ     ўџџџўџџџўџџџўџџџ!ўџџџ#$ўџџџ&'(ўџџџ*ўџџџ,-./0123456789ўџџџ;<=>?@AўџџџCDўџџџFўџџџHўџџџJKLўџџџNOPQўџџџSўџџџUVWXўџџџZ[\]^_`aўџџџcdefghijklmnopqrstuvwxyўџџџ{ўџџџ}~€Root Entryџџџџџџџџ РFА=рНOЧФ фWorkbookџџџџџџџџџџџџ ј-MBD0000D608rџџџџ ]iCBУ ]iCBУMBD000110B3џџџџџџџџџџџџ ]iCBУ ]iCBУberSimss.; { ѓџўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9ВqDFР€ррр€€v{1`ЌEmpirical Spp Richness DataЗ€@УМTahomaHFР€ррр€€/N0`ЌEmirical Species Richness GraphЗ€@УМTahomaHFР€ррр€€vO0`ЌSimulated Richness Data--SortedЗ€@УМTahomaDFР€ррр€€vх0`Ќ95% Confidence Limits GraphЗ€@УМTahomaHFР€ррр€€ž{0`ЌSimulated Range Sizes/MidpointsЗ€@УМTahomaHGР€€,ррр€€‡{0`ЌMidpoint Frequency HistogramЗ€ @УМTahomaLGР€€,ррр€€п{0`ЌRange Size Frequency HistogramЗ€ @УМTahomaDFР€ррр€€IN0`ЌSimulated Richness Data--RawЗ€@УМTahoma@FР€ррр€€ћ{0`ЌRandom Number CheckernЗ€@УМTahomaHЮ  ррр€;Р€ €џџ}˜—Data Output.Rу ‘ЮуЊKИQМдuTahoma l‰$х€(hOutput1Їд$х€)lOutput2ЇO$х€*lOutput3aЇ$х€+hOutput4aЇ; $х€,lOutput5aЇ‰$х€-lOutput6aЇи$х€6pSummaryInformation(qџџџџ|ШDocumentSummaryInformation8џџџџџџџџџџџџ„lCompObjџџџџŽfџџџџџџџџџџџџOutput7aЇ'$х€:hOutput3bЇь $х€;dOutput8bЇu ѓџ(+ррр€ €RRun AnalysisЩ ї€@УМTahoma8b$+ррр€€CCancel8bЪ ї€@УМTahoma8bўџ џџџџ n`єЮ›ЭЊ`ŽMicrosoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1є9Вq!C4{ŠЋ—ШBяЭЋ