ƒBESY PQS §fCFIT1 PQS ©fCFIT1A PQS& À@CFIT2 PQS2 _ CFIT4 PQS> ‰ÊDETERM PASJ ¾DIFFUS PQSS×·ERF4 PQSi �¹ERFD PAStþØERFD3 PQS{ í<ERFSIMP PQS… �FITPOL PQS�YGAUSID PQS¦reGAUSS PQS¹îGAUSSJ LQBÌ�\GD-LINF1LQBá ±'GD-LINF2LQBîÿ×JULIAN LIBü÷®LEAST1 PQSÿí*LEAST2 PQSäðLEAST3 PQS-õâLEAST4 PQSE LEAST5 PQS]8^LEAST6 PQSu[:LINFIT1 LQB�>�LINFIT2 LQB“UüMATR1 PQSš ªxMEANS PAS¦�êMEANSTD LIB¬¬NEWDR PAS±ìäNEWDR2 PAS¶�NEWDR3 PAS½ oNEWTON LIBÆ„ONEWTON-LLQBÊ–›NLIN3 PQSЩaPLOT LQBè%‚RANDG LIBûïäRANDOM LIBþõƒRANTST PASÈiROMB1 PQSHROMB3 PQSf"SCILIB DQC#!MSIMP1 PQSD ‚SIMP2 PASO‡æSIMPS LIBTE!SIMQ1 PQS\Õ§SOLVEC PQSlË~SOLVGJ PQS‚ ÉSOLVGJ2 PQSŽ dŸSOLVGV PQS› ¬`SOLVIT PQS»!øãSORT-B1 LIBÜb‚SORT-B2 LIB߯ÔSORT-Q-NLIBä èÞSORT-Q-RLIBïÿ¥SORT-S LIB÷[™SQUARE LIBüaßTRAP1 PAS óTRAP2 PAS  ×ôTRAP3 PAS\ÑTRAPEZ LIB¥kTSTBES PQS  \oTSTGAM PAS+>ovÿÉøBESY.PASG ßÿõÿòÿšÿ‘ÿŒÿöÿ‹ÿ�ÿÄÿ–ÿÂÿÅÿoÿ†ÿžÿ !"#$%&“ÿÎÿÏÿ�ÿ‡ÿ×ÿÖÿùÿ’ÿŠÿ�ÿ›ÿÓÿœÿ'()*+,-./0•ÿÒÿÍÿÕÿÑÿ™ÿÐÿ�ÿûÿ„ÿ‚ÿÔÿ12345678˜ÿÊÿ—ÿØÿÉÿÃÿ9:;<=>?@ABÈÿÁÿˆÿÌÿËÿ‰ÿÿÿÿÇÿÆÿÀÿ½ÿ”ÿîÿåÿãÿ¾ÿCDE¼ÿºÿ°ÿ¬ÿ¦ÿFŽÿÿþgS?˜<ÀÄ2Y¥®°} ï?|�áøc.Ƭ]- >Âw–’ 8ŽbÕ®PA?1H^k1Ã'f¸~ÌF5Kmf£Î…%Ts-X˜êºà,,!!áq«vµ€‰¥Lm³ˆ†sÑ0œ Kx…5NÌnÍL,%pŪ]- >‚~b�¼Öb†NÌp#\k!µ’C. å¡M–PAìÓ|Z Ä ‹Ù*€,dði%T,fK±ŸXÊ|ÒB¼°˜•ºBóZîàFÀ…d¥®Ð¼-˲Lƒ®µ[�›sÒÕn„/K™‚—ÿ3ºÝ�Ú³Û7]·—N´ÍöìN¶bv§]GÈb¶ê ÇQ¬ÚÕ&–2Á��pâ'þ*Ì¿«±„s-8øc.$[B€wÆi.„%0|æ¬ !^Þ§¹}þÇÌl¾Ásg !^ ç¹mmfÓYBˆw„ÚÌæµ:T ŸXÀ\ ^›‘ !^¸�L±ŸøÁ BeøÌY*€wÆinŸÿ˜‡oðÜYB`8Ï…h›ŽP�B»š·¾:T–bÿÎ8Í…hŸÿƒï,%à$þú~Ž—Oñ÷çxùûÿÿ¿¿ÿÿÿÿÿÿÿÿÿÿýÿÿÿÿÿÿÿÿÿÿÿýÿÿÿÿÿËBÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿýÿÿÿÿÿÿÿÿÿÿÿÿÿÊvÿpªCFIT1.PASKßÿšÿõÿ òÿ�ÿ žÿ‘ÿ‹ÿ–ÿöÿ›ÿ�ÿÄÿ“ÿŒÿÅÿ˜ÿ™ÿoÿÂÿŠÿ !"#$%&'()*+†ÿ×ÿÖÿ�ÿÓÿ�ÿ,-./0123456789:;<=œÿ’ÿˆÿ‡ÿ„ÿ‚ÿÑÿÏÿùÿÎÿûÿÒÿ ÿØÿÕÿ—ÿ‰ÿÍÿ¤ÿ¢ÿ•ÿÔÿÃÿÁÿÿÿÿúÿÌÿÆÿÀÿ¼ÿ>?@AB¶ÿ¬ÿCDEFGHIJåÿãÿËÿÊÿÇÿ¾ÿ¹ÿ·ÿ²ÿ±ÿ¯ÿ­ÿ§ÿ¦ÿŽÿÿþ×9ï³ÜåΡ·§Ëxþ™§ßð0ü€•íNY¹ÎyŸå.mæZy˜ó.…µW•dUÙÚóíç’Ú8ôÆÃpøÎ\·6î–ûãÄÛÇK8Ü.®5z�tœxúèÑÝr �’ãDÉ,ïz�tÿ=ó�TY—pøMÉqÿæâæâÅ�²Þ;J^,áQÇØÑkÓ^¹„Ç¡çÖn¦¹jì¸�çU¥.á±IÓM¹¹;Re]Âáëœïh:§Ø«½˜J+—oJrÿæbGÉ‹%<ð¦$uG¯M{åÕ~À^�7e=kã0'•R'Jf¹Ø¸sÁÃð.èYê4ß]/Øî”Ö”š(·ó¹QØZ–¾ÝX{Ãá;sÝÚ(œxûèñ·œøó£ÇK8ü¦äè7ÆŽ^›öÊ%<çi¯±#UÖ%¾Õ¾×0ÜËÞtùòoçi¯Ÿ\~zL›iÊ»½–¦«—WKReZëåá<íuµ„¡8œ§½>=~ô˜öZ•i®Ú�Zž­›ÂŸÝjßk˜ã“ÔµJ �{Ù›._þ}¾ÇÝR/¸ž{mÛO^^-á‘*ÓZ/ëU˜ã“sm}å²~~{E©—õÓén¹µ„9>é=·F{­Ê¡çÖv§CY7¡u¿ÖüýN.á0Ç'‡9é»ÓSÚLešÃãVû^Ã>ìNõãÓç} ¸ÿ®¿ß�>,áïúûÝé²|¼}õáêÕåÓG�?^¾}ôøÕ¿K�æ»ÏŸ>z|õêpžöº s|¢:�æ|¾Îó5ß©Nc< xV�–1p�óMç{µSi…‡ápø:ç;šÎ)îeoz1•V–ð®³×Æ|n´×¢ÔížrãaøMÉÑÇŽ^›öÊ%¾Õ¾×0ÜËÞ´Ö% ÷²7­õò%Ç'¿q|òŽßþûòj ÃaNúîô”6S™æ0Çg÷²7­õ²ï¾ßÜ×ßïþ²{zsñ®¿ßýؽ½ZÂp/{ÓZêÓ2Æîeoz1•VxßjßëxÀ?þúÛ?¹ÎyŸå.Ãp蹵ݩåYK6iÚ�þôèñ†_kþ~'—0LsÕît(ë¦% ©k•æøl¯öb*­\Þ¿¹¸©WK˜ã³~ Î�i®¢½V s|r«}¯áq/{Ó‹©´²„Ç^¿ñüùóÏpwN±öª�6s+Ê4iâµR¼:†9>S�Âp®­¯LsUXuzþ×ãøz|öåøÇ¯Çg_ŽOþ±„s-8øc.$[B€wÆi.„%0|æ¬ !^Þ§¹}þÇÌl¾Ásg !^ ç¹mmfÓYBˆwvÿ„îCFIT1A.PASMßÿšÿõÿ òÿ�ÿ ‘ÿžÿ‹ÿ–ÿöÿ›ÿ�ÿÄÿÅÿ“ÿŒÿ˜ÿ™ÿÂÿŠÿoÿ !"#$%&'()*+×ÿÖÿ’ÿ‡ÿ,-./0123456789:;<=>?†ÿ�ÿ�ÿœÿ„ÿ‚ÿÏÿÑÿÓÿÎÿˆÿÒÿûÿùÿÕÿ ÿ‰ÿØÿÍÿ—ÿ¤ÿ¢ÿÔÿËÿ¾ÿ•ÿÿÿÊÿÃÿÁÿ²ÿ±ÿ@ABCDEFGúÿÌÿÆÿÀÿ¼ÿ»ÿ¶ÿ°ÿ­ÿ¬ÿÿHIJKLåÿãÿÇÿ¹ÿ·ÿ¯ÿ§ÿ¦ÿŽÿÿþ7sÞg½âö¡·‡–1îðø+ß¿ânøÿ®»ÛuãfÎû¬W´™›ÊÜWT¶^T“Mu×ïþwª©‡Þ¸ߞˮ�«z=޼º·„ÃíÆM�^&]�#ïß¿ª×KxÔ¼1ŽÔÌzãM/“®ß2HÕm ‡_Ô×n<¸ñüvÝn�•š7–ð(c¬ôÒ´W.áqè¹k¦¹h¬ÜšçMµ,᱓¦õÁ­±’ªÛNåvës!k™æ«‹étuuc¥—¦½òr%U·%|‡¬eš¯(§«[Jî=~ÈÝð&z;i:¾¿�ºc¿Í·êÆÝpøö\vmÜìãÈ�÷¾øù§%~Qs\�•TÝ–ðèc¥—¦½r ‡oiß˸þÿúû7î†áz=î¤éÝ;„áz=êúæÅçû÷žmåâúòr ÃNšÖãõã–§rûâúr CÖ2ÍWëq'Ma•iwøãÃ÷_ÿÆÝp8¾™ómM§{µçSmõâEM®ÜX©yc �¼¨IYé¥i¯¼\ÂwØ«ñ¢n'í8ÌI¡–‰šYoì¸~pƒ»á;Ü ïÈZ¦ùj»ÁîvmM©‰zk>5*»–µï_7¶^ÄÝpøö\vmT޼ºo �[ù|ÿÞ¿¨9úƒ�c¥—¦½r �ÃiÚk¬¤ê¶„÷´ï% �²7]¼üçiÚëg.¾Ü£Í4åU/µé’——KRuÚÊÅá4íu¹„¡8œ¦½¾Ü»�öZ…i.Z�-O ƒ¶�œŸÜÒ¾—0ç§©›ª-<eoºxù¯ùWµÜàæÜKÛýÌËË%®Çòîá㾄\¿éo×ãÇ%<àÆ›þv=^Ôw·ž}¼|vñðþ½w¯îß{–µLóÕŽËÇïß»|v8M{]†9?U™Æs>Þæù&wÜŸ¨LcÜ¡¸V™–1îp3çÛšN)öjϧÚ*wÃáðÍœok:¥x”½éùT[]Âw¸™½4æS£½µì)wÜ ¿¨9úXé¥i¯\Âá[Ú÷†GÙ›¶²„áQö¦­\¼äüä7ÎOÿÃù‡ÿ¾¼\Âp˜“¾Òf ÓæüäQö¦­\ôõÇ×oúÛõëÃ7Þô·ëOë«Ë% �²7m%¬2-cÜáQö¦çSm•»áð-í{wøöá·ïÜÌyŸõŠ»aøeË?oç†�4­Ç÷÷ï-a8ôܵõØò¤% Ó\´uÛi Cê¦j s~²W{>ÕV/®ÜxP.—0ç'ý@™Ó\D{­æüô–ö½„Ç£ìMϧÚêwxvþ�Ç�…«9ÅÖ‹v´™[¢N“&^+ųóàn˜ó•) §ÒúÆ4…U¦ûá¿}úô×ùïŸÎOþ:?ýÿ¿¿ÿÿÿÿÿÿÿÿÿÿýÿÿÿÿÿÿÿÿÿÿÿýÿÿÿÿÿËBÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿýÿÿÿÿÿÿÿÿÿÿÿÿÿÊvÿ•3CFIT2.PASRßÿ šÿõÿòÿ�ÿ‘ÿžÿ‹ÿ–ÿöÿ›ÿ�ÿÄÿ !"#“ÿÅÿŒÿ˜ÿ™ÿoÿÂÿŠÿ×ÿÖÿ‡ÿ$%&'()*+,-./0†ÿ’ÿ�ÿœÿ„ÿ‚ÿÓÿ�ÿÑÿÏÿÎÿÒÿˆÿûÿ123456789:;<ùÿ‰ÿÕÿÍÿ ÿØÿ—ÿÔÿËÿ¤ÿ¢ÿÿÿ=>?@ABCDEFGH¶ÿ•ÿÿãÿÊÿÃÿÁÿ¾ÿ²ÿ±ÿ°ÿÌÿÆÿÀÿ¼ÿ»ÿ³ÿ¯ÿIJKLMN­ÿ¬ÿúÿåÿÛÿÈÿÇÿ½ÿ¹ÿOPQ·ÿ«ÿ§ÿ¦ÿŽÿÿþ MµÚ9–�w×9„Žïpx¸¾?<ü‰µð ‹"9T¤—~IðfYô‘"ÖÂ+ü´ÕÒXhªÕÎá¤MÒ9, oÈ* ²•;Vÿë­R…Æ;¬……—ÉT.Ìí:\ï³°°›-(xi »ÝÜNY8X�…VÕν‰4=!5P²E¾´¦Íl3»YÚbJX�eá`B(á�£š4 ‡Ækå61 %¶)dMQÜØÍ6”P²Enz³t>¨51͇ØÏç³Þ8ªIÇJ¶ÈÂ+¨51Íaúù–ûãká"5Þ*¢Ø=ìö°ê"mm�µ°ð2™Ê……>ï‡7_²°ð¥Õ0…J¶ÈÂÁ‡Þ8ªI³°ð–jo ¿¼ÿøýÓ¬…�©ì*¢x¿ðY˜ÊަÅðf·¿*Ì0�c*¢XvÓÑio–Ã4fa@­‰i^vQ&sXá—÷¿ú€µ°°°ðBÓ’b¯„šÜM´Î—V1mf%¬Î²p.­Â”ðÆQM:fájr¸´EOš¤0°&ªÚY…i3ÃZx…|µ&¦y1Cµ´Î‘R„ݦÞÁ¢rj}}çPxCX /“©\°èp½Ûgá°E‡7»}¾´üæe(á�£š4 ‡¦�5…J¶ÈÂÂ[ª½Nê ·ÿô±¦¯ÞîáéÜëhÄ혅% 34}¬iÌ€oÐô±¦·ûÝîŽ b2TvN{¨¨HíyKµ7Âh/”d�p8©w4Üþ+�0·f†EòÆU_q;fá dca3 £½è�óóîz„5ƒyÛÍí4fa´¾AãµrpwdÐx­\Ù5¶¨TT„o…þºÔ,Œö¢I _v¸ƒ˜„Öjo„ð²ìÌýáè³p¦GÿTv/³pf�þ©ì{¿½z9^ ‡Ýþ~¸Þí¯Ôš˜æÃ~<vûñªécM£0Ú 21¬Ð$=)-°F{&CXÁ7X “‰9„š–{%Ôän¢ukaaá…¦%Å^ 'õŽn¢u6 ¯°PoRïàîÖT'Ò káK«Á‡Þ8ªI³°ð–jo„�“zG…ÉÂÀI½£Â ·À ´ÿA{ñßÛ1 MRø²;À%Ä$Œö|Rï¨0ƒ/?o¦GÿTþU6³GÿT~)¯Ç, œÔ;*Œ0™˜CXá¤ÞÑM´Îb-,¼úã~þøôïÝ�c-,¼¥Ú›°Â‡÷/>b¡©V;ÇZh¼V®ìœö”…�o…þºÔ, TD±ìvû, Äd¨ì[T”…¥Y'Œö\“»‰ÖÙaÚÌ6fÌÂhϾ�I1‚»##ŒöbKµ7Âá¤ÞÑM´Îfá°(’¦Íl3Û͘…à Wío8�ï€yRBá Up [‚�‘"îH WmÀZí™Lzã|�˜ “‰;áߟ_µ¯ŸÛó«öõs{~Õ¾~nϯڋÿýÿÿÿÿÿÿÿÿÿÿÿýÿÿÿÿÿËBÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿýÿÿÿÿÿÿÿÿÿÿÿÿÿÊvÿù8CFIT4.PASQßÿ šÿõÿòÿ�ÿžÿ–ÿ‘ÿ‹ÿ�ÿöÿ“ÿÄÿ›ÿ !"ÅÿŒÿÓÿ™ÿ˜ÿœÿoÿ†ÿ×ÿ#$%&'()*+,-./ÖÿÂÿ�ÿŠÿØÿ ÿ’ÿ�ÿˆÿ‡ÿ„ÿ‚ÿûÿÑÿÎÿÏÿ0123456789ùÿ¶ÿÍÿ¼ÿ‰ÿ¤ÿ¢ÿ•ÿÇÿ³ÿ—ÿ:;<=>?@ABÕÿÒÿÌÿËÿ¬ÿÿÿÿÔÿCDEFGHIJKLåÿãÿÛÿÆÿÃÿÀÿ¾ÿ½ÿ¹ÿ±ÿ¯ÿ«ÿ¦ÿøÿÊÿÉÿMNOPÈÿÁÿ·ÿ²ÿ°ÿ§ÿŽÿÿþ �š úÖú�9ÆÃåï�Gaá)xÔ¤¶'X×§e¡‚£ð¿™º7 �š |À‚´ º�A²ŽŒ"‘©ýûúK£T£µGaá>¸ÚÇ�ÙÇ9î®YXØ� ŠÖÚÇ9.çóÆì³p4:Æ9Œª­+´Bh¡dR~0÷ÍØŒëÞ¤>V0:fáèb¬`�§Ž4 ÇÖjí›Å Û—…£i¶MT)­û@m#kÛmÌÚ4µí6f½m„cMÔÔD%VP2) /4ôT–Jèȯ‹ñfz0Š}3V0:fá<…«`�§Žt–…èÈãÁ¤%ÕhƒÂÁ¸£jÆûfÄQø€¶†WÂ&�¨{ã=)˜mXzÔ^�íÞ<’u„£°p\í£ÁwçkŽ[Ìñ×ùš……ŒFÛ<Ç ÖyêH³pl—¥£XAɤ,,¼¥Î:a`§ÖÓ´úeY:ú«Y”LInj—¥£Yl‹vY:úáz¾Â¿‘C Žª¹×% ”jÆpÚRg�0†¥/wj=M«…6Æ�Xë|ý#V³,•LInr3a 7KçmÂäþy7ƒq“ûa¾1ûYÆpc[´VkÿF­ÕÚWóÖ¤š@©&Ü'ýÔkÆpÓ…­æø‡„ã–:ë„#ð\ÍÝ×Ë{›…#°´OÕü9 G`|´OÕ|2_·ïžgï¦Ëùúuº;_ß©q%lÞ_Î×Ù»vY:š c¸!WâmÐ÷)„ŽÂNäJŒØGar%ÇxÀBCOe©„Žüºop^hè©,•°Sëi]Œ7Yø€…Zç–þ�`\½#­q~0mó+Xç©#ÍÂÂ[ê¬vj=%—…��ZOÉM+àÃÍ1üù†›?îz½_Ͳ0Ð…­æø‡„1œvj=%7ÙêC³´OÕKuiÆGûT}_Ý5ãº7©´OÕ÷ÕÝ, ;µž’ËÂÀN­§ä¦Õ­ó¤=-ß~NŸ‡›ÿÿÿýÿÿÿÿÿËBÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿýÿÿÿÿÿÿÿÿÿÿÿÿÿÊprogram determ; { -> 55 } { pascal program to calculate the determinant of a 3-by-3matrix } type ary2 = array[1..3,1..3] of real; var a : ary2; n : integer; yesno : char; d : real; procedure get_data(var a: ary2; var n: integer); { get values for n and arrays x,y } var i,j : integer; begin n:=3; writeln; for i:=1 to n do begin for j:=1 to n do begin write(j:3,':'); readln(a[i,j]) end { j-loop } end; { i-loop } writeln; for i:=1 to n do begin for j:=1 to n do write(a[i,j]:7:4,' '); writeln end; writeln end; { procedure get_data } function deter(a: ary2): real; { calculate the determinant of a 3-by-3matrix } var sum : real; begin sum:=a[1,1]*(a[2,2]*a[3,3]-a[3,2]*a[2,3]) -a[1,2]*(a[2,1]*a[3,3]-a[3,1]*a[2,3]) +a[1,3]*(a[2,1]*a[3,2]-a[3,1]*a[2,2]); deter:=sum end; begin { MAIN program } ClrScr; repeat get_data(a,n); d:=deter(a); writeln('The determinant is',d); writeln; write('More?'); readln(yesno); ClrScr until (yesno<>'Y')and(yesno<>'y') end. ååååååvÿo+DIFFUS.PASXßÿ�ÿšÿ žÿöÿ õÿòÿ–ÿ‹ÿ�ÿ‘ÿŒÿÄÿÅÿœÿ !“ÿ›ÿ™ÿ†ÿÓÿ¤ÿ¢ÿÂÿ"#$%&'()*+,-’ÿÑÿ„ÿ‚ÿÎÿÏÿ˜ÿ‡ÿŠÿ./0123456789:;<ˆÿoÿ�ÿ×ÿÖÿÍÿ‰ÿØÿÒÿ�ÿ¬ÿ ÿûÿùÿÈÿºÿÊÿ¼ÿŽÿÐÿÌÿËÿ=>?@ABCDÉÿÇÿ¾ÿ—ÿ¸ÿEFGHIJKLMNO¶ÿµÿªÿÁÿ³ÿÿÿÿÕÿÆÿ»ÿ®ÿ­ÿ•ÿúÿPQRSTUVWãÿÛÿÔÿ½ÿ¯ÿ«ÿøÿñÿðÿæÿåÿÃÿ°ÿ¥ÿ”ÿÿþO4Ü).ضÝîašóŠW¯~Ë·Ûç\×RËÿÓžh¸S\ОX»A›6:ÄÆ1õWÓ—‡�'v­s]Ë»AôŸÍ¶ívSF†ÿ;ã–Ï\×rÅ£Öæ—x˜¦W¿´� ½�準+Þ<±¢›‹aû°ñÄho½]jÉÌ_~úÍ›7¿>Ô’™ÿò»ÿùW®k©¥–u§žq¯<óüvμb=x¢6ö‰ëZò"î×<ó}μâɰÙ�ÃE‹ ݺ˜¸®%•gn.ÿôã‡9¯¸‹‰u§c纖Zúþ‰3´Ï3!Åþxsyy÷:1ì�c3×’¡ý”gBŠýñæòò"î×Ã96s-Ú?Ï3!Åþxsyy÷:Ü\^^ÄýzbØ!Çf®%CûçSž )öÇ›ËË‹¸_7——q¿žvȱ™k©åE¨–¼?ìû·klÖ\íçZ²¶yjÛ\íçZr¼;Lí.Bûi®%G �ã:lr¡�ÝwÖ\K®ƒäÍÛuðî0iÊ96s-µÔòDÃêíƒÌ�ûÛmôxú"Äýaè‡íBh?×’ ¼1jx´ÐÆî;ëÙ\Ëw̓'vƒ5<"Æ-!Å~¢¶\×RË‹P¶\hc÷�5×òÚwm¬F �–ó‡¹èÇ›ÓrþáööòvÎíñæ´œo.¿|uó|®úñùi9ÿðéöòvÎíñùi9ºüôñÕÍó¹èÇo§åüáööòvÎíñÛi9ß\þøñÕÍÍ\ ôã÷ÓrþðéöòvÎíñûi9ÿpyóñÕÍÍ\ ôã§ÓrþñööòvÎíñÓi9ß\þðñÕÍí\ ôã§åüã§ÛËÛ9·ÇNËùûå÷�¯nnçZ ?œ–óŸno/oçÜ?œ–óÍåó�¯þ4×»A´å|C5} ¿âñûýÌãÿ3�ÿãÏŸúÝç—ÏæZ`7ˆ¶œo裆Gl‡Zxüî‘Z÷f|Ú–o‡~l§åÇåö°=¶Óá%/û·klÖc;=›k�GjÝ›qæ‘Z÷f|ú’σw»¶6�}âå³¹x¤Ö½Ÿ®ƒwÇ›Óá%ë0N=ÆN·.^>›k�Ý Úr~N×aÃv¨…Çï©uoƧëàݱ�žÍ™W ýg‹n]L\×�Ôº7ã\ ×’É~!´ŸkIÿýEˆXíŸOs-Éã¿¿q·ÚOs-ɨáÑa\‡ÍB»ï¬góu-W\DW»çâaÓÛ“M[£·aDÃCo£¹®åŠ8Óãôd˜Ì=½]xâžëZ®¸;³§· OÜs]K-Wÿø+>/oþò›Ÿþúñòw¿úg®k©åÊ÷Ýcà «·2wñ0M{ú"Äë%CûçÓ\Kfòøý~ÉÐ~škÉLxb¼[2´ŸæZ2ÆuØ,™mì¾³æZ2^„°4hÉ×ðqŒÏæZ®k¹úÇ_ñËO¿yóæ×—¿ûÕ?s]K-O4¬Þ>ÈlÚ¸kýéý!óŠ6nýÄã6ÆÎ‹P‹×s]K&û…Ð~Î+¶~âqë±ó"ÔâõÆ\×’É‹û·klÖ…Ð~Î+ÖØ¬›èÞ²õ“K^„Z¼Þ˜ëZ2yBžÚv�Ð~Î+BŠ=ÃyjÛ‡ØL\×’É‹ëàÝ„öÓœW¬ƒw»¶6�}⺖L^„˜ÚÝÂãw¡ý4ç–1Œ¬ƒw»¶6�}⺖LF �ÿ[»ï¬9¯Øx¼ë?3ì)ö\×’É‹ã:l �ÝwÖ³9¯.^[ ;ºu1q]K-WlSgúòòÄ®uúÀ¨á“ûİãž·ìyMÃŽ'CûÄu-W¼ñ+ºy¢aõöAží­·K-ùæ/¿ùé¯yõ[vƒ.˜¾<„Ì:x·kkóØ¹ˆ®v_KþòÓoÞ¼ù5¯~Ë/ñ0M¯~=h#Þ´‹6FoÃÈu-µ¼åýEte.„öÏçÌ+¶Ñƒ‹èj÷\×’‘¹Ú?Ÿæ¼b¼Ûµµyì\DW»çº–¼Ë\í§9óŠu§cç…×>ˆëZÒÒ Ì…×ðqŒs-Ù;Œ™ mì¾³æZr²q“¹ Çf®¥–×¾kcæO4¬Þ>ÈlÚ¸k�ëZ`\‡Ír~>çãÃÅk‹aG·.&®k�Ý Úr¾¡Œ±jáñ»×¾kcæ“ûÃ.¢«Ýs] �ßß_D×±nNËùæòvÎ+vMSg6#×µðøýýEtÛáùi9ßÛ)¯˜¼ã–uØ<\Œ\×Âãw·s-0}yùéýEtö‡8ÜF �ã:lžÍµÀ]?@ABÿÿåÿÁÿÀÿ¾ÿ¼ÿ¸ÿ¬ÿ§ÿÿþw]ŸuÒåaöˆ/¸þöûÞÂÂ/ µ_¦Þ¸ZA]‚ùApq½ÒºÖPNj0®Vð^{�ñDúDbšúÅ ã¡V„XÀ³®ê•.'5W+ ]&±Mý²)@S¿xá8U:å ACÚQï½j\­ .Áü øO?5�ë�Öµ†rRƒqµ‚·°ðP«Æ`óS›»CLÁVãæÏýÍ £ ˆ)äÕ¶ýcôÂhöˆ)äÕ¶ýcôÂhfÄò*·ö;Ÿo^Í'b y•Ûí÷Þ†à…ÑlSØWùx›óýãº÷ÂhFÄæjÜoóüóq�½0šb Ûjoçí¸\?½0šoÄÆjßy×­FcsÄÆêò<Ü×Ñ £±1…±šçq;o×›Fcb Ûj·ÁÎ�ë·^{�1œšé‚X€¦~ñÂè pÊЙ´~ÒÙ)a€Š4fÑ 4Ó¥HÍgC–˜mC–˜±‹!KÌ­‹!KÌwC–›w1d‰±¶‹!36lÚ// @º,ÒPåÅ{r�a³k~jswY³Äv1d‰ ] Ybö] Ybæ.†¬™.›ö—0©ƒÇ”“Œ«�.á-,\Nj0®V@º’X€¦~Ù ©_¼ð †úr_èBÊ@]i]k('5W+x µj 6?µ¹;Äl5ŽaþÜß¼°ðÚkŒá´žšé‚hê/,ü¤³SÂ1iÌ¢X‹ÔVù. UžÅ°ñÂÍt)Òu—Øî–­»ÄvßÙºKlgólÝ%¶³6[w‰ílÈÖMûË 4Ó¥H×]b»}¶îÛÍÙºKl÷™­»ÄvÛlÝ%¶³fºlÚ_^€t9©­ò]BñžÄ°ÉbÖüÔæî²Ävë.±]Èšé²Ùl„I<â ÊI ÆÕ H%¼……Ÿtv ñ—Þ)x ü{Ñÿ´8ÔŠŠ´ì—†¼0Àoí -Ê hºSo„¡=þÖÎPòñ/}þ'|l¼0´GMýaQIÜxah�®„øg^å`~�‚C­¨H�žHÚ#- Cûõ¤³SÂèJˆi^å`~�F€'��Fh�¤‹4¯r/ŒÐi(R[åÂ@ê Œ´4$ŒO:;%ŒÐ] ñO[}‚ùAJ¡ýzÒÙ)aDÒEJºLâÆ #ÒP¤¶Ê¯¤…Ú/Ra„öHKCÂíדÎN #ÒP¤¤Ë!‰/ŒHºHm•_iFh�¤øWÂ[I¼0þÖÎТ’�ÿ¥ðqŠÅ­˜O'xè2…�é†ÓÇ ºRø8ÑPذ†ö‹Ô_àJx C{œ”q jE¤•ðßÿj�k�µ_ÿf|ú’σw»¶6�}âå³¹x¤Ö½Ÿ®ƒwÇ›Óá%ë0N=ÆN·.^>›k�Ý Úr~N×aÃv¨…Çï©uoƧëàݱ�žÍ™W ýg‹n]L\×�Ôº7ã\ 326 } { evaluation of the gaussian error function } var x,ans : real; done : boolean; function erf(x: real): real; { infinite series expansion of the Gaussian error function } const sqrtpi = 1.7724538; tol = 1.0E-6; var x2,sum,sum1,term: real; i : integer; begin if x=0.0 then erf:=0.0 else if x>4.0 then erf:=1.0 else begin x2:=x*x; sum:=x; term:=x; i:=0; repeat i:=i+1; sum1:=sum; term:=2.0*term*x2/(1.0+2.0*i); sum:=term+sum1 until term?ÿÿÿíÿåÿÁÿÀÿ¾ÿ¼ÿ¸ÿ¬ÿ§ÿÿþ/¹Þçñ€róu*å�Ïÿàë×3ïá7ôñxÚ{[+ëžþMÜ·óÜŽe®É~[¯z[+ïáðÇc–Ý�òNW¥ RÇÓ.7kU)ƒ×u=éX§px¿­W½­åþq7HOOƒÔñ4…ßhußjëbV6Íh÷r¬s[+ëžþMüç¸�çv¬(sMöÛzÕÛZy‡¯Ö:÷2ÿÊþÒJY¸¼øñãúûï_NáÒ×S) —ç??ŸÂá�Ç,»ë»y{¸›·‡Ë»®< RÇÓ.­”A«]÷Ê)~Õ}«a6·»ë±ìžwS˜Íí¼=Œe7…ÙÜvåa,»)Ìæ¶�å<…Ùܦ^tìáÒÆÒ>]Ná2o—c™·‡)\ºò0–ë‹ósWžw×_//Ο®/ÎÏíi —y{KW>ÍÛÃe˜Íí¶öv¢+ôõô>?våaþtyq~šÂ°_“6–®<Ìܬ¿Õ¾rÉÍfóðªûVÃlnçía,—çOíùã—ífs»˼=„Ù<¨ÞLaPî¯Æ¢ÝËãçÝõÓ—ÇÝó¼=<Ï¿²¿´§°êÍTÊÊ«=ïáð«î[-å�ñUÞÃðïSþ÷*§0ܬUcÙO³¦0ü–­ëT§0¤^tìa6¿eëzüð¯¼ÿ'ž¦0›‡ÔñæTwOS˜ÍCÛ³ûã|q¦Såf­KÏ­ÂltšfsûªûVÃ¥íÙ-ç‹3ý›j¸À«î[ 6ʱœ/ÎS¸°yÐÕX./Îáª7á¢Ó¬p�WÝ·.lڞݗ¿Ó¿©† ›ÛWÝ·.E9åþq÷4…KÑÕX./Ο•áÂæVõ&\Ø<è4+\ØÜ¾ê¾Õp)º‹rõ¸{šÂ¥(Çryqþ¬«paó zSÞh{ÞÃEõf —ß²u�êã‡ÿ-|¸Û�ŸãûÝþÌý‡;帼?ï>Üñgî¯>Üéj\^?…Ùܪޔ7Úž÷0›‡mííÄÍZV½¹ÿý/›¿ýuóð—ÍíÿFh�¤øWÂ[I¼0þÖÎТ’�ÿ¥ðqŠÅ­˜O'xè2…�é†ÓÇ ºRø8ÑPذ†ö‹Ô_àJx C{œ”q jE¤•vÿJERFSIMP.PAS@ßÿšÿõÿ òÿ�ÿ Œÿ–ÿ‘ÿŠÿ�ÿ�ÿ“ÿ‹ÿ’ÿ›ÿöÿÄÿÅÿžÿoÿ ÿ !"#$%&'()*+™ÿÏÿÂÿ‡ÿ×ÿÖÿÓÿˆÿûÿÑÿœÿ˜ÿÕÿ�ÿØÿ„ÿ,-./0123‚ÿÍÿ‰ÿÔÿÎÿÒÿÐÿÿùÿÌÿ456789ºÿ—ÿÿÿËÿ¬ÿãÿ:;<=>?ÃÿÁÿŽÿ†ÿ÷ÿåÿÊÿÈÿÇÿÀÿ¼ÿÿþSŽç<®(/J]§ýn÷Î׿òóãO>„ÃïÔ¶è9�K�׿óG]§2Ú[aÕòëØø?�V–Ý2æÝîŠ/�—¿|ý}:ænM»Ý�×1fÛ>¼+}½ëÓ¤¼›Ç½ò.¼S^Ü-÷cª»©ã¼‡/z{Zêh\\ß\Hç۩㼿깶0\\®t=Ý|½~¹¾ «mûÝî�‹Þž–:×|‡ÃSŽ'm=E©ëTn»Ý<î•w}š”w˘wRÇyÞí>“Ò×Ýî@ê8ßîÃáwZ_•õé8SÛ¢ç<.u4^ÿÎu�Êho…ì³ø~碷§¥ŽF-\\ß1×µ.…cŠyÜ+9¶�>MJ>„ß¹¯Ë¯´¾¾*¤žëhý­g–ÁTõ¤Â‡ð;Ó1—ºÔѨ…Mór<_ßqlå^I-”¾ò!þtÌ]ÝíÔ¶èY¹ï®ï6ÍËñ|}§OjçÒ×»ðnlÛ¹ôõNm;—¾Þ…w¥¯_v»©ã¼寧'•Ýî@m‹ž•ûð«žk ÃTõ¤r¸ú¸æy9ž¯W7}š”_çq¯¼ý6U=©ìÃ0¶í\úz¸º¸¾™Ç½òó¦y9ž¯o÷aÐ'µséëáêòñrµí\úz¸º¸¾™Ç½òöóÅõMŸ&åí> ¥¯‡«µí\úúù÷ÇË—±mçÒ×Û—Mór<_ûùx¹Ã}ÖEs»™ªžTÿº+}½Ý‡!5鸄9=LUO*‡«©êIååã>Ìé¡ôõËáªôuæô°i^ŽçëÃÕMŸ&å×yÜ+o¿MUO*û0§}R;—¾®ôIí\úúylÛ¹ôuæô0¶í\úz¸º|¼Ü‡9=\Œ¤®¾° ¦ª'¶ú‰�l#ÌéÇ«žk ï®Wó¸W~Þ4/ÇóõËÍÇÇË—úõËãåí>¼Ûv.}=\�m;—¾~¾¸¾¹¾ sú¡¶íÜJ_W7jÛ¹ôõóï�—/cÛÎ¥¯Ÿ?>^¾è“Ú¹ôõöeÓ¼Ï×ß~>^îÃÐÛRgޝå¦ôõkéë—Û¿\_ËÍ2æ—Ò×/·aµm¿{§Ôu*|‡_õ\Ûn÷Îz¬�)ÇsW>„ásþñ”û0l£épuqœ‹öaXîÇTW/¿•¿år3ÕÛ}æq¯<\]>^îÃaHM:.aN÷YÍmæôpŸuÑÜnÞ~É‹ÿòv»szH·¹ÝôiRÞîÜê}š”¹|¼dùU�m4®–ì szÐ\D½ O“òêòñ’åWµ0§÷YÍíæí—¼`\pùxI-\>^¾Ý†Ã;ÍE»wú4)ÿzɇð^õ\[xÇé¡Ôu*7ó¸WÞõiRÞ-c¾+}½Ý‡wœ”‡«å~Lõ¥ôuÞqz¸Ïºhn7o¿äã‚·»>MÊÿïÞ·;åÅáËÇÃnÜþ¡¶…9=ô¶Ô™m4…Õ¶Çð?¿ÿíôðýôço§‡ï§?;=|?ýøRëÞŒO_þùöüòðÔ÷Ož®ƒwÇ›Óvÿs©FITPOL.PASSßÿ �ÿšÿžÿ–ÿöÿõÿòÿ�ÿ‘ÿ‹ÿŒÿÅÿÄÿ†ÿ !"#$%œÿ“ÿÂÿ™ÿ’ÿ›ÿ‡ÿÓÿ¤ÿ¢ÿ„ÿ‚ÿŠÿ&'()*+,-./0Ñÿ˜ÿoÿÏÿÎÿÍÿ�ÿˆÿ‰ÿ ÿ×ÿÖÿùÿ123456789�ÿÊÿÒÿËÿØÿ¬ÿûÿŽÿÌÿ:;<=>?@ABÆÿÕÿÇÿ—ÿÉÿ¾ÿ¼ÿ¶ÿÔÿCDEFGHIJK¸ÿµÿªÿÈÿÿÿÿÐÿÁÿºÿ³ÿ­ÿLMNOPQR•ÿúÿãÿÛÿ½ÿ®ÿ¦ÿøÿèÿåÿ»ÿ¯ÿ§ÿÿþ²k jé¶LJMxøûw÷˜�žð_ Qâ@vM¢�·80Õ–”Ò± ”,‚¯‹ ¨¥Çlôoá?2Hxiakìq°ev¶‘¢ ˜�žp”þ#¾Kß[j…ÙÅKǘ�žð|`žÑØv)9À1·ÜF£•Rß}þáùùûÙh£�.¬ ^5¢#Ua¿MJMh…8�t>`6Z5¢+T…ǤԄƒ-³³�% 2Zu}îó¹e¡"åd´"²U*BPNF«ÂrݹV‚rHF+Göػ–*B:Ïk¦d´*,—çÂr­"ˆE™Œ6ú@¶àv!Æšý¹^\N‚ÐEÊI© Òµ|`× çq$Å]ɘ�V ÀIr„ œ”šÐò�]+œÇI�w%c6Z)'Apd�Òy^3]“šP²[û�°5N\xK³ÑÖìqåµ%8×B‰Ðõ³ÑFŸ)©"¤ó¼fJF}ÇkéŒ&¥X‚tkÔ¢ð–f£Gö«Ý6 tÃnŒÕvµK*»1VÛÕ»ûýc2è†ý«íjŸTöc¬¶«wÛwûd4Ð oc¬¶«û¤òð6Æj»ú°Ý½%£�nxcµ[m“ÊÃã«íêÓ�ûm2è†û1V»Õ>©<Ü�±Ú®>½í÷Éh >�±Ú­î“Êç1VÛÕý‡Ý}2è†ÇXíWÛ¤òðã«íê~÷¸OFÝðaŒÕÛj›T>Œ±Ú®÷Û]2è†wc¬WÛ¤òðnŒÕvõvÿéS2è†ÝvŒÕ§Õ6©<ì¶c¬¶«ý�÷÷ÉhvmRjÂ�lÁíBŒ5{´Â ÌF} [p»ãHÒó¹^$£'H:»xø� á‘)`6ú$HI!�ç5S2úŽ×Ò Iz.]28’ô\ºd4p$é¹t—'à+6·ÿasû6·|ùüûlnüöüõ?O×d4P[‚ŒÕÞ‘=¢µFcór$é¹tßún�cüw}äßÅÇ>Ÿ Qƒã»øØÙrŒïâã5 Iz.]‘¤çÒ]žðÅr]ËB²óLd)à隌Ž$=—îRX®‡Ý?Äûþ O}�ëa7öO(¬ ^8ÏÔ<]“Ñ@m 2V{x WØ­5›—#IÏ¥»–ëAŽñC¼ïŸðÔ¹äxMJM°þ#$£6> Â:BPÉhGöػ–Òy^3]Ólô„Fx’š¥ôòPÊBxiÈ.^:ÆlôQÁ“pá`£ƒ— t˜�ž°®�áeÃf£§¿~Å—øü÷>ÿñÛê÷¯Ãl´ÑwžÉ‰²· 1Öb áO—“ ÜE%(ïC2Z)…Í-G%(‡d´R 8 Ba¹ŽJPÉh¥à [F¥¤ó¼fJF+¥€“ 0‘¥¨î¬-Y¸k2z6zúëW|÷ù‡ççïW¿ýf£�>�-¸]ˆQJWKéz¥&H×ò�]+œÇI�w%c6Z)äA9© -صìÀÖè \‹Œƒ�`k¬t>`6zÂ3˜„gÈÜ.Ä޹å6­žÿþÃç?~Ãï¨-5¯‹ Fa¹®e!Ùy4“ìŒVß}þáùù{<üŠïÄÂÃ÷–ZáÀ¥l¤^Z‡Ùh£O‚T×OJEÊû¤Ô„Vx�Fx’f£•P*BPÞ‡¤&–ëZ’�G#<ɳÑj­T„ ’R ë‚ÎãÄ…·„ÙhÅD–”Џ³¶dá’ÑJöê]£T„tž×LÉhÕÉ>Ë>} ÐæÞh–æœû°4ç¼WÄ¢LF}Çk锚p [p»£”®–³Ñ€+l«Ç¤&¸¥¹c‚­á™š€Ùh ¶«¼…#{Dk�ÆæåŽ×Ò)5!°_h„'Ùa6›['cÕ rLFcsË2Vy�c2›[×Oƒìwc¬v«mRjIÁ£°åÒ8ÌFcsëái�ý~ŒÕC'ßg™Ô„À…u- [.�Ãl46·®žÙ¿�±êdRüGI- [.�Ãl46·®žÙ?ޱz¯téäõ}–Fcó®MFáuÄ—®žúÜ‹~Ý;²ÇÞ¶¼&£�µXBøÓEôë¾°\÷®°eÏD–®Éh ,Í9Çj»Ú&£�°4ç¼�ÕvµMF�B¬¶«m2¨-AÆjoáÈÑZ£±y¹ãµtFcsëd¬ºAŽÉhlnYÆ*rLFcsËE¬ Ëõ°¿] Ëõ°ßgù­°\oãCa¹Ç÷�|Ÿåõ}'“ÑØÜò¹e1È1V¹HFcs#²ä«\ÈuïÈ{WØòšŒŽ$=Ÿ[á…ÑìÚ•Ñÿþió¯Ÿ7/?mþòóæå§Í_~Þ¼ü´¹ý?ÿÊHvÿg§GAUSID.PASLßÿ šÿõÿòÿ�ÿ‘ÿžÿ–ÿöÿ�ÿ‹ÿ“ÿÄÿ !"#Åÿ›ÿoÿŒÿ™ÿÂÿ˜ÿÓÿ�ÿœÿ’ÿŠÿ†ÿ$%&'()*+,-.¤ÿ¢ÿ•ÿûÿùÿ×ÿÖÿÎÿ—ÿ„ÿ‚ÿØÿˆÿ�ÿ‡ÿÏÿ/01234ÑÿÒÿÁÿ‰ÿÃÿ56789:;¬ÿÍÿ ÿÕÿºÿ”ÿÔÿ<=>?@ABËÿ­ÿ¼ÿ¸ÿ¶ÿCDEFGHIJKøÿÌÿÊÿÈÿÇÿÆÿÀÿ»ÿ²ÿŽÿåÿÐÿ¾ÿ·ÿ±ÿ°ÿÿÿþw �Ú ��kWfïÏx}ÃñóŸq>ãnëÑ&Ü5tj'Ä€;itBí¦9Ek(Ì5ê�æè‚ÁEøŒaÁ¯v®ë×OäJJ¸Ÿq×0R9+áÓ·ßþ WÙ1Í%•¸ �ÁÔÑOö¡¾ÅŸ²°Ÿìcô-þ”……ãr'ouñ-¬ª]VÇ——É>t�Ð@ɦ,ì­.µoaUí²:¾¼Lö1®(Ù”…½Õåsí[XU»¬Ž//“}h|y™ìc\#4P²) ¿[õ‹/`uÉÂ~ ÔøV—: {ë X]>×YØ›~òœ‰Ô‘faß8­c/ìI5¨/0„�Èš,,,|×0R9+¡£ø¥´Ñ ûý»UX_Àêò¹ÎÂïV±øV—,ìñn¦Ÿ 8©#=dá3:Šx·i¦MPXSªڥ†í\„…ß­z×o|g"u¤YXx Îaà¦.R2YPº“�¨¶7u‘öׇ&kÐßg]0õ_p=daT[%[&³7‡,Œjë4Nëˆx"ƒÆi‹¶±©&Pª ¿$ý4ª00›èÌÇdš…�©hM\óvD<‘Fµ¨sFÕ® W´Gă2û�:g„=pS)™ýõÛßg]0×Þ¿?da4A±)Ú#b€A„=ªí@�3ÂÕî¦.Ò~Sü¾¿×Cö¨vJ¶ÜÛ•ë7냰Gµ%SfaSiÅ/Åõ�…½’-÷ËÊ­YØ+Ù2ïÏYE<’3„‹0ª™2 £ÚÞÔEJ& £Ú6AáŠöˆ`PaT»�:g„}›¢="L(ƒ°nê"ííÊõ›uñÇâ§þŠë! û›ºHÉì¯Åµ_Vn]ü±øé ŒjG¦Ì¨v7u‘’Fµ%Sz†k`ÞŽ¸”j‚k`>žˆ'20Eûj²00­&Sfïϸk©œ•ÐQüRÚhq¾k©œ•pSéKi£ÍÂgÜÕ™ˆ0GÄÁšúFZã",ünÕ;p&RGš……ꜚ pE{D ˜PaTÛ›ºHû1P³rëâÏÅY¸©‹”Œ0™2{ÆM]¤/¥�aỆ‘ÊY 5¹RØï­/`uù\ga¿øV—,ìß­b Ô°ºÔYØ›1$_À™HiFõ»w« Õ †YsÈÂgL6ª{ iŽ. ~µs]ã¹’.ÂÂc0uô1$ßâøòüöúSö“}øÇç3 ¿[õe0ä !$²& £ú�ë7ý÷>õ¦€3‘:Ò,,ì =âØŸB*{a_ÏSŸì4”¶övè×ùJ6eaá�:g„¥;Ù(Œj{Siý™’}Øè‚AcÇô/¸²0ª­’-“Ù'; ¥=³‰.aŸì4”öãóÖ”Ø'; ¥}{¾<Y Õ EÛØTSLÑš1¤, 4AáŠöˆ`^�(ƒ0ªí@�3¨vƒëŠÖõÞ®\ïÖ‡,Œj—ŠÖeaT»&(6Eë~ Ê ìêœögÔdu<¡ Šdµ£:‚Md".°CÑÚ¡ÞÛÕ¦wëCö€k`‡·Áuˆ'2ÂÕv Îa�j7¸®hí�…=ª]*Ú�°Gµ%S £Ú‘)³÷gl^Sw\„Qm]ƒÁuíóå‰x"R Z´QgFµ¥T“0ªÝ@�3ÂÞ5HoñDFØuÎ{à g"éx²¦#h¸Õˆ÷9â"ì�3’ÕŽêJ4‘‰¥³]06á"ì�&(6E{D 0(ƒ°Gµ¨sFØ£Ú�B*‹Ö®R¿Yga�jgW©ß¬‹Ö®\¿Yga�jgW®ß¬‹öR)ìQmÉ”Yا�Ê¢]Vi�…=°¬Òºh—•[ga,+·.ÚSH¥°'Sú3\ƒôñæpFµ#Sú3\ƒÁu¸£Ú’)³?ý¦î¸®�]™Þ¬ÛçËñD¤´h£Î$ PªIÕv ÎaT»&(\Ñ Ê ìÇ@ÍÊ­‹öùòÌޟጋÎ&t3Õ5.¨v®hŸYÕNéN6 {W´îÇ1 û2*Ú¨3eaßŦh�ˆeöÀ@�3ÂÕ¶ž§¢]V›uö¨¶MP|/Ú#b€A„=ª�k°ùxûŽx"#ì}=OE[ÏÓ«]múïë¯c fõ}�…=ª­¡G‹¶ž§Úզ߬³°Gµu ìPï =âø:jV›õá-†„x"#ìQíêœö¾ †Š¶±©¦,ì½k`èǯc fµY<_žˆ'2ÂÞ†q,Úý¨YmÖ? =âxøú|ùƒ°Gµ#Sfa�j;jV›uÑ&; ¥ýjèÇûãËó5Ùi(íáë¨YmÖYØ£ÚÞÔEJfúk?jö×~Ó_íµ5«Íú ìɔޟ±yM!ÜqFµ›Mt e0„ Ø»·É>™2û3\»2½Y·O\„×À½Mö�x"R Z´QgÊ€k@ªAOdpS)™ýõÛÏ?ÿ÷ç³QÝ®FíL7'«×ƒ0™2{Ƨo¿ýaá�:g¼?ãoÿúí?¸kèÔN¸�Ó:mÔ™²0ðKÒO£faà¦.R2Y¸©‹”ÌþúÉMsŠÖP˜kÔ!ÍуaÁ¯v®ë×OäJJ×C”îd£0ªmGñKi£ÝÛ~éM?²0ª­k`ÞŽˆ'2¨vuÎûš\¹·ýÒ��šÞô¤ô�…½k`B©E<‘ÁM]¤/¥�VÕŽL) Ì&ºóñY˜Lù"ü�ÿU»ÿëd¬ºAŽÉhlnYÆ*rLFcsËE¬ Ëõ°¿] vÿ5×GAUSS.PASOßÿ õÿòÿšÿ�ÿ–ÿ‘ÿöÿžÿ�ÿ‹ÿÄÿÅÿ !oÿ“ÿŒÿ�ÿ›ÿÓÿÂÿ™ÿ˜ÿŠÿ¤ÿ¢ÿ"#$%&'()*+ˆÿ†ÿ’ÿûÿœÿùÿ•ÿÎÿ„ÿ‚ÿ×ÿÖÿ,-./0123—ÿ�ÿØÿÑÿ‡ÿ‰ÿ456789:;<=Òÿ”ÿÏÿÁÿ¬ÿÿÿÍÿ ÿ¸ÿ>?@ABCDEFGHÃÿÿãÿÕÿÔÿÐÿËÿÆÿ¾ÿ¼ÿºÿ­ÿŽÿÌÿÈÿÇÿIJKLMN²ÿªÿúÿøÿåÿÊÿÀÿ·ÿ¶ÿ±ÿ°ÿÿþ�' ;Lanšì/xóüW¦ Cs55NvH�¢cÔÛÍu NâÜ ‰õœ,:´[| sÓXp�ÚvæB²èpeºàQãAºY_~ú뇰æõÜI‡+Ó)ÂÜA%47ïZQÄòÛ’E×ôó´—° /ÚïÂËW¦CtMò»ð¢~ÀŸ™ÉïÂËÁø331¥í£ø [? ¨†ír~~Þ…]G¨„:3ù Ûƪa»œŸŸwáå°"ŽP ufòA·Ÿ? ¨†ír~~Þ…íÏÏÏ»ðrXG¨„:31½õ[_tÛd&ˆ2ú‚ Û&3ùà ‚n?5™É»~ç Ì%™D3“M›Ô3yQ�ê Úk .311=j´}kS�J¨3S+“9&@T£–a u#™ pep‡Xg&`Œ +Ã)¡‹L¨ö­Læü‡ø¸EŠØD}‹ ¶ ®L¨ŽcTœÊpFŠpè"“oëOkÂbýiÍL¨Ž›ÅÖ2l[™PíÅu™ £ÂÊpFŠpoÎè"ª}+“9&TÇÖ¦2„¶¹µ‹õ¶Þ3ªc]ËL¨Žv.ƒ}wÎL¨ŽcTœÊ`g¤‡.2ùV&sÞ_ÐHÐÃƨ¨ƒNÒ$H-;q W&„¶ ¡mnírêm½g&؈оomBzÇäQí[™Ì1yTÇÖ¦2„63yTǺ '&�j/®cBåÅu™ ÕÞF´6 ïžß!=ˆƒ¨F-’΄j/u#L¨Ž­L昼�¨¿zoHâ˜<ÐÊdŽÉ£Ú_`.‰‚›7 RÄãœP�¤I�Zvâ¢CgaŠ.Ô¸2yTû1*Ne8#E8t‘É£:¶2™còþ!Ö]Ú¥îOkfò¾]êþ´–¡]¬?­™Éûv±þ´–á!Ö“Gu×e&�êøë® ›¥^3“GuÜ,õZ†Íbkfò¨Ž›ÅÖ2<ĺcò¨öâºì/°õWï W&ŒQq*ƒ�‘"ºÈäQí[™Ì1yTÇT†v9õ¶~ß.ÖÛš™<ªãoË`g¤‡.2yß.§þíZ†v9õo×7éÛv±þíš™<ªãf9­eØ,§õMúv³ØÊäQíÅuþ‚Ó›:ÆG\™< ®ó؈Ö&\™¼¸.û ìMã#®L¨Ž6¢]\ïÖáÝó;¤qÕ¨eH: ª£Ô�0ùV&sL8D·–a³¸õûvq½[3“¬ îÍ93yà‚6Þ¢™Û&Yš“E‡+“T%$&�jßÌ»2¼{~—™<ªý§2Øwg¤‡.2yTÇfÞ•¡™wßµ‹õ§õÛC”q9­™É£Ú¢Œ‹­e¸m[ß4óîþ}»Xokfò¨öV{sfòÀì’Õ°á“×e��h×»ux‡+ª£�Õ¨Hâ°QKR»ÛáAoÜû§_~ýõ¿ü%$µXƒÆÜ4×AŸîLâºì/øòÓ_?|À•‰©•Éœ÷üå§ÿüW&`4mR’Î’™€ŸkýpÐÌlÔ’Ô.3µ$µ»=}°Ý\§à$Î šXÏÉ¢C»Å—07 ¤¶�¹�,º§{fT%$&TûIÒç.¤p ý¶wýîž™Pím„{FzÇ„êØÊdŽÉOanš[è·ý!ÊØ»^T£Þ3“·.&ˆjT¤qب%ùÜ…˜PÅuLÀì’Õp_}b×=3ýããÇ�_Wß|¬ö_Wß|¬ö_Wß|¬ö_WÇÿ…½k`B©E<‘ÁM]¤/¥�VÕŽL) Ì&ºóñY˜Lù"ü�ÿU»ÿëd¬ºAŽÉhlnYÆ*rLFcsËE¬ Ëõ°¿] vÿÚGAUSSJ.LIBNßÿ�ÿõÿ òÿšÿ–ÿ ‘ÿ�ÿöÿ‹ÿ“ÿžÿ›ÿœÿŒÿÓÿÅÿÄÿ˜ÿ�ÿoÿ™ÿÂÿ !"#$%ÎÿŠÿ¤ÿ&'()*+,-./012¢ÿ„ÿ‚ÿ‰ÿ�ÿˆÿ’ÿ‡ÿûÿ—ÿ•ÿùÿ×ÿÖÿ”ÿÌÿÑÿÁÿÆÿÏÿ­ÿÒÿ3456†ÿÍÿ789:;<ÃÿºÿúÿØÿ=>?@ABCDÇÿÕÿ°ÿÔÿÐÿÈÿ»ÿEFGHIJKLM±ÿ÷ÿðÿíÿåÿ¾ÿ½ÿ¸ÿ¶ÿµÿ²ÿ«ÿ©ÿ¨ÿ§ÿ¦ÿŽÿÿþÀóø×áð«®-×Çžœ—Ç}ÿÀ§—K—#KÿãÏý4ž³ÿ¿Ç¥'o–©×[tcSÞnµU¶içExŒ?Ž,ý�ý4ž³©íÓÒ&^æ6©ó"<^.6åíÈÒÿØOã9»æÇ©Ôx™Û¤Î‹ðàú·¶i>RmÊsöÓxŽúšÝx³L½Þò"<^.�ì]ýÈEšsiŸOã9SLêÆ›eêõ–½Úùq^:/Âáçü×åqßùïêëÒx³L½ÞRíeö½ÔXÚÊ®ùq*5^„ÃÏù/ŸÚ¡}fSÞnµU¶‰7ËÔë-—Üô&wª½Ì¾'/ÂÏù¿ŸÚgÔë\m™ÙÔöii/s›Ôy~ÎÿþÔo>³©íÓÒ&^æ6©Ú?sÉMo’]óãTj¼ÌmRçEø9ÿö×ÿù×_ÿƒÚ™Þ'kNÙßT[ÚÄ‹ðsþúë×?ýº?P7öjçÇyé¼?ç¿ý»ûëÿùÔ_?ó"üœ÷¿¨�öøæ’ÝØÔöii/s›Ôw^„ÃórÉ™?NáðË¥‡Çëqdé}ùãéáÛ·7ËÛíððíÛ›åíö Ýè¹Ì§ð¨¶æÛqdé}ùãéáÛ·7ËÛíððíÛ×gèFµ)ÏÙOáQ‡‡/‡ùÐ^£º^jÓ|�v˜Æ‘jSž³ŸÂcÍ)û›Ã«z©éï5¯‡ýñÍa:„Çr9\ê<Žô\æS8‡_um¹>öd½¼úôré,‡Ë‘žËüù~¹ôñ^ó:Žô\æS8|ÉsµñœýõòŠax¯y=Þ—S–ãýr Ãåx¯y g[Oc<çU×–ëcOö×Ë+^„ÃáW][®�=9/�û‡?Oáy¹ä<~üÃ)üré£_óa~GªMyÎ~ ‡Ã¯º¶\{r^÷_OáðË¥�y©6å9û)¾ä¹ÚxΫ®-×Çžœ—ÇýÃW^„ÇsªMÙ·÷K;']¯w&ñêqâU½Ô„k-gµeæEêFu½þË÷Ú43½Ïæúî’çja®ל²¿9Þ¯9es sýxSg>Þ˜DcUx쯗WŸ.OÕõú0?;\žjÓ|˜Ÿ}>…¹~¬íå÷ŸLï³…¹þû›:óñþÀ$ÚKV…쯗WŸ^?U×ëÃüìðú©6͇ùÙç0d[ÇsêFuå_¾×¦™álëi<ç¼<î¾ò"¾ä¹ÚxΫ®-×Çžœ—Çýß¼�ç,Ûô¸ÌìÓÒ'tã¼<îû^„!{W?Þo˼ç) íåñþpÏÙ«�çdSÛ§¥M¼ÌmRçEÚñÞ6ͧ0ÜÔ©ãý�I4V…¹¾»ä¹Z˜ëÇ×Ouxxv¼ÿñTÏNã9›^ýÁ¦¶OK›x™Û¤Î‹0×�ÕÖ|ûT‡¯ÏŽ÷Ÿa®ï²­§0¬9es¼?|ûy ÃM�:Þ˜DcU˜ë»Kž«…¹¾{ΞKßÞsSg^ú9÷‰œóM¶‰a®ï.u>Þ~ûy s}wSçÃñþÀ$«Â\?^ò\-<êFµ5ß>}8|}ö—ïLï³…\ò\-<¸¾»©óåx`�UáÁõã%ÏÕÂcÔ�jk¾}úrøúìûÓûlá1à’çjá1¸¾{Ýkʹ}úû_ýú§_GÞ,S¯·ÔÎ^íü8/ýïŸOá1¸¾ËÞÕ�÷©?æ)<×wgMâÇ?Œñœå¢>ñ"Ìõ?f[Oa®ÿ¡nT[óíÓ—Ã×gy`zŸ-<Ô�岺<}8|yöùû¥ÎLï³…Çàúî’çjá1¸~¬®×Çû‡Sx ®kÓ|¼9…ÇàúñRçã}¹ìŸ.O_ž}�Áõ]¶5<¸þ-Û:žóå÷,½âExd[Ã�m=�ñœ¿gé/Âa¨¶æÛ§Ú4¾>;Þ«­ùö©6͇¯Ïþùá†jk¾}ªÃó㽺^ŸÂPmÍ·OuøóÙñ^›æS8 çåqÿðõ4žs{ìÓûìì�—µ^Ö^jèÆyyÜ÷¼�ñœµ^Öš¼ª—šèzÍå^ÕKMlšß4^„áU½Ôt¼_žjÓ|¨Mó³SÖœ²¿9Þל²¿ùÇWõRÓ) —§Ú4jÓüìxøöóÃM�ùx`�Ua®ï.Oµi>ÌÏŽ÷ËSmšó³yU/5�ÂP7ÚËï?™Þg s}wSg>Þ˜D{ɪ0×�¯ŸjÓ|˜ŸﯟjÓ|˜ŸýË«z©é�çô\·¤©½ª—šèz½ó"†›:óÃñþÀ$«Â\ß]ò\-Ìõcݘþò½6ÍLï³…Ç%ÏÕ¦ãýò4?jÓüìpyšµi~v¼ÿüöópSg>Þ˜DcUxp}wyšó³ãýò4?æg¿/Oµi>ÌÏþq:…Ô�öòûO¦÷Ùƒ뻛:óñþÀ$ÚKV…×�¯Ÿæ‡Ãüìxý4?æg¿_?Õ¦ù0?ûÇéæú1Û:žS7懿|¯M3/Â\ÿ–m s}—m=�çÔïYzÅ‹ð�8†³­§1žs^÷ò"¾ä¹ÚÏ9/�ûïêëÒx³TãU×¹/ox†óò¸øó4žs«¾O¼_æºq^÷ý/ÂP7²wu¦÷Ù8k?~œÂ\ÿöœjSöíýÒÎɦùñMÛy†›:u¼?0‰Æª0×w—üùŒé}¶ð¸ä¹Zx@u½>Þ«­ùöi><<;…Ô¦ùx¯¶æÛ§ùðç³SxÀM�/Çû“h¬ ®ïö×Ë«O—§/‡êzýìpyúr¨Mó³Ïa®³­ã9u£Úšoy†lëiŒçÔïYzÅ‹ðM�/Çû“h¬ Cݨ¶æÛ§/‡¯Ïþòý�é}¶0×w—…¹~ÌÞÕ�÷©?æ)ÌõãY“øñcŒç,õ‰a®ï²­§0ÜÔ©ãý�I4V…¹¾Û”·§zv¼¿~ªÃóSøÇ�c8ÛzÏyÕµåúØ“óò¸ïxÿ§ëþÿ®‰ÕÎh€ËÀpM¬Ùãƒ+l™Œs¬Â+ùK ð‹k®Éh ¶«¼…+l‰Ö*5�‰,X‡`ËÅKë0�ÍK�ëAޱ ÌïÃ+ù‹d/Ç«ÑìÚ¤&”Òvÿô[GD-LINF1.LIBIßÿ �ÿšÿöÿ–ÿ�ÿõÿòÿžÿ‘ÿŒÿ‹ÿÅÿœÿÄÿ†ÿ !"#$Âÿ›ÿ’ÿ“ÿ™ÿŠÿ„ÿ‚ÿ�ÿÓÿ%&'()*+,-./0¤ÿ¢ÿ˜ÿÑÿÏÿÎÿ‰ÿ‡ÿÍÿ ÿoÿ×ÿÖÿ�ÿˆÿÒÿ12345678ŽÿùÿÈÿÇÿûÿÌÿÔÿ9:;<=>?@AËÿ•ÿÕÿÐÿÉÿÁÿ¬ÿ—ÿÊÿ¾ÿ¸ÿ¶ÿµÿªÿBCDEåÿÆÿºÿ¹ÿ³ÿFGH±ÿ®ÿ­ÿ«ÿ§ÿÿþF¸Æaû £Ñ©ÄuOŒ‡cmƒ=ï,!ˆK% 1@ºš'v5×;KÒ^[Æh´v–�&a©d!Ô<±«Ùì,I{m£ÑBØY‚#uÒ^1]²в[…¯Pvœ‚"�Ñè�%!E„t�WLÙh£¯¼’ÎhÀ‘ºÅj»ÉF�"ÈXm©je4N/a!—±:Ë·ÃåÃv³ÉFiZl—±zZoY¤iqXÆêi}ÈFiZ¼.cõ´~÷šEšï–±zZzÊFiZ|[ÆêiýüœEšŸ–±z^o>e£�4-ž–±z^¶Y¤iñ¼ŒÕóúõ]6HÓâÏe¬ž×ïÞe‘¦Åv³ŒÕóúÛ«Ñìê,Ä€‰Tâº'Ɗñ¶Áb4Úh£Ü?ã°}ÂhôD*qÝ£•®“áü¿Y �®æ‰]Í.`gIÚkË�EDX*Y ¨ybW³ ØY’öÚ2F£ÅÎÊ1Ù6‰K%‹ɶ©omà5Okì,I{m£Ñbg Ä^Ö"ÂRÉb€%²ª±—uo[�Ñh±³„¤¸–ŠÏb@RÜu2IvÁc4Zì,ÁË•–ŠÏb)‚rHŠ»N&É.xŒF áHÝD„t�WLY hÙ­ÂW¨– F£ÅÎ\R­ˆ�.ðŠé’Å×7W&¨�©ñ�6z@ËÖ‡»è-±G'‚‚#uƒçà¡:ìa]�‚ÉJòP&%]ð�ð…'&˜H%®{b8æšëh´øòïßßÿóîŸÑ)jàzKŒ¤¸ëd’ìHî�?¾ÿþòåîŸñÃö½¿ÿRT[ne#� R9ŒF½³$ö� $D„¥rÈB ¨m°hl ¹Çh´°BDX*ŸÅ€¤¸ëd’ìHî1-VBDX*> 1 )çƒu;NAF£)"âªTËÖe£…œßÏ®"BºÀ+¦l´ØË¹È¹¤Ù“Ÿ=ól´ð}s,³ï›c9ˆbÛf£�¾òJ:!L¤×=1Zé:0 ¸¤ÚX½f1ÀõÍ• ªC`jÐÿËÿ¬ÿ?@ABCDE—ÿÆÿÁÿ¾ÿ¸ÿ¶ÿµÿªÿåÿFGHIJ¹ÿ³ÿ±ÿ®ÿ­ÿ«ÿ§ÿ¡ÿ”ÿÿþ­Þðô/<{öˆÛV¯ÊÍû‹Ìϯö}w1ÇB×a�¸¡Œ½¯{ïgžw•þöhn[�žwq�…®ÃqÃÞW�½ÇÌó®ÒßÍm«Àó.†ò],”1û‰õf�ŽOæ?‘gž{›S·­>ïŠ eÌ~b­­¶úÖOÊh†òݲ{øhmÎ)ʲ{Èœ å;öÙ*/¿Ìwå~Ù½.ß<~ôæ×ÃG�?Z[…ëÝÃûe÷ðñ£÷Oÿ¼F\ïžÝ/»O�?ýùÛû§ßÖVáz÷á~Ù=|üìÃïïŸþXãz÷ûý²{øøÓ£¯ïŸ~Z[…ëݧûe÷ðñÃßÞ?ý}�ëÝ�ûe÷ãñ£_ß?ý}m®w_ï—ݳǟ>{ÿôÃ×»o÷ËîÛã¾¾úam®w¾_vÏøúðýÓgk\ï>º_vŸûúéýÓgk«pNQ–ÝCæd(ß±ÏVyùåzWî—Ýq¼¾Þ•û7qÃÜÿÏó û>wn[õد7\•›÷™'ž_íûܹmµÕV[½*7ï/2Ç2Îe~ý?â†2ö¾zì=fžw•þöhn[�à ]‡5nØûê±÷˜yÞUúÛ£¹m5žwqxµõã ]‡5nØúq»ûì={_ó¼«ô·GsÛj<ïBžÊ>ºkÜÐ¥~ ÏÈSÙ_úqâ¶ÕxÞÅ–>ÇB×aZã†-}>—­xÌ·­Æó.¦ò$b¡ë0­qƒ¥9ØÒçsÙŠÇ«¼h5þö×þñÇ?xúþÖ/—éé?Rû>ð±œÊèsÉÁm«­>>+b¡ëðl�¸aßçΩÏ*/¸m5zÄB×áÙ´Æ [ú|.[ñ˜9õYå·­Æ“ˆ…®Ã´FÜ°å˜æ>fž{›Sܶ–R o3�îcm5ʃŸÆ)b¡ŒÙO¬µÕxQʃÃö`Òô`²´Óåôêð`ºœ^žÅ‚Ü�k«­¾õ“2"n¸*7ï/2Ç2Îeæ¶U[—݇5n—Ó[‹<3[§‰ÛVᜢ,»‡ÌÉP¾cŸ­òòË[?)#n˜<_®¼àÔg•ܶ/ʲ{qWî×VãũϺ+Þ/»‡�­qùhšÙòx9 n[�§>ë®~ôÛ‹²FÜ0y˱gËãå4¸m5^œú¬»òàÃý²;Ž×/Ê›¸aþSÑž-�—Óà¶U^~ñد­ÂôùÒå×/N}փÃþàɃ¡|÷`ly|³¶ Oúeš~¾îž<ØÒçcËãK©7k«0]N¯ËîÑãGk«0]N¯Ï–Ý£Ç�ÖVaÒ´ì=~´¶ çeÙ=dN†òûl•—_ÞúI­òòã¡,»Ã]¹_[ååÇöì=~´¶ÊË�ç?—ÝCædlydŸ­Æa[v‡íû–>ßý¼ÿõâÔgÝ•?ï×VyùñðjëÇí®Ü/»Ã¶¶ÊË�òTöwå~Ù¶§‡²¶ÊË�“¦e7iú>}Öky*û»rÿfm•—§ËéÕaÙM—Ó«Ã÷CY[ååÇérzux¶ì¦ËéÕáÙ÷Cùu(­òò‹Ç~m¶”||µ¥ÏËnú¬ùõÃÇ�žNš~{=]N¯ÏžNŸõzºœ^Þü6”ïÞ¼Y[…rf(ßíÆ–Gæ?y0NËîa«àãdÆiÙ å»§cËãÚ*Lö²›>k~=iúmœÞ¬­Â9EYv™“±å‘}FÜ`)5‘ƒ)�—¹äà¶U^~™Ê“»r¿ì&û×ôYóë~W”û7­zì׈þýïÿñoÿon[mõ_/ÿ÷ÿyyÜ÷ function julian(dd,mm,yyyy: integer): integer; var jm,jy: integer; begin case mm of 1,2 : begin jy:=yyyy-1; jm:=mm+13 end else begin jy:=yyyy; jm:=mm end; julian:=trunc(365.25*jy)+trunc(30.6001*jm)+dd+1720982 end; { julian } vÿ$ŠLEAST1.PASQßÿ �ÿšÿõÿòÿžÿ�ÿ–ÿÄÿÅÿŒÿöÿ‘ÿ‹ÿ†ÿ !"#ÓÿŠÿÂÿœÿ‡ÿ“ÿ ÿ¤ÿ¢ÿ’ÿÍÿ›ÿoÿ™ÿÎÿ$%&'()*˜ÿˆÿÌÿÑÿ×ÿÖÿ�ÿ�ÿùÿÏÿ+,-.„ÿ/012345‚ÿ‰ÿûÿ6789:;<=>?@ÕÿÒÿÔÿËÿ•ÿØÿABCDEFGHIJKLMNOPÇÿÆÿ¼ÿŽÿÈÿ¶ÿ³ÿ¯ÿ—ÿÿÿÿÊÿÉÿ°ÿãÿÐÿ¾ÿ­ÿ«ÿúÿøÿÁÿ²ÿ±ÿ¬ÿ¦ÿåÿÛÿ½ÿºÿ§ÿÿþ2'Ò3zÖ!.Æ|ýõ_qüðÀ'%ø¹­îñs2'Ò3²Áƒi74C£·‰ =ë�¿?®5qÀn3ê`Ó MúizÛâ“’�ØÖô™¯ø?4éÌx�iy­‰ñóŸýöOHÌ+¯ø¤DIkRÈqÖÅËÛ)‰³îÚØàâ”(ÉåÁQS‰ 4‘.ãq½Îº£ f±î�’¨©„Ø@é2×묻v‚ÙA¬{§$j*Kˆ 4‘.ãq½Îºk«ãz�u×N0;ˆuï”(ù¬)vU©ÊÐê¾�šŠS[Ã{ŒšJpJb"s®RkúèaSæ“S[CÄýÐÞ£±î�%JdZ^kbœ8«ÎúöYºªxh*NIŒ>kB"sö°)ó‰éî”|àÄŸu_sÀn :­ÐDºtUÁ'%J>kŠ6zØ”ùÄä”(yòÉ&%@"söÍ�àL6sŸœ`7ë›Ù ‘9c5èF;ùÆ:%@�É7Ëõý˸L¾ùÁõ7N PÆËä›ãÛë·‹‹eüvòÍñë뜠Œ¿ž|süàúÃÅÅ2þfòÍñ“ëã”eüÉä›c¹þð.–ñ“o~sýö×N PÆN¾y_—Ÿ8%œVãdZ^kbœ8«ÎŸ”(y�iy­‰q&›yXuÖNÉdS†©3ò/:…3SÀ'%Ÿ5E=lÊ|brJž|²I p&›¹ON p&›¹O·ï�Ÿb{ýÛ_þ‰í/ÿüÑ~ö£ïïN °‚õÍ�l�Èœ±%ؾœÉfîÓÍúKÕ�vò?ðGUF;ùú¥*C«ûv´“ÿ¡_îN p&›¹Og²™ûtû?2¼ï¶µœrÀ÷w§Ø Áúæ@6H­é±%ؾœÉfîÓ­5¼�vò?ðßÞ�àL6sŸœàL6sŸnßÿÈq¯³5 ­á}·­å”a¾¯ZCÄýÐÞýü¯ïJ8­.ÆœÉfV�5>)Qò ÓòZ#˜þ3ß´‡¦²§$Æâ¡©§$â³&´†wM%8%ÛŸ™³‡M™OLNIü¬ LdÈãiLÏ:Ý�%Ÿ5ÅgôÐT–à”D[}=lÊ|brJâÊ9zëÞ)Q¢d¯S›­IX93Ý´‡¦²„»±î�’ø�V÷mÝëÌÈ¿`¬œ™f›tÊ0;4._?Ë×—Yg²>)yòÉ&%ÀÊ™É7z<ªcúê¦Ç¥Z¦¯ôx©.Ó×z¼TËô•—ê2ݕįõxTËôÕM�KuL_éñR]¦¯õx©Žé+=.Õeº+‰ßèñ¨.ÓW7=.Õ1}¥ÇKµL_ëñRÓWz\ªeº+á´:%J”(y�iy­‰8×�ÛgMxFMe NIŒŸ5¡5¼{h*Á)‰ñ»èaSæÓÝ)QòYS´ÑæÌ'&§DÉ“O6ÅÎõŸ”»!Xßȉ̫Q‚íË“O6)Áöz޶únòMíä”`{Ùßýõ@þ'Ù?ð ÓòZ#˜þ3ã“€‰ ùf×}`§Ø Áúæ@6HdÎX�l_vCøÎ7²A"sÆj”`{=G[}7ùF�¶únrJ€•³oVÎL·çÝ)쎕s󾾑ÁI ¶/O>Ù¤Û‹‰ ù&SÍN ¶×™læ>ÝÚ_Ðí'÷êûÿþñ�¿ý£Ç¬3Ù6 Øtª{Mßß•`ûÂiUpX ¶/O>Ù¤Û+p®·gÕÞ«ãî”`{Îõãö¬ZÃ{µÜ�l¯À¹~ÜžUkx¯.w%ؾpZcü‡žñI §ÕÅø�™–ךÁôŸŸ”(Qò ÓòZ£·i·ùÖUÅCSqJbÄgM(C«ûÖCSqJbÄgMh œ’±ý9‘9{6e>19%1â³&¤Öô€M™OLw§DÉzÖ!#ü¸ÖÄ»ÍÈMúiz�OJ>�Èœ8˜tZQðЖð06å€OJ”|ÖuŒšÊœ’xŠÑCS NI´1zØ”ùÄä”D&2£ÇÓ˜žurJ”ÄPÏCW…zJêyèJêyè–JI õ<”¥êlUlºR…R*%1t]êyè.U¨ç¡û¶ õ<,¥RWNf®…ª[¢±î�%O>Ù„?ÐÛ´ÛŒOJ€ÔšÞ7?ð0}If¶ºGfš>)B=�oÞ×·S„zŠoÞ×·S„zºâ›÷õ픡ž‡nñÍûúvJ€PÏCY|ó¾¾� ÔóÐ]|ó¾¾� ÔóÐ}ë›÷õ픡ž‡¥øæ}};%ÀnÖ7²A"sÆj”`ûòä“MJ°½:ë›n´“S‚íU¬oÊh'§Û«[|ÓÙ¯:ë”`{…z:ß„zºo:ë”`{…zŠoB=å›b�l¯PÏCW|êyèÊ7�ýªX§Û+ÔóÐ-¾ õÙ¤Û« ­îÛÑN¾i ïã1}ÓÞÇeúªíôMkx/ÓWáÇtëF;Ý�l¯@Á7�Â7áÇt+£�¾.C«ûv´Ó] ¶/œV§h ÷Ckx÷Mø1åÛq}(üþêy(Ë×áÇt õ<”ûï™óý®„Óêbü@oÓn3>)Qòî2SÒ=dZ^kb?@ABCDE—ÿÇÿÕÿÔÿ¾ÿ¼ÿ¶ÿÌÿËÿ¸ÿµÿ³ÿªÿFGHIJKLMN•ÿÊÿÉÿÈÿÁÿÐÿºÿ¯ÿ­ÿOPQRSTUVWÿÿÿúÿÛÿ½ÿ°ÿ®ÿ«ÿ¦ÿøÿ÷ÿåÿäÿãÿÃÿ»ÿ§ÿÿþ{² I�‚%†cvnÂÃÃO8Þ|ĬՄ_%–R`Ov!é,öL�¥‚ÂxBÁÃC|^ qDgf­&lMx…ϲŽñá‹¥Z<È®ƒñŒY« O{& ŒÞÖë‚#6«ÁŒéu:4Õ`Æô’ŽMu*¥(3¦—tlˆ£©3¦—t¼ÎZ[2� Ÿ±%¸ðW�xo¹ëLi؇&²ñx�µ¶dþª´Ü ‡±yÄcÍ2Ææ¥õ1ˆLýãuÖ è,Á¤öˆ`áK[ ¶Zas¿%¸ðW¥ån0cóˆÇ&še0ãuvn‚ ¯˜˜úˆY+`K&pá³VÀ–LàÂ_=¾·D\H0Ö£´Üu¦4ìLÄcSZ".N¥å.½Nß_kžÎÎMØ’ |ª%f­´Ú“-¹^#>¯…øj• T³VΡJª²V›?œ… BÕ1f­68 aIªbÖÊÁ“Ý6¾´E‚ñ�¦ë¬Õ„^™úu̾0¥c=È®ƒñŒY« Ò"�ø¸·‘±B0=G¬0k5aiQ!˜ž#V˜µÒê,äLs×.ÁøÀ SÖJ«[^ŒwnB|^ 1f­€ÎîR{@°ð¥-P[­°¹¿åÅx­°¹t–P¤ö€`q‡Újåny1^+Èp×cjov7Y+t–`R{@°ðd·¨­V›û[^Œ×Êas‘á®)ÆÔÊp×ãÛÕ`šb|³Ls7f­6Óáî??¯ØC†¢¹S+Ã]SŒZ9lîÙ×Z9öuvnBñPX»Ç¬6—e¸S{³»ÉZasé,Á¤ö€`áÉnQ[­Ü2Ü�©]†»ñm5˜ñÍj0Íݨ6öµ›p÷PX»Ç¬û:;7áé/ßÞýö f­´šþøŸß}{zú²ûúáO˜µÒjO¶äzMŒÂøÎ„«UãÜãkÞ³¯Åœ…ŒÜŒY+çP%UÙM¨yϾfp2r[0f­œÃYÕ©”¢Lª²›PJQ® \£æýg!#·cÖÊ9œ…@M�¡*» B$lâhêµ³VÎá,„Òr—U1» ¥å®3¥a"f­œÃYÑ, ›{¡*f7�‰,Áz”–»Î”†}ˆ˜µržì6aówã/LÙM(Ø/ál!’ ³VÎá,_Ú"0>ðÂt�Ý¿îo™`;¦>bÖJ« K ˆÏk!ŽèL@°ðd·ˆ"l‡Äר°C¶ÃÞ"f­&<ñžIcO¶äzMá™k®“Vîé/ßÞýö ~Bg©G|^ 1JË]gJÃ> —@f¥•ûüîÛÓÓ<ü„ϲŽñá‹¥Z<¸0½ñŒõ˜µÒê,äV½r.A¨:fç&Ô½2+ÌZ9q.A¨:Æì&”–»Î”†}@/�Ì ³Vnq.A¨ŠÙ¹ ¥õ1ˆ8s,aÖÊ1‘%çn­-X|Ö檾Ȯ÷Î%xaÊZ¹•i*ÓTe)6‘¹ÑÊÅuªš¸îOÕÑ%K‘µÒê–ã�›°'[r½&Fa|gf­_Ú"µ³›à×ý-l‡ÀÔGÌZ�%˜Ô,<Ù-j«6÷·¼ïÜ„Èa½G/�Ì ³VØ\V&µ«ÁŒY+l.«^ ¦9Œ©=ìn²›ÐŠ¥-ֽǬ6—U/�ÓÇÔ®Lv"—Ö×(m±î=f­°¹¬z 4˜æã˜Ú•y³2nBxe¨Fi‹uï1k…Í=û:kÄçµ_­z ÔT�4KãÉn_Úâ:k,²Žñ»+i–¦´Ü5¾´EÃD–®³V@\÷§*µ7»›¬×ý©:¦öfw“µ"ÅÔÞìn²V@g &µ Ov‹Új…Íý-/Æk…Í¥2©­3f­°¹Tejov7Y+l.�%|—Ú‚…/m�Újåª2µUù¶´Ü ß�oV½LóݘµÂæR�J)ÊÁŒ©­Ê¬6âhêÁŒ©­Ê‡Êd­°¹DŠ©�߯gº"ަÌx�µÂæ×ý©Jm\÷§ême²VØ\âº?UÇÔÆuªŽo+ó¦2ZasϾÎZ¥%ââTZîRŸ)\v7‘âÏWqÝŸªãC|¦«¸îOÕõÏžìöú:k˜žì¶õ¥-^±‡ïS{Ð à"2|ŸZOvûàK[d­€ÈœÚøLá*RüÙ÷×Y+ ³“Ú‚…/m�Ú:7�‰,EX�h‹u0ÖcÖ ›ûh–ÁŒ©�Ìoâ3…+LcÆk­Ø×ÙM(ŒïLÀ¬•VÓ?à}úõëŸÿºûúáO˜µÒê–ã�›Ð‹ñØ“]HzÌZï z*)k,Nµ¹Z5UãÉn¯³V@a|gÂÕª©šêTJQ6ÄÑÔMi¹k¢YOvÛøÒ×Y+`K&ð©– Y+`_Øpµjª¦:•R”�'»½ÖŠ}½ÓꟿÛüë÷›ûßmþýûÍýï6—ÿëÿÿÿÿÿÿÿÿÿÿÿÿÿýÿÿÿÿÿÿÿÿÿÿÿÿýÿÿÿÿÿËBÿÿÿÿýÿÿÿ¿ÿ¿ÿýÿÿÿÿýÿÿÿÿÿÿÿÿÿÿÿÿÊBvÿöÃLEAST3.PASXßÿ�ÿšÿ žÿ�ÿ õÿòÿ–ÿöÿ‘ÿ‹ÿŒÿÄÿ“ÿÅÿ !œÿ†ÿ›ÿ™ÿÓÿ’ÿÂÿŠÿ"#$%&'()*+,-„ÿ‚ÿ‡ÿoÿ˜ÿˆÿ¤ÿ¢ÿ�ÿ./0123456789:;<ÑÿÎÿÍÿ‰ÿ×ÿÖÿ ÿùÿ�ÿûÿØÿÏÿ¬ÿÒÿŽÿÆÿ—ÿ•ÿ¼ÿ¶ÿÇÿÊÿ=>?@ABCD¾ÿ³ÿÔÿ¸ÿµÿEFGHIJKLMNOªÿÕÿËÿÉÿÈÿÛÿÐÿÌÿÃÿÁÿ½ÿºÿ°ÿ¯ÿPQRSTUVW­ÿÿÿÿúÿøÿ®ÿ«ÿ¦ÿ÷ÿåÿãÿÀÿ»ÿ§ÿ…ÿÿþÊÅ‘Å1�œ{¿àýû?óäíG.k¹àï1mbáAy£82&Ö>u$XÚà‹cßOÎ!OìÛÈe-ܶñ?ÇyšÞÿ’ÚÅ€ò<¶Á\ÖrÁ;?„b4ÇÜ�O öλµ–ÞûÏ?üêÝ»_µôÞÿþãßþ�ËZjÙä0�ýWê'ž¼�{¿`cð 6Œ—µôc\mú‰ïsï<ä²òØba´Ž—µÔ2nÜCÛ~"¤ØÞ=~ôèWº'÷ȱ̵ôÐvê'BŠíÝãG�Žqµ¹'÷ȱ̵ôÐöI?Rlï?ztŒ+?ztŒ«Í=¹GŽe®¥‡¶O¦~"¤ØÞ=~ôèW›ÃãG�Žqµ¹'÷ȱ̵Ôò4Ô¯ÛÃöÅ&–M_ mçZº<µ]ï+¡í\Kߤ÷‡©Ýô•Ðvškéƒòö0lré+m}c͵ôMJ^^lÒû¾"Ç2×Ò÷MÓxØåà¾ò*sq s-µ<(7Þ�en<¾ØÅÏž†¸Z mçÞ/hÃÎv1Œ< µxµ˜ËZzž†Ø®„¶sïìüàaÃÈÓP‹W‹¹¬¥wàiˆAy»Ò†Ñ7Öó¹_°x¸?‘{žz3¦&.k¹àÆ#Oc9{bŸb †!Åvâê°å²–Zž†zë+m}c͵ÔòÊ7m¨åízú8×ûm==fLå-»äê®Ý¯§6×Û»Ç÷ëéÉ£·¿›ûöîÉýzúöè·s-°½ûãýzzü›G¿y2÷íÝoî×Óãï�¾ÍµÀöîûýzzüíÑÇ'sßÞýö~==þÝ£�¿�k�íÝïî×Óã'�>~›ûöîÛýzúí£ß|Ÿk�íÝÇûõôöÑ“ß͵xØÍ½_ð Üx·;ËÜxdcpYK-Ê�wg™[µÑ/v1Æ\ËjÃHžGÆO&†éÖš¸¬åi¨·¾Ò†Ñ7Ö\Ë+ß´¡h{öMÓÈøÉû¦i\OûX&ãe2_½Ûh®nÕF/Ã\ ܪ�^†¹¸U½ ÏÞÀW®_þ/×ÿòï\¿ü÷/?üø…ë×ÿð×w_ÿçÍó¹اhëé1c2(oÙe-\¿¾U½ ÏÚúÇÃÕ]»_¿­�Û»v¿~\Ÿ¶/6±lîÚýúq}r�§¶»k÷ëÇõÉó¹¸U½ 3·j£—áÙ¾¤÷û¶iÆ K©‰7ÏçZàVmô2<Û¤÷w�ïoxs˜ÚÍÝãûþä0�1ŒŒÖñÍó¹اhëé c2lra—µpýúVmô2<Û¤÷wíþð†7‡©ÝܵûçsïäøÉb´Ž—µÀ­Úèe˜k�[µÑËðìÍ—”¼ÄØr`“ÞïÛ¦yio›”¼¼Ø¤÷ë·õûóZ<ìæÞ/¸UýbcpYK-Ê�wg™éÃ9ägW+¡í“¹–ÞÙ®„¶s-�ë~"VBÛ'Ó\KçúŸŸ†¸Y m§¹–Π¼= ›\VÚ0úÆz>_ÖrÁ1Fµ+ŽçelKÛÄØr@yÛ`.k¹ NŒŠazÈÉ\1¶£'®¸¬å‚›[ÆvôÄ—µ\üþ+ïþõW?üÃ_ýøõ/\ÖRË…¯Fkˆ…寻³ÌMœ§éó³§!^­=´}2͵ôÞ¹~¹]{h;͵ôÞáiˆMz¿öÐvšké½Ã°Éeí½ £o¬¹–Þ;< a)µöW™‹cx>×rYËÅï¿òó¿z÷î—G?~ý —µÔò Üxw–YÚ°o㳫Cï´aç»Fž†Z¼ZÌe-½³] mç~ÁÎvFž†Z¼ZÌe-½ó4ÄöÅ&–ÍJh;÷ 6±lÎKŒÞ±óÃ#ž†Z¼ZÌe-½ó4„<µÝ ¡íÜ/)¶äyj»s,—µôÎÓ›ô~BÛiîlÒû}Û4ãÄe-½ó4ÄÔnV®_‡¶ÓÜ/°”"6éý¾mš‡qâ²–Þ”·+×ÿÒ†Ñ7ÖÜ/X<ÜŒŸÈ=!Å–ËZzçiˆa“Ë ´aô�õ|î çã+‹Ü3ZljËZj¹`qL#Ó‡sÈû62&ƒò–ÉãDî¹"†[¢i"÷œCf“ÞïÛ¦y9ƨvUKÿù‡_½{÷ ïÿÌÏqž¦÷¿¤v1à¥ÛcË�ËZjyêWÇÕûJhûdîý‚]ŒÁ1Fµ+.kéÑûJhûdšû›ô~ß6ÍÃÈ1Fµ+.ké7½¯„¶ÓÜû›¦1†‘§ÞŒ).ké–R½¯¼Ê\Ã\Ko‡Ï‡áØûJFßXs-ýª¶í°Ý&M‡É>ÔÒ§óñÅö0��/¶OúŠË\K-¯|Ó†Þ/xPn¼;Ë,mØ·‘ËZ`Ÿ¢­§ÇŒÉ ¼e—µpýú•oÚÐû“ÇóÇÕ®¸¬…ë—Wm=]ݵû¹®_^cÔ];<¾_O�½�ûû¦id“Ëù8pY ×/÷)>¯§'ŒÉ°É…]ö rüd±Éå|¦ËZúÕ1FݵÃçûõtuŒQwíðùýãû__µZ¸~ía7×Ó‡sÈÏ®Ž1ê°=Äáæ0(oÃ&—çs-pçiúü,7‡Mz6¹,¥žÏµÀt>¾Ø®§·�ÞεÀt>¾Ø>YOo½�k�IÓzzûèí\ ìS´õô˜1”·ì²®_¿òMjáúå¶­§í]»Ÿkáúåv³žÞ>z;×ÂõË}ŠÏëé1c2lra—µôíf=m7?mÒû»Ï÷¿¾:ƨ»vø|?×ÂõËí‹M,›»v¿ž¶›¹®_ÊSÛݵûõ´Ý¼ß¶¹®_NšÖÓ¤é§éƒžÉSÛݵûçs-\¿œÎÇÛõ4��/¶?mÛ\ ×/§óñÅöÉzšÎÇÛ'?mÛ¯·­®_{ØÍµÀ&%//6éýzš>h|öøÑÛ÷“¦?<›ÎÇÛ'ï§z6��/¶Ïÿ0(oŸ?Ÿk�¶gPÞž†M.ŒŸ<0×ÓãZÀËd†ãz”·ï‡M.s-0Ùëiú ñÙ¤éÃñù\ ìS´õô˜16¹°ËÞ/°”šÈ�)—óØrಮ_Oíæ®Ý¯§ÉþõôA㳸k‡vÿ¼»¹_°´aßF.k©åÂW£5ărãÝYæaÉñÙÕa{ø¿•ÐvfPÞ®´aô�õ|®å²–‹ßåËú÷ÿöo�~üú.k©å•oÚÐûÇhÊÅ‘ËZàË¢w͵À¾i×Ó¨³çZ`—ƒ×Ó>–És-p«6zæZàÆã‹]Œñìê°= ÊÛçs- ?8ÆZ¸~-?8ÆZ¸~y«6úÙ›¿ig‘{rÙyl±°oãóæù\ ×/åØ-óa“ËóZ¸~}ƶ0lrùÓ÷¹®_·=Ã&—?=füä�]^O£Îî|8·‘¶gØäò§Ç\ÖÂõk/“káúå+ß´¡–>lrYOÃ&—ŸϽ_�ÚY´‰Ìâiâ²–¾´a߯gW‡íaûbËæ Omwؤ÷‡©ÝåíaØäò|®¥ßª�~±‹1æZúÒ㳫Ãö°}±‰es”·Ïkáúµ‡]¿ÀËd.k�ó0¶…]®ÅÃîQ-ÿù�×ÿñOׯÿñú¿þéúõ?^¿üÿÿÿÿÿÿÿÿÊÀvÿ`LEAST4.PASZßÿ �ÿšÿžÿöÿõÿòÿ�ÿ–ÿ‘ÿ‹ÿŒÿœÿÄÿÅÿ“ÿ !"#$†ÿ›ÿ™ÿÓÿ’ÿÂÿŠÿ„ÿ‚ÿ�ÿ%&'()*+,-./0˜ÿ‡ÿoÿ¤ÿ¢ÿˆÿÑÿÎÿ×ÿÖÿÍÿ ÿ‰ÿÏÿ123456789:�ÿûÿùÿØÿÒÿ¬ÿŽÿÇÿ;<=>?@ABCDEF¶ÿ¼ÿ—ÿÈÿÌÿ³ÿÿÿÔÿËÿ¾ÿ•ÿÊÿGHIJKLMNOPQRÉÿÁÿ¸ÿµÿªÿÕÿÐÿÆÿºÿÿãÿÛÿÃÿ½ÿ°ÿ¯ÿ­ÿSTUVWXY«ÿúÿ®ÿ§ÿ¦ÿøÿåÿÀÿ»ÿ¹ÿ·ÿ±ÿ…ÿÿþ3™‰…Eð’”#¾Äiÿ&­Fü.B3™‰Þ`fj u(Ö± Á?„§A4ÖcÒjÄÖúWøJ !<|m¨doÃü‡…ÇK1‹h}…žá­q˜´ñȳ á�©‡Â޹æ:k%¥üêã7��_·ZI)ûÛŸ0i­¢qÁËN,Iö8]“”#jáf²ÎLZÉN,£ìñ9I9b6¥r¦³¢À3u“VÐÊW3KA•ì!ˆDµÞïv�XÒ¦±(I+)¨ ²‡ Õz¿Ûub70 ˆEIZIAÕIöD¢Zïw»N,©Ýïv�XÆ LbQ’VRPu ²‡ Õz¿ÛubÛýn׉eÜÀ4 %i­.‚ä²­ÚêE‰2CP•´’ÄÁÖRfª’V2nÚ`2CP’VÒ‘Ù¶.š"3¬ó¼`JZÉhˆ¸œ£áFf‹’´’�¥àÛÚ8–7Æ.i­F<|‰Óþ LZÍd"×1ìϵðâp/3UIÊÖÕ<³«¹ö¸²â¦0&­¤p„8Ë AU’rDÍ3»š�ÇE�7…1i%%€‹ 82[™a�çÓ1É…Ý¿‚ipáè LZ]I+3¬ó¼`JZA«^X§àÈls¿¿&­€Ælî÷ðŽÌµÑ «[¿¶›ÜìûÓñÛýõš´â¼Þorÿzw=%çõi“û×»SÒ ˆóúÍ&÷¯wÞ$çõ‡Mî_ï¾x�´â¼þ¼ÉýëÝós’q^±ÉýóîúEÒ ˆóúõ&÷Ï»Ó>É8¯Ÿ7¹Þ½ù�´â¼þ~“ûç݇IÆy½¿nrÿ¼ûüF+vu’rÄL&r=cÁþ\ /0i­ ÕL&r=cKÖó¹^$­FÌd�‡<ü+†paË0iu$­Ì°Îó‚)iuà ë´lƒÆRðð¯Ø¡±|îQƒK`¼,ô)ilÉz..ilÉz..ilÉz.îp¼Àêî¯XýýoXÝýíåÇ·/±ºýã‡Çÿº?&­€Ælî÷ðŽÌµÑ «Û-YÏÅl~Ó.×v“Ÿó¾­Öv“¿Ï§¶:GQâÚnò÷ùÔ[¯í&ŸOǤ°%빸„-YÏÅîñÒpÓØhÙù&2pLZ[²ž‹;DÃÍz¿iïqß»Xï7í=^¼pž©»?&­€ÆlîOð.š‚Úh…Õí–¬çâÑp³¶›ö÷m°‹µÝ“”#ŒÅÏÔLZ[²ž‹KZ[²ž‹;Ü¿4D\„·Æ!n-;pßFCÄå 7ù9>jÅ®NRŽØ’õ|®…˜´‚VãL&r=#< ‚ø°ÌT�’VR¢ÊT%­$V¾‚ÈT�BÒJbõç‹ ,2U!i%áÈl[MɰÎó‚é˜&­Ft“]¢Š·s±QxkÈ Þ:ƤÕÑÓpa6�±„·,1i5bÑ£‚·,1i5þü�ùæã?ìÞ¾ø“VÐjä¥gr¢`&¹ˆ±CŸA¸ÉRPu I+)%VwU–‚ª�´’RAˆ†›,U!i%¥\4%Ki�çSÒJJ \�‰ eycLaáŽI«I«ñçøêã7��_ïÞ¾ø“VÐjÄ×8í_cÒj&¹ˆQ¬k¬?üµ•#¬«yfW³ó¸²â¦0&­¤D%3UIލyfW³ó¸²â¦0&­äEªs%Ê AU’#¢(q(Âs�šç.‚¬¸)ŒI+yâ`k™!¨Jr„ Lâ`ëA”€I+y„h¸‘‚ª�äˆh¸il´ì|À¤•¼B° )3U!ÉLdÆ!n-;0i%¥#³•Öy^0%9¢°[øW0 U˜´’ApÑ™a�çÓ1Énèn˜`x¦.`Ò Z�(,‚Oƒ h¬‡7pd¶ìLƒ%„«Qa–LƒÙXç&­F<òÌ$<3™Èõ@ Ç\s�µ’�ùæã?àáK4†:„§A#n-;�Nx²K­äW¿y|ü_â+1 áákCµpàb;ë„·ÆaÒ Z]Ée'Pxžè@l½¶›cÒ «»0tç*÷aèÎÕûÊ&­°º Cw®N¹Cw®Nï+ûmeµÂê–]�´¢!ârކ›Ü‡'ò‡ýîú(|wCw®Ná‰aèÎÕñ;Gf{<&­ÛÀ‘Ùö.šÿŠ\—û½V—Àp]î™íƒ‹¦$­€ÀœûðDþ(|çºcÒ h Áæ~oà¢)¨�”#˜ÈP€q¦ Þ‡I+¬nƒ]¬í&÷�ùÛðDþ Ö¶µ›£Vìê$刷/þû老y陜(˜ÉD®bÌÅøÃ²­Úÿeª™m†užLÇ¤Õ¤Õøó ¼Ì¿¿ýíO»·/~Ť´ºá…uRŽè„u˜É,Ht˜´^zŒ”´KÁçÞÓÀI+ 6Žs߈8ilÉz..i,ØŸkáÅaÙV­#³=&­â™…× «[â™…× «»-Yχûߨf‚i0›R9ÓYQÐXÿOÜ“VXÝ‹º¸ƒ‹¦µÂêvpÞ¸hÊ/Ÿ“VXÝÚ.šòËþ;ÔÆqî= ,G< ÖÃ6pÑ”_ö˜´Âê–K`­°º»á…uZIMɽ‹¦¼ß')Gª™`Œc“V²X×XX¶U[�£(±%¶n£á¦ vÑ:2ÛÖESŽI+¹%ëù\ /’Vr.Æ–mÕVç(Jl™íQ+¬nÙÕr—À˜´çmAmkÅ®Þiõ�wïÞý¸úéÝêöÇÕOïV·?®~z·ºýqu÷ÿÃö°}±‰es”·Ïkáúµ‡]¿ÀËd.k�ó0¶…]®ÅÃîQ-ÿù�×ÿñOׯÿñú¿þéúõ?^¿üÿÿÿÿÿÿÿÿÊÀvÿ:ÓLEAST5.PASZßÿ �ÿšÿžÿöÿ�ÿõÿòÿ–ÿ‘ÿ‹ÿŒÿÄÿ“ÿÅÿœÿ !"#$†ÿ›ÿ™ÿÓÿÂÿ’ÿŠÿ„ÿ‚ÿ�ÿ%&'()*+,-./0˜ÿ‡ÿ¤ÿ¢ÿÑÿˆÿÎÿoÿÍÿ×ÿÖÿ ÿ‰ÿÒÿ123456789:Ïÿ�ÿûÿùÿØÿºÿ¬ÿÊÿŽÿ;<=>?@ABCDEÌÿ¶ÿ—ÿÇÿ¼ÿ³ÿÔÿÈÿÆÿ¾ÿ•ÿFGHIJKLMNOPÉÿ¸ÿµÿªÿÕÿÐÿËÿÁÿ¯ÿÛÿÃÿ½ÿ°ÿQRSTUVWXY­ÿ«ÿúÿ®ÿ§ÿ¦ÿÿÿÿøÿåÿÀÿ»ÿ¹ÿ±ÿ©ÿ”ÿ…ÿÿþ3©‰‰EðÏQÊ×ë�8n0=â'ŠH˜I-Hôð 3S£¨‡@²Ž!±þ^AÐX�Éè[ëßàk1„pýFQ-H Þ:†Wø�˜á'âb<¾ Â[å0=â‰gAÂ3zU‰sÍu6ZJùõçoŸž¾i�–Rþôþ·ßc2Få‚—½X’ìp¸‰Rލ…˜É:0-{±,²Ãs”rĬRåToE‚gê&£a´¯f–‚*ÙA‰jµÛlz±¤5Tb‘¢ÑRPdA$ªÕn³éŲ¬¡‹�–‚ªƒì ˆDµÚm6½XR»Ûlz±,k¨Ä"E£¥ êdA$ªÕn³éŲ´»Í¦˲†j@,R4F_Ée[µÕ¹ˆTd† *-‰ƒ­¥ÌTE£eQÜ´Á.d† *D£¥#µm]QIfXçyÁ�–Eq:Å�Ì )-KÁ·µr,3n•J,\4F�¸þˆÃá“Ñ3©Âõ@Œûs-¼8^ÁË AU”r„u5Ïìj®=.‚¬¸MŒÉh)\a–‚ª(刚gv5;�‹ +nc2ZJAp¤¶2Ã:Ï ¦S”#»…ÕàÂÅ+ ˜Œ¾’VfXçyÁ�†Ñ·¼°ÎhÀ‘Úænw�E°¹ÛÁ+8R[ÔÊhìïüÊ®sw´¾ÚÜœ¾ÛÝÜln¢ÑÀ¼Ú­s·ÛÜ<^?E)çÕa�»çÍó§·�×·Ñh`^½Zçn·9¼úáñúU”óê‡uîv›ç›��×çh40¯ž×¹Ûmv¯Þ>^ˆr^}µÎÝW››¯>>^ˆFóêã:w‡Íóîðx}å¼z»ÎÝÛÍ«W¯¯¢ÑÀ¼ú´ÎÝaóêãîñzˆr^ínÖ¹{Þ¼ýøüx=D£�Flîvð ŽÔµ2û»ye×¹Kî8¯ìú$Gxñ_FR Ô LF³«£”#fR…ë� öçZx�Éh £gR…ë�[²žÏµð"=b&ë<Ôàáß0„ [¦€Éè‹ ie†užLÑè[^Xg4`4–‚‡Ã�¥às׈œã]¢§BÑh`KÖsrÑh`KÖsrÑh`KÖsrÇà5ö÷ÂþoÆþþÏï>¿‡ýÝïŸ^ÿóá�E°¹ÛÁ+8R[ÔÊhìï¶d='w´ùU»\Ùu~›wmµ²ëü)Úê\D*+»ÎŸò¡%¶^Ùuþ”§h4°%ë9¹ˆ-YÏÉðNqÓØbÙù&RðpŠF[²ž“;ÅÍj·nðлXíÖíÞ)¼pž©8E£�Flî𠮨„Z�ýÝ–¬çäŽEq³²ëöm°‹•]Ÿ¢”#”ÃÏÔLF[²ž“‹F[²ž“;>¼SDœ„·Ê¡(n[,;ðÐEÄé\7ùm~>Í®ŽRŽØ’õ|®…˜Œ†ÑãLªp=#¼ ‚ø¸ÌT¢ÑR¢ÊTE£%ö¸‚ÈTB4Zbÿ‡‹ ,2U!-áHm[WTʰÎó‚é'£Gô“]¢’·s²Ex«H Þ:ÆdôÑÁ“paV�±„·=,1=bÑ¡‚·=,1=þüOüöóï7ï_ÿŠÉh=òÒ39‘0“*\ÄXˆ!„/Ç‹ Üf)¨:„h´”ûû*KAUˆFK)�‹ ÅM–‚ª�–R®¨”¥´Îó‚)-¥.‚ÀDв¼U*±p§hôdôøók|ýùÛ§§o6ï_ÿŠÉh £gR…ë�ɺÆúãŸZ9ºšgv5;�‹ +nc2ZJT2CP刚gv5;�‹ +nc2Z^¡:‘ŠÌTE9¢ˆT†$<רyÞà"ÈŠÛĘŒ–A ¶–‚ª(G"QA5 ¶D ˜Œ–A(Š™!¨ QŽ(Š›ÆËÎLFË‹ »�2CP¢ÁDŠ Šâ¦±Å²ó“ÑR:R[™a�çS”#»…Õ@P…ÉhyWT’Öy^0�¢á†þ– ª�gê&£aôˆÄ"økxq@c=¼‚#µE` ,!\� ³° ÌÊ:0=â‰g&á˜I®b8æšël´|úã·Ÿ÷ˆë�hõ/ƒ FQÜ4¶Xv½ðd—F˯?ûôô ®?âk1 áú�¢Z8p²½uÂ[å0 £/‚䲞¤ÌT¢”#jázáÉ.1-…”‚ªCˆrDQÜ4¶Xv½ðd—˜Œ– )3U!J9¢(¼p.^&£%)’2ãV©ÄÂE£¥m¿´®—2Ã:Ï ¦h´\Ú¶²mUÚ@¡ Ì­Ñ2 ý¹jÃП«ƒÌ ) £oya�”#fR…ë�ɺÆzLF®¨”»WQŽpCËÕÀ3õ“Ñ@£6w;xGj‹Z�ýÝ-/¬“#ûaƽðd—˜Œ–K›»åÊ®£ÑrÙ O+ÛîÖ¹Ûmn¢ÑX E¥¡w˜Œ–Ë^xZÙö°ÎÝnsóýÒF)G.ÊÕ(* ½Ãd´\öÂÓʶ¯Ö¹K'9¿±T£¨4ô“ÑØß±«£Ñ@xñqÙ OmÕŠvÑ:RÛÖ•NÑh`!†¾E»h‹â¦uE¥–‰�¢Ñ@ús•»›ÍM4C®¹»ÙÜD£�@!w7››h4Ð(‚ÍÝ^Á‘Ú¢VFcwË ëŒÆþ¾²¹«Vv�Æþ¾*¹»ÙÜD£±¿oáKîv𠮨„Z-«’»ª|(Л՗õwË^xZÙöË:�ý}u."••]ç®*Ñhì­Wv�»ª\+�Æþ>PÈ] ð!¼Ð‘8Øze×§h4ö÷aèÏUîÂП«•�Fc†þ\r†þ\>Tö»Ê�ý»: EÄé\7¹ /ä�»ÍÍ5Pøþ†þ\®á…ŽaèÏÕé{Gj{:E£ÛÀ‘Úv®¨ÿ†\Ÿ»�ѧÀp}î©íÕ•¢Ñ@`Î]x! ¾wý) 4Š`s·ƒWpE%ÔJÊL¤(@9•o•Ãd4öwÁ.Vv�»Àü]x!+ÛÚõÉhvu”rÄû×ÿþ×ëßc2F�¼ôLN$̤ ×1æ¤üqÙVíÿ2UŽÔ6Ã:Ï ¦S4z2züù5ÞåŸÞÿöûÍû׿b2FßòÂ:)GôÂ:̤$zLFï=ŠF�¥àsçiàh4P+ǹkD �¶d='�ìϵðâ¸l«Ö‘Úž¢ÑñÌÂ�ýñÌÂ�ýý–¬çãÃoT3A5˜Uªœê­Hh¬ÿNÑhìï‰E�ÜÑ•NFc78o\Qé—çh4öw¶�+*ý²ƒÃµrœ;OË/ƒõ° \Qé—&£±¿ãØhìïoya�ÑÒ•rçŠJvQÊŠj&Øå‰CÀd´LÖ5Ö—mÕVç"Ri‰ƒ­Û¢¸iƒ]´ŽÔ¶uE¥S4ZnÉz>׋h´œ“òÇe[µÕ¹ˆTZGj{2û;vµÁ)0&£�Áy›P+ÇF³«7Fÿý/{ù×ýÝ_ö÷ÿéúõ?^¿üÿÿÿÿÿÿÿÿÊÀvÿÜÛLEAST6.PASVßÿ �ÿšÿžÿöÿ‹ÿõÿòÿ�ÿ–ÿ‘ÿÅÿÄÿŒÿœÿ !"#$%Âÿ†ÿ¤ÿ¢ÿ“ÿÓÿÏÿ›ÿ’ÿ™ÿ�ÿÎÿ&'()*+,-./01‰ÿ„ÿ‚ÿŠÿ˜ÿÑÿÍÿoÿˆÿËÿ‡ÿ×ÿ23456789:;<=Öÿ ÿùÿÌÿ�ÿÊÿÉÿ¬ÿûÿØÿÒÿŽÿÇÿ>?@ABCDEFGHÈÿÆÿÕÿ—ÿÐÿ¾ÿ¼ÿ•ÿÔÿ¸ÿ¶ÿµÿªÿ­ÿIJKLMNOPúÿÁÿºÿ³ÿÿÿÿÛÿ½ÿ¯ÿ®ÿ¦ÿQRSTUøÿ÷ÿçÿåÿãÿÚÿ«ÿ©ÿ”ÿÿþÙ ‰ ‹¤î¢”K<=ýˆÝî+£—øC¤,Ld7$(‹‰i´4@ qž¡a‘ÔSz^ â„Ñ)¬Œ^Âz¨·Œ‰ìĤ'ØI±ppê->‹uJO_-õƒìZ9ÏX½Ä=OLB1Û¯NðÌ=÷Áh)%>¿ÿvÿue´ÑFgë“’ƒ8‘,°ë¢”KôB Lä¼JX-qʲÀ1J¹Äd›ÒÛÁ‰ŠiHXm´*'–‚JY@‰²š·ÛAœ¨†A,šh´T&Y@‰²š·ÛAœr ;‚X4Ñh)¨ÜÉ‚H”Õ¼ÝâDí¼Ýâ”kØÄ¢‰FKAå.É‚H”Õ¼Ýâ”Ûy»Ä)×°#ˆE�6z!HN­j­Ñ²lËË,š,•ÑhIœ\/e€ 2-³å±Mn#•)-=ÙCë³md€óŠ7LÑh™-7—Ùò(ˆE�6z"›¹_cÃê²Jœ‚0µ*@PåÎ÷<±ï…WXrâ¦a¬Œ–ÀB€ 2Ê%zžØ÷Â+,9qÓ0VFK `!žì!ÀyŦ‹(—hØoÔ[Ø ÎÊRÂÊè%6¬°ÍšFK𾇠e©-±2Úè… éd€óŠ7LÑh£oxã¼Ñ€'{ż‹FªšëP».Ê©šëPÌ».ÊE5ס8n»W¯£Ñ€ªvu(Ž·]”Sµ«C1ïº(Õ®Åq{}�Tu]‡â¶ë¢œªë:ó®‹rQ]ס8nﮯ£Ñ€ªŽu(Ž]åTëPÌÇ.ÊEu¬Cq½=ÞÝE£UÝÖ¡8ÞvQNÕmŠùØE¹¨nëP\o_Í×Ñh@Uwu(n».Ê©º«C1»(Õ]ŠëíëÛ]4PÕ«:Ç®‹rª^Õ¡˜ïº(Õ«:×Û®{�TõR‡âxÛE9U/u(æ».ÊEõR‡âz»Û½D£U½®CqÛuQNÕë:ó]å¢z]‡âz{˜VF/I'œW¼aŠFßðÆy£�9Å��FrŠ~¾`õöWÿÁþê¿Øÿý/ìþúðþçØÿðïï?Ý?^D£�Ñ\(f( Oö€Þ�ýÃ�œâÆŸ]¸n§ÊÕáU˜[U¹:¼ s»¨\^…붬\^‡][^fÑäÊÕáuصFKyž»nÛ½!N®¯\ý®¬\}^‡ÝE48�SÜøˆ9Å�??âƒåqtÙ±W Ld)áñ" È)nü9[«¹nñØ&·©æº}Äë“^A1 �Ñh`´Š”…϶Ao�Æþá@NqãÏÙòX¹º}Äc›Ü¦rõE”r «Þ2A1 +£�9Å��FrŠ~ü`‰¸ÊY�ly]vì\Âc›-7—Ùò^Âí…Ñìû(årŠ/{¡VF½œÈfî×ÄHÏkA|>*wÑh)Q*£Ñû‚ •»�–Øÿ°„M€ 2E£%<ÙCë³mœW¼aºˆ+£—„"w°n”›—…rÖƒìZ9ÏX½„( Hø4ÙÄ8A¹�NX½Ä¦@ åN8aeôò·/¸ÿóÛûï?mþò;VF½ä“bò¢ÁD6s¿&ÆF¬Súx^ÂM�‚Ê]ŠFK)±¿*ƒT¦h´”XB¶<)¨LÑh)%à³m‚”Î+Þ0E£¥”ÀB˜ÈR�7Ö6,üE4zeôò·/øüþÛýý×íÏ_~ÇÊh£'²™û51çG§ÎS«ÚE€ 2Ê%œïybß ¯°äÄMÃX-%‚P*£\¢ç‰}Ï^a!ȉ›†±2ZJ,¡¼Ì¢É‚Ê(—È¢ÉëF(îÑó´ÅB�7 ce´”Xqr}•Q.!ˆD ;‚8¹~-š„•ÑRb!Ùò*S”KdËãè²c¯VFK‰… $· Ø?*S”K0‘%X�ly]vìUÂÊh)áÉös^ñ†)Ê%öõv„ %VFK‰… øl›ÀyŦ‹(—ðëᆠv„bVF½DÃ")¤çµ N�‚²ðdH¬ìˆ„ïQbŽìˆÉ:¯VF/qÏ“ ¡ÙÌýš8Á3÷Ü£åýŸßÞÿ O?b´4 =¯1²åqtÙ±W„"w2Z~~ÿíþþ+ž~Äg±Néé«¥^xpãç…rÖce´ÑÙú¤$¡ÀËíöÕ]”KlDB¶>)áFKHŠÅ€•ÑF/ÉÓ I ¨ÜE)—è…„"wÂÊh)¤ TîR”KdËãè²c¯0Eî„•Ñr#e€ 2E)—ÈÖ'%¼Â‚³²„•Ñ’‰,IpcmÃÂG£¥k?¶~�2ÀyŦh´œì�©-][æ6Qjsk´Lëá²lÓz¸,w2€X4Ñh£oxã¼”KLd3÷kb4Î�Nae4à³mB±‹r ¿n˜`G(¦!ae40Z‚ Å eáÉÐ[£±¸á�óR.‘X­' B‘;ae4öW“=0…BU®~sÿLgU¹ú"�ýÕiŠ*×Îu(¦ÊÕï&{`Šr‰ÑQRȶY+£±¿: BQåÚ]ŠôLêÛ¦e"KÑh ­‡Ë2ݶ‹Fi=\–»PtÛ. $J¡è¶]4-Á…b†²ðdè­ÑØ?ÜðÆy£±¿*](ÊÊÕÑhì¯ÊŠnÛE£±¿-ác(f( ŸmƒÞ-ËŠ2Ê–Çêcýæ4E•k?ÖÑhì¯ÊË,š\¹:eŽFcEœ\_¹:e~*]4û«D)‰Ò§ôLgâäúÊÕÑhì¯Òz¸,C‘ÖÃeù©tÑhì¯Òz¸,w¡Hëá²Ü}*Ý›Ò�ýû> dKÄÍe¶<†"=“:ÏÛî)QzwNëá²Ü=¥g:§õpY^¼ódÑhÀ�ðd…϶�zË~Ål4ÀMbø!žìáÉgÛD£�ÄŠôLêœ(½óÃE4-Á…b†²ðÙ6è­”K0‘¥ë‘l³VÎz¬ŒÆþ!¹MåêP$æ7é™ÔYT®uõ…Ñìû(—hœ�ÂÊh£oxã¼”K ÂyLd7$¬Œ>4tŸ) lX]öB‰óÔªvÑz²‡‹h4Ð8?:užZÕ.Ú²-/³hrKœ\ßfËc›Ü¦õd­Ï¶¹ˆFrŠ/{¡D4š}¿5úŸ¿ìÿñëþá—ý¿~Ý?ü²¿úP+ÇF³«7Fÿý/{ù×ýÝ_ö÷ÿéúõ?^¿üÿÿÿÿÿÿÿÿÊÀvÿ³ñLINFIT1.LIB8ßÿŒÿ‡ÿ †ÿõÿ òÿ ÿŠÿ’ÿ–ÿÅÿÄÿÂÿöÿ‘ÿžÿ�ÿšÿ !"#$%&'()*+,‹ÿoÿÓÿÍÿ�ÿÏÿÕÿ™ÿ“ÿùÿœÿÔÿÐÿ›ÿ˜ÿÒÿÑÿ�ÿûÿ×ÿÖÿ¤ÿ¢ÿ„ÿ‚ÿ-./Îÿ—ÿ0123�ÿ‰ÿ¶ÿåÿ4567ÊÿÆÿÁÿ¹ÿ³ÿ±ÿ«ÿÿþ%¿yþ¿þñO~Jþq¸¸;>¶Ã‘›±]�“wŸÅÄ~ˆ¹äºòç~ êÝ~s7±b.¹®ü¹ØÏ^'NßÇýf.¹®ë6c;9>sÉo®Ç ;:9ìãé÷ 7c;òõn¿¹ûàä÷á¢=ýfCÇqq�Ù·G‚?öq×üq1¶ñS²äŸûaë:1¶“ãÓñ0—,¹ªõê3µ^ãL­WÇ™Z¯>?+¹ªõçgg1Îä8“}VrUĺNŽûÍ\²äëñil¬ë77c»'ü”µ^=-—/—sIPë5¦åòår. j½:¦åòår. j½ú|Z._.ç’ ÖkœOËåËå\®/ŒiùÅÉ�%9}{=>�­$§·ÓâÏñ5—äô6Æ´ÄçøšKrz«Ö«§E­Wß{Ì%9½Uë5¦E­×¸�1—äôV­WÇ´¨õê¸÷¸Š1—äôV­WŸO‹Z¯>¿÷¸ò˜Krz«ÖkœO‹Z¯q~ã*Æ\’Ó·ãö8—ÙÓ¢Ö«ÏŸÕzõ•Z¯~Øæ’ Ç´¨õêxVëÕWj½ÆÃ6—EL‹Z¯qþ¬Ök\©õÛ\^§EŽÙsIاåý]­WŸ_©õÏj½úJ­WÇÇÃöñ {. ׯ´üâä‚�Ç‹’œ¾E½Ûoî>Ç×´ì÷¯Wþ_%�Ûã¼®ßüç¯ÿþû¯ÿñS²äß§×ÿKvÿ5#LINFIT2.LIB; ßÿŒÿ‡ÿ†ÿ ÿõÿòÿ’ÿŠÿ–ÿÅÿÄÿÂÿžÿ�ÿšÿ !"‘ÿöÿ‹ÿÍÿÕÿ�ÿoÿÓÿ×ÿ#$%&'()*+,-ÖÿÐÿÏÿœÿ˜ÿ“ÿÒÿ�ÿ™ÿùÿ›ÿÔÿ„ÿ‚ÿ./012345ÑÿûÿÎÿ¤ÿ¢ÿ�ÿŽÿ—ÿ‰ÿÉÿ¶ÿåÿ6789ÊÿÆÿÁÿ¹ÿ·ÿ³ÿ±ÿ:«ÿÿþ·§?ïps¯—ÜU8üºÃíéóónôµŒÛzq¥ÂÞ7'ß-4s€\8m[øÈX¶y¿ � G£m ¹@ž�¦ÇRó>mÛ¶ à›®îjYE£78ù2`W²ß½w°÷M……e›÷Ûtïet»whk‡0ž€ 7`x; Œ'x}Ó!Ü�ýÈ¥õmÀ7]ÝÕ�mÑY¡�žÑY!žÑY¡~6Ú¢³ÂýL~f?#ñŒÌ³Ñ‰Ú6@©y�=Ö�o mo°÷ÍÉwp7 €Î …´yØD£è¬pH›‡M4 €Î qH›‡M4 €Î õ!m6Ñ(:+܇´yØD£§±€é º¸ŒFaz<Ö�oŒÂt&=û—h¦3û�øÙ¿D£0�ÑY¡�ÐY¡+ùh¦3:+:+|e�ÂtFg…8$tVˆ¯äöÑ(LgtV¨ �ê¯äòÑ(LgtV¸ �î¯ìöÑ(L�µ¹D£H:+ÔÐY¡�Z7Ñ(‡„Î ñ�ÐYáu� sHè¬p@g…tVxÝD£Ç��x�DÑ(@iYÐY¡~@g…è¬Ð€Î ñjݬÖH�lÇRê^¶c=…„Äk|+Ý‚D2¯¢Q¬5$|+ݲ ³Âý!è¬ðá8 ³B¼Z/Í¡_­¢Qô;›åֺƷÒ-H´ŠFÐïl–ú�Írð­t :+Ô¯›U4jà4ð!=A7B—Ñ(L�,Û¼ß>û—�òõ8г1Z›KlÛüýú÷ûë?¸5ú=ýù?Ì».ÊE5ס8n»W¯£Ñ€ªvu(Ž·]”Sµ«C1ïº(Õ®ÅvÿtWMATR1.PASHßÿõÿòÿ �ÿžÿ �ÿöÿšÿ‘ÿ–ÿ‹ÿÅÿÄÿ“ÿÓÿ›ÿ˜ÿ†ÿÂÿœÿ‡ÿoÿ¤ÿ !"#$%&'()¢ÿÎÿˆÿŒÿ’ÿ™ÿ�ÿ*+,-./0123456ûÿ”ÿ„ÿ‚ÿÑÿŠÿØÿ×ÿÖÿ�ÿ‰ÿÍÿ•ÿ ÿÿÿÿÕÿÒÿÈÿŽÿãÿ789:;Ïÿ—ÿúÿ<=>?@ABÔÿÌÿÊÿÁÿ¾ÿùÿíÿåÿÆÿCDEFGÃÿ¼ÿ¸ÿ¶ÿ²ÿ±ÿ¬ÿ§ÿ¦ÿÿþÖS”}ä9ÅíRë ¾ÿ•¿üÆKëOyÊ•§(ûȦÂS‹Ç<äãÌÃëuOë8å4Jç¥e�J¿Ÿj<ä¹ù×bÕÓCžë‘?/–eM‡§V3õHFäázûêU<äù†òH´\«fî둌ÈÃõöÕ«ÓCžo(�DËu±jÆác=’y¸Þ¾zyÞn_½:=äù†òH´\«f>Þ×#‘‡ëí«W§‡Þ/VíQî¶~*k�}jû‹eYOQNm÷:û6}Þå”o?dpžÉ8|\¬Z�f2‹U�ô(w[?•ufô©í[¼[,ëû61ýÞø�ëëvÏc z”»�~*ëFö‘‡{ÎÛ�—–õ!£ŽíS�}jû‹e½oûÑ-èQîæã_ ú©¬óñÏ‹�%óñ–©Ð£Ü±+—gïÛ~t«ž¯c»½™�·‹UKði>~d*ôSYÙ«Âù:¶O7óq|;_ÇöéûíÍbÕÃuÜÌÇ�߆ÅåYë;«õÝRë ž¢œÚîu4ömú¼Ë)yiY–õåÔv¯£qcjŸw9åbY/xŠÑ'Êë‰é÷Föû»íž—–õ!±}ª3£Omßb±¬÷m?ºÿ¾Æÿœb±à.ÆÔÖ¾Xpcjkû†‹þ—‹ÿïͻłÇŒùxËTèQîØ‹Ë³÷m?ºUKði>Þ2ú©¬ìŠUá.ÆÔÞž¯cût3ÿ˜o·7¼y·Xõ.ÆÔÖþöÍüf;\ÇÍüc¾}gqyÖún±à.ÆÔÖþö ý�‹ÿãͻłÇŒùxËTè§²²+—gïÛ~t«>–àÓ|¼e*ôSYÙ«Â]Œ©½ÍëØ>ÝÌ?æÛí oÞ-V½‹1µµ¿}3¿Ùö×q3ÿ˜oßY\žµ¾³Zß-µ¾à.ÆÔ>ïrJ^Z–õåÔv¯£qÿóuF{{žÉ8|\¬Z9Ìd«rùãC9“qøx¿X•Ë2ØÏdî«Ò£ÜmýT֙ѧ¶oñn±¬<äãÌÃëuOë8å4J'ÊëiôÆKëydŠì÷Oå¾qfíž3/­ì�˜ÆC»çÌKËú�a1¶çÛZgFŸÚ¾ÅbYïÛ~ôZ_pÿóuFã¥�%x>o™ ýTVvÅâòì}Û�nÕǬóñ–©ðœ]±*¼oûÑ­ÊåY^ŸoëÍ|üm±*—g�%óñ–©Ð£Ü±+Våòì}Û�nÕ y}¾­7ó1¯Ï·õæOçëØÖ›oçëØžß,V­0yþo]™~o�¼®Ûó›ù˜×çÛzcU.ÏZßY•ÖwK­/X¿¯¥<ñÒªì¯Ïoæão‹Uy,Á˜�·L…åŽ]±*ûëó›ù¸¿>¿ùÓá:n¾�¯c{~cAë»ú‚çß×Ržxiµ¾[ê î¾Îh¼´,ë}Û�^_ð_ûÏÿæ)Ê>ò�—ìÛôy—S¾=o‡­G¹Ûú©¬ï î¾ÎhoÏÛaËm¿õ(w[?•õÝbÁ]Œ©}Þå”Vë»WÖ?¿\þñõòìËå××˳/—__/Ͼ\~}½<ûrùûÿ϶Ao�Æþá@NqãÏÙòX¹º}Äc›Ü¦rprogram means; { -> 26 } {find mean and standard deviation } const max = 80; type ary = array[1..max]of real; var x : ary; i,n : integer; mean,std: real; {$I MEANSTD.PAS} begin { MAIN program } ClrScr; writeln; writeln('Calculation of mean and standard deviation'); repeat write('How many points? '); readln(n) until n<=max; for i:=1 to n do begin write(i:3,':'); readln(x[i]) end; meanstd(x,n,mean,std); writeln(chr(7),'For ',n:3,' points, mean= ',mean:8:4,' sigma= ',std:8:4) end. { MAIN program } åååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååååprocedure meanstd (x : ary; {array of values} length : integer; var mean : real; var std_dev : real); var i : integer; sum_x,sum_sq : real; begin {main} sum_x:=0; sum_sq:=0; for i:=1 to length do begin sum_x:=sum_x+x[i]; sum_sq:=sum_sq+x[i]*x[i] end; mean:=sum_x/length; std_dev:=sqrt((sum_sq-sqr(sum_x)/length)/(length-1)) end { procedure meanstd }; CFIT1 PAS MCFIT1A PAS Xprogram newdr; { -> 243 } var x,x2 : real; alldone : boolean; error : boolean; procedure func(x: real; var fx,dfx: real); begin fx:=x*x-2.0; dfx:=2.0*x end; { func } procedure newton(var x: real); const tol = 1.0E-6; var fx,dfx,dx,x1: real; begin { newton } repeat x1:=x; func(x,fx,dfx); dx:=fx/dfx; x:=x1-dx; writeln('x=',x1,' fx=',fx,' dfx=',dfx); until abs(dx)<=abs(tol*x) end; { newton } begin { main program } ClrScr; writeln; x:=2.0; { first guess } newton(x); writeln; writeln(chr(7),'The solution is ',x); writeln end.  Xprogram newdr; { -> 245 } var x,x2 : real; alldone : boolean; error : boolean; procedure func(x: real; var fx,dfx: real); begin fx:=x*x-2.0; dfx:=2.0*x end; { func } procedure newton(var x: real); const tol = 1.0E-6; var fx,dfx,dx,x1: real; begin { newton } repeat x1:=x; func(x,fx,dfx); if(abs(dfx)=0.0) then dfx:=tol else dfx := -tol end; dx:=fx/dfx; x:=x1-dx; writeln('x=',x1,',fx=',fx,',dfx=',dfx); until abs(dx)<=abs(tol*x) end; { newton } begin { main program } alldone:=false; repeat writeln; write('First guess (999. to exit): '); { first guess } readln(x); if x=999. then alldone:=true else begin newton(x); writeln; writeln('The solution is ',x); writeln end until alldone end. ååååååååååprogram newdr3; { -> 257 } var x,x2 : real; alldone : boolean; error : boolean; procedure func(x: real; var fx,dfx: real); { the vapor pressure of lead } const a = 18.19; b = -23180.0; c = -.8858; logp = -4.60517 { ln(.01) } begin fx:= a + b/x + c*ln(x) - logp; dfx:= -b/(x*x) + c/x end; { func } { procedure newton(var x: real);} const tol = 1.0E-6; var fx,dfx,dx,x1: real; begin { newton } repeat x1:=x; func(x,fx,dfx); if(abs(dfx)=0.0) then dfx:=tol else dfx := -tol end; dx:=fx/dfx; x:=x1-dx; writeln('x=',x1,',fx=',fx,',dfx=',dfx); until abs(dx)<=abs(tol*x) end; { newton } begin { main program } alldone:=false; repeat writeln; write('First guess (999. to exit): '); { first guess } readln(x); if x=999. then alldone:=true else begin newton(x); writeln; writeln('The solution is ',x); writeln end until alldone end. GD-LINF2LIB €JULIAN LIB €LEAST1 PAS � { -> 249 } procedure newton(var x: real); const tol = 1.0E-6; var fx,dfx,dx,x1 : real; begin { newton } error:=false; repeat x1:=x; func(x,fx,dfx); if dfx=0.0 then begin error:=true; x:=1.0; writeln(chr(7),'ERROR: slope zero') end else begin dx:=fx/dfx; x:=x1-dx; writeln('x=',x,' fx=',fx,' dfx=',dfx) end until error or (abs(dx)<=abs(tol*x)) end; { newton } vÿi·NEWTON-L.LIB7 ßÿõÿòÿšÿ�ÿ‡ÿ‘ÿöÿ�ÿ–ÿÄÿÂÿ‹ÿ›ÿ™ÿoÿ ÓÿÅÿØÿžÿ“ÿ×ÿÖÿûÿ!"#$%&'()*ùÿœÿŒÿÏÿÎÿ­ÿ�ÿ˜ÿˆÿŠÿ—ÿ’ÿ�ÿÒÿ+,-./0ÑÿÍÿÁÿºÿ‰ÿ„ÿ‚ÿ12345Èÿ°ÿ…ÿåÿÕÿÔÿÐÿÊÿÉÿ6Ãÿÿþ„„„Ÿð|ƒ×¿¯ðEø¿årãKö6ŒÚƒð8-‘pëm—]ö“s /û÷ç¿Hèî£:—àu ?FqU»Rµ+ÚéÁõ Áø’½Á!‹xéS§GB€Ð§}$~𘠡­¡Oá÷!B[õÐ'�„ÐÖzµí¬]Õ®T]"!´5T(UÓþeùÆFmsâs0BÇ"^ú”åÊ‘ÐiŸ/ûHè.2O6oo2[ºáýxü~ìa7ùÃ?,„Ð6l…ÚÊÓŽ ¡mN|FèŠö©êŸR5:퓞E#¡»HÈ<Ùê^Ý<žvsÑå¿4žvsöÓ/]–H*„·û¨�ol„ÐÖŸƒBÛ\$džlÞÞdþ¶tÃûñøý؃yØzû`9³m‚ÁÐÝG혼ì†%BÛ°ˆ—>e¹2![!d+ѹO0¾doðEHHø³ýø?½oûÑ-èQîæã_ ú©¬óñÏ‹�%óñ–©Ð£Ü±+—gïÛ~t«ž¯c»½™�·‹UKði>~d*ôSYÙ«Âù:¶O7óq|;_ÇöéûíÍbÕÃuÜÌÇ�߆ÅåYë;«õÝRë ž¢œÚîu4ömú¼Ë)yiY–õåÔv¯£vÿjôNLIN3.PASWßÿõÿòÿ šÿ�ÿ –ÿöÿ‘ÿÄÿŒÿÅÿžÿ‹ÿ‡ÿÂÿ !�ÿ†ÿ›ÿÏÿ“ÿÓÿÎÿoÿ"#$%&'()*+,-œÿ™ÿ’ÿÑÿÍÿŠÿ¤ÿ¢ÿ ÿ˜ÿ./0123456789:;×ÿÖÿ�ÿùÿØÿˆÿÕÿûÿ�ÿÒÿ„ÿ‚ÿÐÿÔÿËÿ‰ÿÌÿÊÿÉÿÿÿºÿ—ÿÈÿ<=>?@Çÿ­ÿ¼ÿABCDEFGñÿ¬ÿŽÿÁÿHIJKLMNOPQ¾ÿ³ÿÆÿ»ÿ¶ÿåÿÃÿ°ÿ¯ÿ«ÿªÿÿþÿýÿøÿRSTUV÷ÿäÿ½ÿµÿ±ÿ®ÿ¥ÿ”ÿ…ÿÿþoró˜ÓíPÚ—^ë;Þþ•/§=ï­wüË4\LÞäæ1§+æ o"/7yÅDÛ´Ci1%‡˜†ùíð—Û)cà²Ì\n’ùg°+——·CÙ4«n.ù?�ÒøãßxoY›6ÌõjZ²®Üì{­ïØMóÄ›,mxoÕ«i¹¨+Ÿz­ïx³9lÛæªLæÈ«�÷Vͺrºþ»ß~õúŽÇiàbÓ†yj3ï­yû&¬ZÚ.–ºrº¾¾š–ìV�r[W¦Ìi{WÚ.–{6—dL‡nÕ)·C]™2§íÝéúújZ.îÙ\’1ºU§ÜÞÔ•)sÚÞ�®¯¯¦%�§ëë«i¹¸gsIÆtè–õyJ«.Çíqûp1.êÈ”ÛnÕù¸;ÆRëÈ”ÛnÕ‹M\Ö:2åvèV-ÇVëHisO‡Û¸Ü$�©í˜2§íÀ|ÜñÞ²>OYK)mŽÇÈnYÏâ±4 Ú¸þêÌw§ûqý¶ß_ï{ÝÝ�îÇõtýéÇÛÓM·`¾»¹×o_÷×û^ww7÷ãúõúë�·§›nÁ|÷å~\í÷×û^ww_îÇõtýÛ�·§S·`¾ût?®¿¾î¯÷½îî>Ý�ë·ëÓ�·§S·`¾ûz?®¿í÷×û^ww_ïÇõtýíÇÛÓ¾[0ß}»×ß¾î¯÷½îî¾Ý�ë§ëO?ÞžöÝ‚ùî×ý¸þÝ~½ïuw÷ë~\O×7?Þþ]·àr“”q=1ohì6ç×Ïâ±4‹óóå®Ü�ëézÿáÉ|Wî?Þüúr½Ú-ÎÏ·wå~\wwåÞâü:ÚΊ¶ëµ¾ãMn.b·»Íà1fvÓ<ñÞ²Þäæ"v·¼Ì2ÇÃnš§n½ãM–6³¹�™S^F¼·>OYK)mŽÇÈn=‹ÇÒ,x™eŽCë¼Ì2Ç¡u ^f™ãО¼€àüü_ÿàü§¿çü§¿ÿãoþö�O»—›¤Œë‰yCc·±8¿~™eŽC{RÆ/Çù®Ü�¿�ûãî®Ü_ðâ¸}¸˜wåþi·àe–9­ó2ˇöälâò²\”hóÀ‹§Ý‚—Yæ8´'›¸¼;Ý_p±iÃ<µ™9òêÅÓnÁå&)ãzü¡]lì6ç×/³ÌqhO.6qyWîŸöZß±™F2G^ ¼·àe–9­[ð2ˇöäÅßï×Çiü5Þ_pqÅð—C\\¿xÚ-x™eŽC{òâ³¾8>y›¯ž}8í÷ûëýÓñ·ñæøâÿ^L‡W›C¼xÚ-x™eŽCë/³ÌqhO^üù÷?¯¼89Œ¿�ŸžZÑv½Öw¼Ì2ÇÃnš'Þ[Ö›Ü\Äî6ƒËÛvñäÙHÆtèç矧äòÙqwùl$c:<íÖç)k©u¤´9#»U‡Óq¸9_ŽÃ§ãðõ8|;Z5–Ó1–›ãRŽV]nŽÛrÜÞÔ‘ŒéЭgñXšÃi\÷×ûnÁp3®ûë}·`ø2®ûë}·`ø4®ûë}·`ø:®ûë}·`ø6®ûë}·8¿¾Ü$e\OÌ»�Åùù³x,ͪK×å®Üw«.7㺔WKéVÝ–qÝÞ•ûnÕí͸nË«méV�å4®±¼yòìÕRžv«ÆrWîÇ5–S·j,7ãËéU,§nÕá4®ÃéãR^Åróa{Ó­:ÜŒëpó1–Ó‡méV¾ŒëðåãR^Årú°-ݪçq>}ŒåæÃö¦[uø:®Ã×�7×ûWËÍ«Xn>loºU‡oã:|û¸Ü¼Šåôa[,ÎÏ£íºÅùõå³qN¯†›·Ã—Wçnq~½»|6®ÃÍ«áëÛáôjøòvøôjøÖ-ί§qn> Ÿ¬h»^ë;.oÛï-Ëz“›‹ØÝfÐâå¼iO>OÉ2’1žvëbÓ†¹Î›C­+§ëý�·ßºU¯¦¥Ö•›}·>OY/—ãîr9î–ãrª#Ó¡[µÔ:RÚ�‘ݲžÅciõ-^ΛÆ{ "s“ãz9†è”qÝw 2ÞÄ4[œ_—q-OÝâüz9�ëÒ-ί/oÛÅ“åx¹w—ËÓnq~].Ù].ëþzÏü3šÅùù³x,ͪ‘¹Éq�ó6ºU—q=]ï»U_f™ãО¼øñûïÿüûÈpؼ þ_äæÅS‹óóh;‹óë8 aq~þ,K³ên×ËåÃîréV]Æu9½Ý-Ýâü<Ú΂Û6—ƒÅùudn’MZœŸ?)½š–§lÒªO¦gÓÝòôŸÖéÙðdÞ^-OŸv Ê%å¯WÓÂü3šÅùõ³x,Íâüüe–9íÉÅÏ|òëéñÅ�ßÿçßGÚ†‹Mûùí"(�Ç«i9¾à°Ù¼^<íç瑹Éq�ó6,ί£í¬h»^ë;Z¼œ7�÷–õ&7±»Í J{²·c�rÛ­úyJ¶Óáb¬Sn»U9ÿWkisíÖ;.Ë<0ÿ våòòv(›FüåvšË¦1ÿÌÍíãOCÌ›K¦¶cË›©äÀæ’7›Òæ�÷Öç)­š1”]­#Sn»U¯¦9k™r{Ó­Zj)mŽÇÈnÕ¥·å8Ü^=,G«·WÛãp{õ°½9>;­:Ü^=,Ûãp{õ°ÜÔ‘ŒéЭgñXZ­ïh‡ÒxoA»ØÆõ¦×w´Û«g‘l.™#¯Þ[0Ü^=,㺿Þw †Û«‡í¸î¯÷Ý‚áöêaÙŽëþzß-n¯–›qÝ_ï»—›¤Œë‰yCc·±8¿~�¥YœŸ/e\—»rß-ÎÏ·e\íÉö®Ü?íççÃíÕÃ2®ÃíÕÃòq)Ýâü|¸½zØŽëp{õ°ý¸-Ýâü|¸½zØÞŒëp{õ°½ù¸-¯¶¥[œŸ·WËv\‡Û«‡eûq)¯¶¥[œŸ·WË͸·WËÍÇ¥¼ZŠÅùu´]·àÙ¸>n¯–íÛáöêay5Ü^=l?´§ž ·WËÍÛá/ùd¸½zXž~hO»-^ΛöäÙÓnÁÅ&.ïN÷ã:u .6qyws?®ÏºC㺿Þw .7I×ó†Æncq~ý,K³8?ß>\L‡‹»r?®Ó«XîÊ}·8?/—lïÊý?ýu½gþͪCÙÝ•ûqÝ>\L‡‹»rÿa{Wîßž®÷ççq‚Œ¡ìîÊý¸nïÊý‡íÃÅt¸¸+÷oO×ûnq~>ä0®C‡¿ä“Œ¡ìîÊýS‹óëh;+Ú®Wê;Ú¡4Þ[–õ,K«õWSi¼ÉÍcNW¼·à�Cþù"»�1?ì¦yz²·Çö´[Ð¥=YŽÛãöáb:\ÛÓnÁË,s<ì¦y²¢í®­üþïÿíû÷ÿùoûó¿àoÿáðýü§üþïÿñýûßþø›?ÿë þåoþÌ÷óŸþû÷ó÷?}?ÿçÿ›Ü¦õd­Ï¶¹ˆFrŠ/{¡D4š}¿5úŸ¿ìÿñëþá—ý¿~Ý?ü²¿úP+ÇF³«7Fÿý/{ù×ýÝ_ö÷ÿéúõ?^¿üÿÿÿÿÿÿÿÿÊÀvÿ˜–PLOT.LIB@ßÿšÿ‘ÿ –ÿõÿ òÿ“ÿžÿ‹ÿöÿ�ÿŒÿ†ÿÄÿ�ÿ‡ÿÅÿÂÿ�ÿœÿ›ÿ�ÿ !"#$%&'()*Šÿoÿ™ÿÎÿ’ÿ„ÿ‚ÿ×ÿÖÿ˜ÿ¤ÿ¢ÿ—ÿÓÿûÿ+,-./01ˆÿ”ÿùÿÒÿÏÿØÿÑÿÔÿ‰ÿÕÿ2345ÃÿÁÿ6789:;Éÿ•ÿÐÿÍÿÊÿúÿåÿËÿ<=>?ÇÿÆÿ³ÿ°ÿ¯ÿ«ÿ¡ÿÿþ%�ÛtÒùjÇ:õÇ1îùý�¶mm™y(9Æî}Œ{ÚLø¬£|nîüj[´K%ÇXÞǸ§Íœu”ÏÍ�_m‹v©â¡äË©ÕÓ÷´™›è]gNWÛ/ñPrŒ=m[Ö’ãžæ3ãŽ=á®gmã_Ý]´1ÝpœÂ}æái-Yòžc�: Íg–S«'ÚLãæÊ§“™nØq3mÜqœÂ}æ¡ä=qÃ1c=·¿ôÎ亰£ùÌBÛıN½ëÌCÉ’§És—ÚüyøÎ÷µä¨aÕqà·kÉ’¿ÚVr,µ]TÇØÓ¶­-/·?~üå•é†M­®%ÇtÕÇØÓ¶­-/·?~Ô°ê+Ó §·¶­%G k~�÷¿¾ÿõø^ß½'Üõ¬m-9bþÇ÷er]ÆžË4U5¯%KŽ]�>½ïÞâùí}gíúû®¶‹êûn>µª÷9ž½›ßKŽå.ü¾ÜµÝûé­ùYïË|jUïË|ûmŒ=›Z]K–¼¹ò©ÇdŽó©U=÷ljõiO¸ëYÛZò¢çpI8ΧVµ?ôíʧÇÇã×å.üô·e>µªŸ·O%åó:î9ΧVõP²äq›N:_mbºê5ü¸s»ÓžM­>­%ï™®úñªÓ¨añP²ä¯¶�x¿k»±'Üõ¬m-Yò¢çpIø´E×ãÎíNûÿØÿýýR›??­ãžµ]Ty( wm·?Ô°êÏÛµ$l:ªõ1î™?Ç‘Kmþ<3ùÌtC ‹‡’\ܵÝþp×v_oK•{T§«þr×v¯üy©ÍŸŸ˜6ïÚîpû´–„›i#ö‡[úÄ]ÛqžJrýñi‹®Ç骿ÄëÓZ>mÑU½–„›i#ö‡[úÄ]ÛqžJrý1]õ—xÝ.µùó¸çR›?cí:5,JÊçuÜ3]õ~(Yò¸M'�¯61«_Ãgíö„»žµ=­%ï™Õ¯Žô7q¬W3ÍgÚܵÅü™›i㸅{ø™‡’%O“ç>æÞ6|ÿý}-9ŽõjæÀ÷Ÿß×’%µm×{Â]ÏÚÖ’%/z—„ØŽó©U=./á³v¯OkI˜®úK¼îÇz5¯%!nðÔY&×…þ&—äúã¢çð÷´ó™åÔê‰>M<”äúKìÇùÔª—S«§—ðY»×§µ$×_¦«þ¯ûÃÜÛV’ëù\R>¯cÜ3«_y(Y²äEÏá1î¹Lç…é†c�:%!n¸ûóýMãžc�: Íg–S«'~Íìx(ÉõÇEÏá’\ñþp·–äúË2¹.ûÃM«³Jrý!ŸK‚ê¬1î9Ö©3¹.,üšÙñP’ë�‹žÃ%¹þâýáëÝZ’ë/Ëäºì}»RI®?äóZî™�í$¦«N«]›[5¬™‡’PÚ÷‡¿ÿ~ô×Û§Ÿ·kIø´EWõZvuú´?ì^n_×’°{‹ç·ýa÷â×µ$,wm·?,/·¯kIXîÂûÃr×vkIØÍ§Vµ?<îÞâùíë®NŸžþöXÚ¿Þ>­%aŽgïæýáöÇ·µ$Ä »ùÔªþøöãýMfŽgïæýáëí�okI¸™6b¸¥O˜óT’ë�‹žÃ%¹þ7,/ñúÇr¦¿É,wáýay‰×µ$×_â†å%^ÿ\îÚŽþ&³ÜµÝþ°¼ÄëZ’ë/qƒ§Î2¹.ô7¹ä¸è9\r@ܰœZ=½ÄëË]˜þ&³Ü…÷‡åÔêé%^×’â†åÔêé%^ÿ\îÚŽþ&³ÜµÝþ°œZ=½ÄkÉ!ŸÇ=qÃ2¹.<”ù¼–„e>µªýáq¹k»¯Ë]øéo�5¬úõöi- Ë|ûmXæS«ú}ûm- KmÕ—Û×ýa¹ ¯ãž…¶‹™‡’p3mÄþpKŸø7ç©$×KmÕ—øyûº?,µ]T_âõç2ß~[KÂRÛEõå/¯ûÃr×vkI¸™6b¸¥OÔ°*ç©$×ÓU‰×ýáR›?¯ãžKmþL ‹‡’0«_oŸÖ’P÷‡Ûµ$ìj»¨î»:}ZKBÌŸã¸?Ü´:k-Yn¦�ØþNŸ¨aÍœ§1î™Õ¹:Ò¨añP’ë�‹žÃ%¹þ²³v}ØÕéÓÏÝ|jU¿ãëíÓZ’ë/qCÌŸãH“ù´EWõãw¾~*ÉõÕY%ÇEÏá’êþPÞ®%|z‹ª’ƒë�ÇÝK}ýú¸³výë·ÿø½›O­êéé÷ÏÞ;ýøÆy*9¸þrÑs¸ä³úÕñ±>­ãžYýêÈq wjX<”£îõçmÉÈçuŒ{>½E%ÇtÕkøqWÛEõi÷·p§QÃâ¡ä¸™6þº?ÜÒ'jX•óTrÀtÕ_þúº?\jóç1î¹ÔæÏÔ°x(Éõù¼ŽqOÜ0Ž#%¹þˆw/õõëãÎÚõŸß~üã÷n>µª§§ßs<{7ÿùíÇ7ú›LÌŸã¸?ôíJ%¹þ¢:«ä¸è9\r@ÌŸã¸?Ü´:k-9`WÛEuØY»¾–0«_ëÓ÷ÌêWGŽ[¸SÃâ¡ä�Ï%¹þ�Ïë÷ÜLÛ×:MGJÂtÕkøq÷ÏoO븧¶¹SÃâ¡$|Ú¢ëñ;×ߟ֒p3mÄþpKŸø ç©$ן¶èzüÎõ?ÿ�ë�ïOkIø´EWõZ>mÑõøøþ´–„›i#ö‡[úÄ_8O%¹þø´E×ãRÛEõ%^÷ÿ¹¿}¿ÔæÏOkIø´EWõZ>mÑU]R>¯cŒ{þç¿þûy(Yò_×ÛÿÀæ’7›Òæ�÷Öç)­š1”]­#Sn»U¯¦9k™r{Ó­Zj)mŽÇÈnÕ¥·å8Ü^=,G«·WÛãp{õ°½9>;­:Ü^=,Ûãp{õ°ÜÔ‘ŒéЭgñXZ­ïh‡ÒxoA»ØÆõ¦×w´Û«g‘l.™#¯Þ[0Ü^=, { -> 35 } function randg(mean,sigma: real): real; { produce random numbers with a gaussian distribution } { MEAN and SIGMA are supplied by calling program } { function RANDOM is required !!! } var i : integer; sum : real; begin sum:=0.0; for i:=1 to 12 do sum:=sum+random(0); randg:=(sum-6)*sigma+mean end; { function randg } function random(dummy: integer): real; { --> 29} { random number 0-1 } { DEFINE SEED=4.0 AS GLOBAL !!!!!!!! } { adapted from HP-35 applications programs } const pi = 3.14159; var x : real; i : integer; begin { RANDOM } x:=seed+pi; x:=exp(5.0*ln(x)); seed:=x-trunc(x); random:=seed end; { RANDOM } PROGRAM rantst(output); { test random number generator RANDOM } { procedure MEANSTD and function RANDOM are also required } TYPE ary = ARRAY[1..100] of REAL; VAR x:ary; n,i,j:INTEGER; r,mean,std,seed:REAL; {$I RANDOM.LIB} {$I MEANSTD.LIB} BEGIN {main program} seed:=4.0; n:=48; writeln; writeln(' mean std dev'); writeln(' (0.5) (0.2887)'); writeln(' ==============================='); FOR j:= 1 to 20 DO BEGIN FOR i:=1 to n DO x[i]:=RANDOM(0); MEANSTD(x,n,mean,std); writeln(mean:10:4,std:10:4) END {j loop} END.AST4 PAS !—LEAST5 PAS #ívÿàROMB1.PASUßÿšÿ‘ÿ õÿòÿ �ÿ‹ÿ�ÿöÿÄÿžÿÅÿ–ÿ“ÿÂÿ !Îÿ’ÿoÿ�ÿŒÿ™ÿ›ÿ"#$%&'()*+,-.ŠÿÓÿ×ÿÖÿ‡ÿœÿ�ÿûÿ¤ÿ¢ÿÒÿ/0123456789:;<=Ñÿ˜ÿˆÿÔÿÿÿÏÿ—ÿÕÿ•ÿ„ÿ‚ÿùÿÍÿËÿ ÿ†ÿÐÿÁÿ­ÿ«ÿ‰ÿØÿÊÿ>?@ABCDÃÿ¾ÿ¶ÿ”ÿEFGHIJKLMNñÿÉÿ½ÿºÿ³ÿ²ÿ¯ÿ¬ÿýÿüÿúÿøÿåÿÌÿOPQRSTÈÿÇÿÆÿ¼ÿ¹ÿ¸ÿ±ÿ°ÿ¡ÿ…ÿÿÿþûÒ—qKiÛ›ÍÐûk>óî_7¼ÉxÍìªÇe¬s37©/DiÛ•ÇlU_´o22®›µ×¶ô¾²yôü÷océ§fõ>qÓÚ¢ÑCF?œmÏÏö{•ó¥=QéEã2ddÏ|]çfŽWWEãr9Q4.CÆk޳O/®.W6�žºx2Ö봳ʱ®Öç¼É¸ÑãÙp¼šÖͣ矮2äÓ�‘±/íZ§³"JÛÞ\dô¾´'*çgû½ÊymËDѸ ½÷ocaôa¢h\.‡Œ×øl«2_� ³«—±ÎÍÜ|¤¾_ÚöFå1[ÕíÄ›Œ×Ï|]çfŽWçxÜŠëÑn•±�¸ùÈ׳rÓøÓx¸—7߯’Ñ}Õ{ŸK?Þm=ÚüöžvdvÕc•!£×ÞûÄXÊøñnóèÑæŸ¿½§)—!£Ÿšu®RZé}⦵E£‡Œ¾Ÿu­Ã¹ëù|>Ïç>·Ï3úrîZÆó_Ï·ç¯zŸ˜]õX…!£Ÿ´ÔñÃÕùõùál{~lµmϯúDѸ0dÜèñì 85kZ�ãrÐ�*¥•i=ŽËACìg]ë0­›!|u·¹ŸÖÍ�'-uüp5­gû½ÊÃÒž¨\~ÚϺÖaÈ€ëi½8^],í‰ÊåÓãÕÅÙ~¯ryùòù£CÔ»Íý´ž´ÔñÃÕËë!<­›!ìi}7dÀál;­×Cí5Ö v·žV?Ý ìn�­¶í´¾ô|È`wë«;ßO«=d°»ÝϺÖaZ÷³®uxùnÈ`w»Lë~Öµ›!ƒÝíIK?\MëÅÙ~¯ò°´'*—Ÿö³®u2ØÝ¾æºm÷gUÔ2îõ¿m>� ‡³-ÇVx÷?~Ø\>ݰo³ë�7ìn�­0ÏÓº¡6.–§›KNó7ÞqjìÞÞèñìŒ>Oë<¿|÷°2úÕ´.í‰ÊÓùåIK?\ ýp¶�ÖÃÙöéñêâê2ƒÝ[ù4d°»­wöý´ž´ÔñÃÕËÃÙvÈ`wû¤ÌUûY×:L?Îë�}9d°»u-ã´úêΛû!ƒÝí¯Óê‡Í�Áîö5×m»?«Âõ¥=¡ùÊXÊø‘7ìn�­°�Ö µñ+§–Áîí�ÏÎ详Õ~º2ºë´úêΛû§Û‡Í�ÑëÝ«ûi½8¶Ú¶/ëÝ«‡ÍýC½s½¿ütqlµm6�ž_ýØjÛNë±Õ¶}ùþÑó voåÓ�ÁîöI™«_¼šÞŸ×»W÷—C»Ûùˆ?¿§¾�3ؽ½ÑãÙ}>Rïì§›ûŸ>?ôœúBÎè0¹oõεŒO7÷õÎ~º¹¿üioõÎ~º¹YÛry™ÑÙݶÂÅxs¸¨wöÃæþ¡Þ½º¿üioõîÕýËÚ–ËKê 9£³{{jÖ´Ör¦ŒZb>âÏ›ÔrFgw{£Ç³3:»·§fMk-g2:»·*¥•i­åL�Ý­|Êèòi诙�øó{Þd°»µ§õÕÓMœ¹Î §f 0ú0­õîÕ}†|zÍ—ÿþãï~ÿå?y“‘q£Ç³{ÍvœÍ¾´ÇeÜò&þ})¾.C,í‰Ê´n=2àl¿W™Ö{ô|È€'e®Z?@A ÿÐÿËÿÁÿ­ÿ†ÿÃÿºÿ”ÿ‰ÿBCDEFGHIJKýÿÊÿÉÿ¬ÿñÿÌÿÆÿ¾ÿ»ÿ±ÿ¯ÿ¨ÿLMNOPQRSŽÿüÿ÷ÿôÿåÿÈÿÇÿ½ÿ¼ÿ¸ÿ²ÿ°ÿ«ÿ¡ÿ…ÿÿþµ¶Kh[n~ Î=`û¯û+…�•¡‹Ž&[…ÍG˜{‚¶å†ô%™{;âQXø`Ucœ±É¹Ýéúyû.�Ú�V‘skE„]Ó–Æ9M1a×´eßÖ5é>Ù#iç¡)¦ ,<´ê`²UÖyõÐÓâ¡)¦ ü€!«ü.º·Í´™×%àÍá¶5¬ÆZ\ñ(¼¡KVÂÀ°ú¢;]ß6Ðf^aRc®µ=ÐØj‚¶åfv.Ù#é¾­kÒ½±ÉCSLAØ9÷5jDÕxhŠi ÂPmI:bBV†.:šl6aî l¹!}AIæÞŽxþµ°S«sÎ#j?îºÓ©ûn; +CÒAØçœGÔ:~Üu§S÷ãw{Øšb Ân´ŠzÒÚjç<6Ö&Š*»:Ó�š^™>÷9÷ªWªv©WFÇþK_ö/ÎydeèBAØ�”L|³ö‡¾iË~°Æ–ýê<4Å„ ¼¡KVÂÀhùbˆ©¡ �ÖVûbˆ©¡ Ô™Ôø¢ €ZwÝÞ]FJ&¾Y}1·uMz›ì‘ôò¶Ît &_ÌÃ:'{$½œ‡unëšô²Ü]OßaÀ캽/FJ&¾YïAP¾è‚0 ”/^ƒ0д¥/AÐTS4¨&å uî‚0ªi°Æ–¾xwºaT“Zwjï ¥‚0ª©Ît Æu¦5w¯AÕ”|Qg:P³í‚0ªi¤dâ›Õs[פ·ÉI/oëLj‚0ªé[Ö­!kúŸÍcLhÚƒÕxýזּÝrîPÛ¬LƒGaTÓ`5röEc1§s·`Ì_ñŠÑ £zÚÐ%+a—}‘óÝë¶ ÂnõE²GÒç|7R2ñÍ„]Ó–¾hÚò<¬óº£z"5aT“Ù)µ÷ÅHÉÄ7ë]Ó–AÕ¤ŒŽ¾PëNm»}F5}ñ…ÚvAÕô€ƒ-ëÖÔÖÜCÛ#ì€ÿ j?âQÕ4X�ҌŌVÕÓ†.Y »_(u.ƒ°SÆjÝ©m·?—Û.;³{Ùûb¬±å�Ù½l»ýÖì”Ù/oçÁ[n»Óu Ân°Æ–¾¬±åÝ»ÓUÕ©1£šòõþÌ=)aTOºd%ìò³SêÜí?½¿ž®0÷¤„�ÌqÓÌf§ŒŽçn¿5;¥ÎÝ~ùTÄM3›�RçnglZa‡j²sÜ4³Ù)µíö[³{Ù/ŸŠ¸if³{Ùß›–æž”°Cõ4ZE¾0º%aPjy€zß} sOJØ¡š6tÉJØ¡z­"_ÝRv¨žHk«}atKÂÕDjv¤Æà�¨÷ïð(ŒjRÊ/çNh•É £U„�¨_˜ÝË^˜Ôœ{À‡ÿëïŸ?ü�ºdåÜʘjm/:–xþ‘ô÷„�d�¤}q=uAhëš´/ºÓ5G� %„�¦-�/®§kŽ:Jj~†¢#¢¦ˆêOÆš˜5ETNöH·uM)—Ù4ÏK4Õ�0ªIÛr3'{$Ý·uMº76õM[.AÕÔÖ5i_${$„QMÉIûâzêîÚº&„QMM[_4miÎM[aTÓQgCIÍM[úŸüwý3ªé¹oÚÒøŸü·ý3ªé¹OöHºF5=÷m]“^„�V™œ7ÍÜ´åòÉØ$Lj< ÿåv;ߊon·_?ÿþË¿ýü=nÕýíË7·Û¯ŸÿåÃ+ðÛÏßãVý°½é?ÞªoþÀŸ~þ3Ïv¿¹|vû÷g»¿ü™6b¸¥OÔ°*ç©$×ÓU‰×ýáR›?¯ãžKmþL ‹‡’0«_oŸÖ’P÷‡Ûµ$ìj»¨î»:}ZKBÌŸã¸?Ü´:k-Yn¦�ØþNŸ¨aÍœ§1î™Õ¹:Ò¨añvÿ�\SCILIB.DOC^ßÿšÿ�ÿ �ÿ‹ÿ žÿÑÿ‘ÿ–ÿŒÿõÿòÿ�ÿ¾ÿŠÿ !¬ÿ“ÿ’ÿoÿ¯ÿ—ÿ×ÿ"#$%&'()*+,-.ÖÿÅÿ™ÿ«ÿ›ÿ�ÿœÿ˜ÿ³ÿ¶ÿÍÿ/0123456789:;<=Îÿ‰ÿÒÿ½ÿûÿÌÿºÿˆÿ†ÿ­ÿ±ÿ¸ÿðÿ°ÿ>?@ABCDEFGHIJKLM¹ÿúÿ²ÿËÿÈÿÿÿ»ÿÏÿÉÿÆÿ‡ÿÇÿÊÿµÿŽÿÓÿNOPQRSTUVWXYZ[\]¼ÿÕÿªÿ©ÿ”ÿ¨ÿ®ÿ…ÿùÿñÿØÿ·ÿ÷ÿöÿåÿÝÿ¥ÿÿþÿýÿôÿóÿèÿçÿäÿÛÿÄÿ¦ÿ•ÿ„ÿ‚ÿÿþ?Üÿp¸lnºZö‹~Ãf½¯Ù›¸ë×Qâüpÿl¸Æþ·.׸6‡2Ü”-ûßþpÿl¸ÿá4²ÿëFsjw­àá“ïyôå×ßL#ÓxyÞný²·[æðm”ÝÀK…x=S�ëW,Û­õíV1�¥]QæY%è�<Škû'¨eÏ­®øý¡ 7eË!|e7ð�ƒÍMWË>ä0�K»âE»íMŠá÷¼<ö›#}`^¯·}8êŠëWl^]ë«ïyôå×�ê4^õŠ— áè·½•íöùjÖ¥]1¬×»ž©+Ò|tyøÑÛiì�÷7Yyôå×À·«âV ¸³^6Å÷ÓøÙ“�?þüs>ZÕ†T|ϯ}TðkÝüDí¥nyþ=?Õ�¼UìJ{U§ñò¨WËcq,WìzspãÝdw(íŠrUæ,ÙÝ.Óx¹Æµ9”á¦l¹~Å·º¸à§êÃð=�¾ùä�ƒÊ�o~ÂòXõ{6kk¯—­¾ŸÆ,|ùñç_R§‘iü`Ýn™Ã·QvÇòXÔòA_¥ÚÐÝþŶ_G‰WÌá]­¡�Ò®¦ñbm7Ùݎ屨w÷OÑW©6t7J»¢„¸US”íöë +^ö:«ðÆ)ò(zKE+[Âkö¦idÿîeÏ#—k\›CnÊ–>0¬³¢;(íŠuÐÃz=è»U-·¯ê4²wš+_žM#Óøzys¹¹¬‡esÎþÙ!|eGšÔ�¼^Þ|öþ£zwÿôû×Ë›ÏÞÖ»û§8Í•çgÓÈ4¾^Þ|ö¶ÞÝ?=gÿáB”vå·jŠ’^ö9›F¦ñíò£Í¦–Í9û˜Ã·Qv�†YqáØ1ôݺÍÒäu€ÁÛ5»\¿šFöïÞ–uzihÛw½•ìn8Í•O¾9›F¦qóþîÇo¿­‡esÎþÙPv¢ ”k?×kò¶¬Ãðä[ÇUi”í­£çqW9Í•¯?>›F¦ñíò£ÍæÛzwÿôœý³·e†'ß:®JcW2úWôöX1t7J»bðvÍîV9Í•¯?9›F¦qóþîÇo\Ëæœý³æðm”ifÅ…cCß­Û,­Âàm…ëWð¶¬ÃðdÙ¿ûÖqUÚö]o%»/{9íÖmÖ3n܆¬<ÖMVNsýò‹³id7ïï~|YËæœý³�·�ůûöZ‘ìJFÿŠëW¼-ë0<ùÖqUÚö]o%»Û÷ÓÈþ�¾*»y+|AßnŸÜ¸]õìn½ÝV8Í•GŸq6�LãæýÝ�ß~ûPËæX`ßFÙ‘fV\8v }·n³ÂàíšÝ�—G5Ö¡·Ûidÿnç軵dw �¥ÁÚ~Òü² pº~oË: O¾u\•6�ìßiÛw½•ìngNsåÑ£GgÓÈ4nÞßýøÅêaÙœ³¶À¾�²ƒ4³â±cè»u›¥É냷kv7¸pL#ûw7ÞÍ[}Å�uqÑoºZNsåÑ£/Ϧ‘i|»ühsÿY=,›söÏæðm”ifÅ…cÇÐwë6+ƒ·•ëW¼-ë0<Ù¨_i[§‘ý»Ó\yôðåÙ42�?øàþòQ=,›sö.ÌáÛ(;ÒÌŠ ǎ¶7•`«2ä“ỵ„nÖx¬'ÓÈþÝEÏ §¹òèù—gÓÈ4þàƒûËG¥–Í9ûgCÙ‰2P®ýX\¯ÉËžG QÚ•wܪ)J:*§¹>úøál™ÆÃÝûËzwÿôœý/Nsô–Š'gÌ[g*Öë𚽩§¹òèãOΦ‘iüÁ÷—õ°lÎÙ¸0o�ÙÛ-sø6ÊŽuèí–ÃÝûËzwÿ´Âi®<úæùÙ42�w÷o>¸¿|Tï ÌáÛ(;xyì7G.z†ŒÒo�ɶ7AÃëíÚ4²7(|ÁW”vÅ+æÒcÀÌî-‡ §¹òè›/Ϧ‘i¼»óÁýåC½»z,ÍyT ¯ÊnÞ _�GQ®ýXÌáÛ §¹òè‹OΦ‘iüÁ÷—×ò9gÿá¶7•`«2ä“ỵ„.z2‡o£ì*ûg§¹òè‹�Ϧ‘i¼Ü\nÞ¿¾¬‡es·Qv¤I ÉãÝëÀàHÂkö¦¡rš+�>y8›F¦qóþõå“§�êÝýSöÏ®×ëë­ž ެpš+�>y~6�LãæýëË'OëÝýÓsöÏ—è%»¾ �¢\û±˜Ã·NsåÑ'_œM#Ó¸yÿúòɦÞÝ?=gÿlasÔvûdp$søFWk¨§¹ò蓯Ϧ‘iܼ}ùägO^×»û§ç°ºYcè�ÅÏÖ~ó“'ƒ#+pš+�¾þül™ÆÍû×—O~öäM½»z Í-t³ÆÐ _ð³µßüäÉàÈ œæÊ£¯ŸŸM#Óx÷bÙ\>ª‡esÎþÙ¾�²#ͬ¸pì(l{S ¶*C>¾[Khà¢gå4W}ùèl™Æ»Ëæò¡–Í9ûgË@¹öcq½&Í/yÙóÈÛ²ÓoW¥1‡otµ†*pšëÃçÏϦ‘i¼{±l.Ÿ×ò9gÿláq‰^²»á î^,›Ë‡ œæÊÃç_žM#Óx÷bÙ\~\Ëæœý³z’樒ܔ¹Üô|Å‹ïÖ’Ý­Âi®<<úâl™Æ»Ëæò›zX6çìŸ}Г4�Ëì` ÃBß­%»[…Ó\yxøül™Æ»Ëæò‹zX6çìŸý¸D/ÙÝ^öþòl™Æ7/~zùþM½»zÎþÙåQ¼ÑËtcßFÙqá °í×QâUå4W¾y8›F¦ñÍ‹Ÿ^¾óä®ÞÝ?=‡Ë£x£—鯾�²ãeÏ#¥ÑSQ²»qãµ¥¢N#Óxùz9<ª‡esÎþÃæðm”\8è-u%»Ûׯ �‚Œ2ëçîWe;�ìßźU…Ó\yøâã³id/_/‡‡zX6çì?\šó¨àZ™ +†î†/È£(×~¬ §¹òðÅgÓÈ4^¾^ÏëaÙœ³ÿðƒÞÊ–¾›Ã�uÅcÅÐݸ)Ûmo·d”Y?¯Û~ œæÊÃ'ŸŸM#Óxùz9¼øC½»zÎþÙýn?Ö—QfýÜýªlyÙóˆÚÕ“Gè&»[å4W>ùül™ÆÍýG‡Gõ°lÎÙ¸4çQAo©Û(Ùݘ÷Qv4¿äú›¾›·_ ĺUå4W>y~6�Lãæþ£ÃC=,›sö·QvÜ”ív`sÿÑaSïîŸV8Í•‡O¾>›F¦qsÿÑaSï³ÿpÓwóàÆ¾ÑÕâeÏ#jWOn¡›ìn8Í•‡O¾>›F¦ñõû�ž>ª‡esÎþû2$4'[•!)ô–º�’Ý�9|eÇõ+ò¨idÿîµw׊[vÊ£¯*œæÊÃ×�Φ‘i|ýþ£§ÏëaÙœ³ÿp(×~,®×¤ù%/{)WÿY‡,×[1—¦íPá4W¾þäl™Æî/ïïêaÙœ³¶À¾�²#ͬ¸pìØö¦lU†|2|·–ÐÀEOHO#ûwyQ²_ðÀìí«æ]ÙNsåáËoΦ‘iüìþƒ~´©‡esÎþÙÒÐWe7o…/È£(×~¬s®úÅÅ:¸á þÐè�¬•Ó\yþùÃÙ4²wZت ÉðÝZB=I“G±íM%úÏu…ž\¬í&»ÛÙ42�oîîß<¯‡esÎþÃMÙ ÊåÚ�×kÒü’—=�hnÛÞT¢ÿ\WÓÈþ�ž\¬í&»[…Ó\yþèó³id_¼þ`sÿÑ¡–Í9pyoË: ½4^D8ø`m7Ùݸ~ŦïæÁíW±nU9Í•çÏϦ‘i|ñúƒÏêaÙœ³ÿÅÒ ·‹Þz E×€¾šKº\8 �‚·e†^Ú4²§k»ÉîVá4Wž?|q6�Lã‹×|ö¼–Í9û/�âmY‡¡—†"\¬í&»¥]ÑsàÆ»y«�ZVNsåùóÏϦ‘i|ñúƒ�ëaÙœ³ÿÅÒè»9üXW¼-ë0ôÒP„ƒ‹µÝdw«pš+ÏŸ|6�LãåæòíòQ=,›söÏæðm”iRC’Gñ¶ìv…‹µÝdw«pš+Ï?~t6�Lãåæòé‹M=,›söÏæðm”iRC’GñTà-k»ÉîVá4WžüñÙ42�O_lþ]Ëæœý/–z\¶kÉî¾ �⩆A[.Öv“Ý _�GÁC»šFöï~ÒÛU…Ó\yþñ—gÓÈ4þîÓý_þöé§¿ùôÓ·Ÿ=¹»óÁÃÝýS>ÝÿòïŸþñ7Ÿ~úí�îî—7pwÿ”O÷¿üݧüÓ§ŸÞ½X6—�à°løtÿË|ºÿô—ŸîÿüÿDOC^ßÿšÿ�ÿ �ÿ‹ÿ žÿÑÿ‘ÿ–ÿŒÿõÿòÿ�ÿ¾ÿŠÿ !¬ÿ“ÿ’ÿoÿ¯ÿ—ÿ×ÿ"vÿðÁSIMP1.PASMßÿ šÿŒÿõÿòÿ�ÿŠÿ‘ÿ–ÿ’ÿ�ÿžÿ‹ÿ“ÿ›ÿ�ÿ !"#$ÄÿöÿÅÿ ÿÂÿ‡ÿœÿ×ÿÖÿÓÿˆÿ™ÿ%&'()*+,-.ÏÿÿÿoÿÑÿ˜ÿ„ÿ‚ÿÎÿÕÿ�ÿÔÿ‰ÿûÿ/012345ÒÿÍÿ¬ÿÐÿýÿ6789:;<=>ñÿØÿ¾ÿºÿ¯ÿ—ÿÌÿ»ÿ±ÿùÿ?@ABCDEFËÿÊÿÈÿÃÿÁÿ­ÿ«ÿ¨ÿ†ÿüÿGHIJKLåÿÉÿÆÿ½ÿ¼ÿ¶ÿ³ÿ²ÿ”ÿŽÿtÿÿþEùƒ l]9Wu}ÄÓ/xþé NRaM¤ƒ Ñzƒëx±®°7ïŽâgŸq’âˆß´ºz| <„„!ã#J`ƪÍ­70Á#0‚:hG&òI )o8ÖѧºîpÞo>>ýµ’âTÍÚͺRsò ©º�¢�*)¤Xµ¢õk?ö …45PR%Å«5ëØOÝùµÇIŠ#–‡Ïð:bõ }·ÁI )®t°F `í›î¼ß¼öR�ÉU}ĪÍ­7X{œ¤�¢(?PÖŠÀÖ¥¨ëäR³.…Ô}ª( ©’¢®ïA�µ«ëŠBš*)¤8ÂhGÊ!ÁšH¢õ×?ðb]aoÞ3”N„“G¬Ú ÑzËXûÉ:A’_H!˜ ] )œ¤8b±ñ3ŒvWRð+¬7 ú¯ Ñ£Xˆq’âˆT´ÑzËÈ”bhûÁðB –ÁÚá$…÷ j[× ¬‰t UIQ÷s¦CÛÏt'Ó²v³µÏ¹eíf2¹eíf)jÖî\× …TIQKq]7°&Ò�T%Å•ÖHKqÓ=WR™R mßt£.…ÔSò ©éµXˆ+)ŸsËÚ5ÝÚ�É/¤n™R m?URt'Ó²vM·Ùo*)2¹eíšníÇäRÓmíG] ©©’`íšn$“[ÖîöÃ~sñ9·¬ÝtÉ”bhû×/ûM%°()™±Xˆ›gÖnª¤ Q ìÅÒ@ÜtÅÒ@|y®¤ÀîÁÚ�›Žµ«¤Àî‘)ÅÐöM7êRH=%¿�š^‹¥�¸’»ÝÉ´¬]ÓÑ�LËÚÝ|Î-kWI�ÝÃçܲvM·Ùo*)°{¬^Á6ÝÑ£Xˆ‘íÏÈ^ ì¾_é`�ußtÉ/¤n™R mŸ÷›‹}:ï7S%EísnY»¦ó9·¬ÝmíÇ~’»ïdr%vÖ®éF2¹eín?ì7ŸsËÚÝž÷› ÝÉ´¬ÝtÉ”bhû×/ûM%v�EÙHÉŒÅÒ@Üü8³v“€6Ñ&Œ¬ÝÏ¿°vç ÁdŒáÊ#k÷ÄÚ�§Ÿ»på1útaí¦I 2¹ª�`ë ã$…W:XS×G¸` ŠòNRÿHêeP•@ò ©¦;ï7•€.…TÓým¿©¤e#%SI°u…ÇäR³.…Ô}šY»©’X”�”L%°()™qø¬ÆŸ¦ù}P:¼ŸY»I 2y/Å_ðéà ¶»w—íÿÞ¶Ûüðíå·¯ø×?ÿŽíîÝmÛ½m·ß>þþõWŸ>¼`»{7oÿó¶Ý~ûøû×_Ÿ�O^°Ý½{Úª?·»·ÿíc‘Ç�únÝfiò: ïÖ’Ým˜Föï®_ñƒ(;ů^¯[U8Í•/>9›F¦ñíò£Í¦–Í9û˜Ã·Qv�†YqáØ1ôݺÍÒäu€ÁÛ5»\¿šFöïÞ–program simp2; { -> 278 } { integration by Simpson's method } { Turbo Pascal cannot pass function names as arguments} const tol = 1.0E-6; var sum,upper,lower : real; function fx(x: real): real; { find f(x)=1/x } { watch out for x=0 } begin fx:=1.0/x end; { function fx } function dfx(x:real):real; begin dfx:=-1.0/sqr(x) end; {$I simps.lib} begin { main program } ClrScr; lower:=1.0; upper:=9.0; writeln; simps(lower,upper,tol,sum); writeln; writeln(chr(7),'area= ',sum) end. BESY PAS ÅCFIT1 PAS MCFIT1A PAS X { -> 278 } procedure simps( lower,upper,tol : real; var sum : real); { numerical integration by Simpson's rule } { function is fx, limits are lower and upper } { with number of regions equal to pieces } { partition is delta_x, answer is sum } var i : integer; x,delta_x,even_sum, odd_sum,end_sum, end_cor,sum1 : real; pieces : integer; begin pieces:=2; delta_x:=(upper-lower)/pieces; odd_sum:=fx(lower+delta_x); even_sum:=0.0; end_sum:=fx(lower)+fx(upper); end_cor:=dfx(lower)-dfx(upper); sum:=(end_sum+4.0*odd_sum)*delta_x/3.0; repeat pieces:=pieces*2; sum1:=sum; delta_x:=(upper-lower)/pieces; even_sum:=even_sum+odd_sum; odd_sum:=0.0; for i:=1 to pieces div 2 do begin x:=lower+delta_x*(2.0*i-1.0); odd_sum:=odd_sum+fx(x) end; sum:=(7.0*end_sum+14.0*even_sum+16.00*odd_sum +end_cor*delta_x)*delta_x/15.0; until (sum<>sum1) and (abs(sum-sum1)<=abs(tol*sum)) end; { simps } -rvÿÐÇSIMQ1.PASTßÿ šÿ�ÿõÿòÿžÿ‹ÿ‘ÿ�ÿ–ÿöÿÄÿ !"#$Åÿ›ÿŒÿÓÿ“ÿoÿŠÿ†ÿœÿ˜ÿ×ÿÖÿ¤ÿ¢ÿ%&'()*+,-./0™ÿ�ÿÎÿÂÿ�ÿØÿ’ÿÍÿˆÿûÿ‰ÿÌÿ„ÿ‚ÿ•ÿÿÿùÿ1234567ÕÿÒÿÑÿ—ÿ ÿ‡ÿ¬ÿ89:;<=>¼ÿºÿ­ÿ?@ABCDEFGHIýÿÈÿÁÿ¾ÿ±ÿñÿ»ÿ²ÿŽÿúÿÔÿÏÿJKLMNOPQRSËÿÃÿ¶ÿ¯ÿ¨ÿüÿåÿÐÿÊÿÉÿÆÿÀÿ½ÿ³ÿ°ÿ«ÿ¦ÿ”ÿtÿÿþö=›аûi•b¼àùüõk\U.ؘ¢36ì{6;X�ÂW'‚}e"a×TÖ8òMú©16xW`Ùâ›ñ¶7᪢ÒyWØÈ;ó×8'•ØíÌ{\ãœTTl»¡h¸-â†Ù´Óêå¥Û™÷~&S%•h¸Ýq ÃlÚiõòÂ;ó^®^^º�yŸá`2URQ9ŽmÙyZÄ †Û"©D3n÷ER‰.fÎROœTbK…ó1C÷j8©Dbö3,½¯È¸¤¢¢²aßQÞ0¡'û–k†“a˜ †Û}‘Tbp2Œ6ƒá¶H*18†Ëœ¥žxL**ôda_ 'S5T`ᮄq9 ³i ˜²ÅUEåd8†ò3g©'N**KꃋlØw”7LèɾåÆ\U€K•K*€ËÖ¼3ïIXxFÈÖ+X‡Ü« >.©NõãÀÁRå†->ÿÔ¼Û–!;�Iõcá·l½‚õpȽJ\RœJ, ·ì\n³í˜T"ÀdòÁL¡¼Í£J$—'Ô�Köü”mǤ‚úÁdòÊ íæQõ‘\žT€K•K*ÀÂ3B¶^Áz8ä^õqI}p*¨ ϸe묇CîU"pà`i0S(osöuö›r‹í˜T"pà`©rÃ6Û–íæìëì7£J$—'Ô?8Xªœ ¹<ÅxÁ†}GyÄžì[n¬ÁUEeþ£¼aÂ�ƒ¥·ÜX“TâÎÂ7ö•`\q ¦W•“áb†à,õÄIEeI}pñ‚Ko¹±W`á![¯`=r¯‚úxà`iè<-¦0gËþ2&àÀÁRåTÈå)Æ ,½åÆ\UTT6ì;Ê&¾:Ñ`2n÷ER‰±Í`¸-’JÄÉ0:O‹ †Û"©Äè2g©'N*ñdÄì9ÃÒûŠŒ“ŠÊɰJ\Æ †Û}‘Tb(o1Cp–zâ¤s²1“©’ŠŠŠÊ¢q� Þ!'K<˜ †Û}1f`2UR¹`cŠÎTذïÙì`=:SuMe,Á¾r²Ä»àŒ³ð œŸ—íóyg,‡w\UTN†UbÑìb&S%•%õÁÅ �ëlð9Yb\U€¢Ùek3­ÊÕü4˜i_îç'3�Ëóül¦s¹ŸŸÌ´/Ïó¨ŸÍ´*÷óÓ`¦}¹šŸÌt.Ïó³™Îåj~2Ó¾<Ï£JüÅL«ò’Ë“ ÐyZL·9[çd‰‡åøçœ¬ ¹<Å ²ÍW•%õÁÅxÁ†}GyÄÂW'ÂU fÏÙzaª‚’ °ðŒ�­W°¹WA}\xÆ-[¯`=r¯‚ú±œBy›³µ™By›“ �“ÍÖ9Yâa9& ,�“]ÿúò+ì+9ÔÇ%õÁ© ~³çlm¹¡¤‚úqà`©rC÷ÊÃ×c¹ýüåË¿¾dØËá¡@\ßT†_¶£ ê#¹\ ª ÔÇ%õÁ© ~d›Í°,;O‹r5&Ô�‚l³–eçiQîǤ‚úQ�m6òì<-Êó˜TPÉåñª ÂU…\žâeþ£¼aBá«᪢¢²¤>¸/øñÛß}‡ ûžÍWàSÅ'àÀÁRå’ pà`©rÃö#ìšÊG¾)Pøª±Á;,[|b³#.ÀMEÛ1©L2Võ±'û–kS¶¥“ êcá« ¦lËÎÓ¢t%1{“ êcXÀy bö ûJ–ÞrcMRA}úøál™ÆÃÝûËzwÿôœý/Nsôvÿæ¼SOLVEC.PASVßÿžÿšÿ õÿòÿ �ÿ‘ÿ–ÿöÿ‹ÿ�ÿÅÿÄÿÓÿ“ÿ !Îÿ›ÿŒÿoÿÂÿœÿ†ÿ’ÿ"#$%&'()*+,-˜ÿ™ÿ„ÿ‚ÿ×ÿÖÿÏÿˆÿØÿÑÿ./0123456789:;¤ÿ¢ÿŠÿ‡ÿ�ÿùÿ•ÿûÿ�ÿÍÿ‰ÿ—ÿ”ÿÁÿÒÿÔÿÿÿÊÿÃÿ¾ÿÈÿ ÿÇÿ¶ÿ<=>?Æÿ¬ÿ@ABCDEŽÿÕÿËÿ¼ÿFGHIJKLM­ÿ«ÿÌÿ¸ÿµÿ²ÿ½ÿºÿNOPQRSTU³ÿýÿøÿ÷ÿñÿåÿÛÿÐÿÀÿ»ÿ·ÿ±ÿ¯ÿªÿ¦ÿÿþ/ÊxQtf7®ï|œ{¿âÓG6›?¸Î¸â…vG­¼(ãEÑ™aä…ËåXÎìÚùÙ:¨z|¶c7®Ï†6VÞœøg=Ûí>ýËX¶ªxmçV5´±^g\q9ŽãùÅêçG_^¶csv\gdǺúYÏK?ðkÎèg=?ö¿æŒŒáôÂ]åÔ¨�žlÏz^ž2^R¬uÎè*§]? Rtz²y|<ëùñ)ã%ÅZ献rz»ëTŠNO6��g=/Ëæññ¬çǧŒ—k�3ºÊéø¶P):=Ù<>žõ¼,›Çdzž—ÍããÛ§Œ—k�3ºÊ騍�žlÏz^–ÍããÛ§Œ—k�32Þ©ôSŸP9íæŒ~}Ù'TN»9£kyÓ'TNowsF¯ËyiË«>Ñêà —9£»”±ô‰7ã¸ZuÎÈÈÈxQÆ£·Ïйððs«A7ïTЄÊéínÎèx§ÂiBå´›3zÞ©P—óD«ƒ/\n猌+.<�~L[x¸�3Ø¿¼/mðZo¦‡åÝ“¶lžN?¦¿-ÓÃòîI[Þ>�~L»Í`ÿÚu;g@�oÿZç 8O‡:gÀ}iƒ×:gÀåXhÓaÃ0RÙŽì_¿ñE«ì_^Ž…WÓaÃ0rf;fôûÒßèI[^=�~L[x¸�3Ø¿¼/mðZo¦‡åô¤=�þ˜¾Þf°íº�3ྴÁkÍpÝν_±{?Þs�‘ñÆ­ö~Å‹2½}VÌ…‡Ÿ[ â:îK¼Ö9Š_XCû×÷¥ ¾yø_ã=gÕþË3 m¬»ÿÁÃíœÁþu±¶k½©·sû×çéP3àYÚJývÖó2g@»¤~Ü0¼wÍ`ÿú�/ZÍ`ÿòr,´é°a©lÇŒþÆ­ft¸/mðZoþý/Ï4´±>,mú§Û9£Ã‡ép7gtX§ÃÛ¿¶O›9£ÃåXx56 #•í˜ÑÙ¿~ã‹V3:û—¦Ã‡Ï›9£³y_Úà›‡°Ö‡åÕôOËÃôp;gtö/‹µ½9>iË«eóôvîýŠbm)ÖÊ •�ëŒÎþ¥ž¬Ë‡§Óáø¤-¯–ÍÓ9£³©'ëçÍòáóæét8>iË«eótÎèì_~˜>oæŒÎþå}iƒo~Ÿuñ°¼šþiy˜nçŒÎþe±¶7Ç'myµ¼}z;÷~E;ë¢U•/T®3:û—z².žN‡OÇ'myµ¼}:gtö/õdý¼Y>|Ú<�Ç'myµ¼}šÑÙ¿vÝν_ñêÓ:Ž/¸Îèp_Úà›‡°VŽcÝ ÓÃíœÑ¡XÛ›wOÚ²yz;÷~E±VŽcÝ ª×NOÖ§ÓáÝ“¶lžÎîK|óðû¬ ŽcÝ ÓÃíœÑ¡XÛµÞ¼{Ò–·Ooç~E;ë‚ãXwƒêÀuF‡Ó“õóæétx÷¤-oŸft×íÜûíÓ:Ž/¸Î`ÿr÷~¼ïýŠá½K»hU+ÿóû?~ç:ƒýk×mïW´KêÇ ×®Û¹_ñ¢ŒGoŸsááçVƒ¸ÎÈÈxQÆ£·Ïй/mðÏ­ÍW¼(­ŒÏ†÷Fuwï²ã:#ã�JoË«>Ñêà —9£/íÜ'еΗÏêqhc嬋›çËi¢XëíD±Ö9ãŠãªÂYµ ϶æ:ã�/ZÍ€³.¦Ãî/e¸Ùý¥Ü<¿ý¼ûK¹9ÝÞf¸nç~Åå³zÚX9ë‚댌Ëgõ8´±¢Aõæùrš(Öz;Q¬uθBå8¨Ò*[_{ÇuÆq¬»�móëŽ_<¾ýãë�|�3Þ©tÅZ猌7¾hµ_¡A•ë h—©_ñüÛÝÂéã×ÝëÎhP�›_w�wŸÕûÏ—Ó·;®3ÀuÛû^wæ:Ãu;÷+.ŸÕãÐÆŠU®3Þø¢Õ ¸/mðZo€ø÷ïÿ�ýëßg]´ªr‚ÕEmó­ù^/V?ÜÎp9ÚtØ0ŒÜœÙ¶w¼½e;f°ýÆ­f°ùj:¼ýkû´™3Ø¿,žÇÑ—O^=�3Ø¿lçép}ùäÕçÍÓ9ƒýËûÒ¯õ¦xÚl¦¯K;O›Íôu9ëâ¦xiçÛi³™¾.ToŠ—v¾�6›éëmû×®Û¹_q9®3€ûÒ¯5Ãu;÷~Å}iƒn5ˆëŒŒŒ«ÿö›¿Oÿüýÿþùç¿<þ‡ßÿv�‘ñÆ­ö~Å¿~ÿý¿yQÆ‹¢3×ð÷µüy,sÜ—6x­sÜ—6x­sü£Ÿ×±ÜüÛúÌ·sÜ—6x­7¶ó³uPõølÇn\Ÿ m¬Ü·á=ÇñübõsŽ£//Û±¹»‡Û9îK¼Ö›‡7'þYÏv»Oÿ2–­*^Û¹U m¬·sü£Ÿ×±Üü?¯ëx;g@ñ kÈ`ÿúÂÃÏ­Ýh9-u9ßÎì_·KêÇ Ã{× ö/ßø¢ÕŒ~9ÚtØ0ŒT¶cF‡Ë±ðj:lF*Û1£³ýæI[^=�zÒ–WOç~ÅÎóÜ�å*E'®3ú…žív¯nÞ,§å8úr©‹KËíœÑÛ%up)caxïÊ}iƒn5(ƒýK×m<«C[©ßÞf¸n3þë—ý¾ùòåõ—/ÿúýÿaüŸïòeÿ_n¿¼þO_öÿñÿ“4�Ëì` ÃBß­%»[…Ó\yxøül™Æ»Ëæò‹zX6çìŸý¸D/ÙÝ^ö?@¶ÿµÿñÿÌÿABCDEFGHÈÿÃÿŽÿýÿåÿäÿÛÿÊÿÆÿÀÿ½ÿIJKLMºÿ·ÿ³ÿ²ÿ±ÿ¯ÿ«ÿªÿ”ÿÿþO4]U.¬Óöæútãß>óã;ÏÃÏxRÖGe㉦«Ê…>ñ$uœtam—›­—šÓÍÊ:m7½M•‡'~–›uýö뤽Trk—VKoS}?šêÚÇ¥¼Ó¸Ã�9<.åÝ£q‡s8ÜOOr�ÆŠTN/ï¾xq)ïôŠéˆ²lsx�Öq‡"•ÓË»/^\Ê»G¯˜Ž(Ë6‡GÑéÓ:îP¤rzy÷Å‹Ky§ÃÝ/.åÝ£WLG”e›Ãá7Eã4ŠNë�¦<Ž…¢Ó:‡G9< E§Oëõp9´ÃÓ±ÐjÏkj�cÓÚá‘Ò¤±ðpš¶,u‡ÃO4=ÊýFÉ5ûû½ôrÿMe¡èôi�ÃcoŠ8-�Ö9<ð¦ˆz¸,´Úóšz0‡Ãϸf§HÞ”í&WŽ“¨”ºS¤rZ)‡ÏÃá7E£žŽ…V{^Ss8ü0¯­†áV­çVç0(ŸdéaÎ�oÕzÞ¿÷ïÓ-—ROäŸnJoS]ÿɽs˜óceÙ·z¿>˜Ãœ·#ǦµÓ?d娴öåαlk’Ûš|Ýôö‘æ0çÇ—åN ÃMím£þñRÞiC;R?ߥÈæüøa^[ s~}œD[îÜ¥OTö)<æµÕð€[µž[½ïßþtSz›ê½C[~0‡'ñt¹s—>QÙ§ðàüøa^[ ίoÕzÞºü~¸·Ü{0‡ç×ʲß//Ûáé«áÁùqÖ}¸UëyÿÞáërïÁ ,ûVïŸ^¶WÆ3mYÄÖjò<<²îs˜óë[µž[�Ü_'Ñ–;wé•} �‡ym5<à8‰§Ë�»ô‰ ûœߪõ¼_^¶ÃÓWË–ï‡{Ü{0‡ܪõÜêý{˽Ãée{µüaùþ <²îs˜óë[µž[ s~œuãíHý|—çá¬û<žñDÓ£Üo”\³¿ßK/<‡Ÿhz”û�’[µžï÷ÒË?ã‰ZíL7�þ!)u½M­<‡ß�6ZíyMÍáðü¶†ã$Úrç.}âÂ>…9?¾UëyÿєǗíÕò�åïæ0ܪõÜj8ë>�gܪõ|¿—^x‡Ãágû…¯ËÏ/ÿûöí¯/þã—=‡æµÕ1žñŸ_~ù/žhºª\x†cÓÚ—;]79‡á릷�4‡áV­çVç0ܪõÜêý{oÛåfë¥æt³²NÛMoSå቟åf]¿ý:i/•ÜÚ¥ÕÒÛTï=˜Ã |’¥‡9?¾f¿—^î—ÃéP—s˜óãv¤~¾Kÿ�5Ìùõü¶ÇI´åÎ]úDeŸÂŽ“xºÜ¹KŸ¨ìSxp~üðe;<}µÜ)/Ûáé«y|Ú<�Ç'myµ¼}šÑÙ¿vÝν_ñêÓ:Ž/¸Îèp_Úà›‡°VŽcÝ ÓÃíœÑ¡XÛ›wOÚ²yz;÷~E±VŽcÝ ª×vÿØHSOLVGJ2.PASRßÿ �ÿšÿõÿòÿžÿ‘ÿöÿ‹ÿ–ÿ�ÿÄÿ !"Œÿ†ÿÅÿ“ÿ’ÿÓÿ›ÿŠÿ™ÿ˜ÿoÿˆÿ×ÿ#$%&'()*+,-ÖÿœÿØÿ�ÿ�ÿ„ÿ‚ÿÎÿÂÿ‰ÿûÿ./012345678ÑÿÍÿ•ÿÿÿùÿ‡ÿ¤ÿ¢ÿ—ÿŽÿ¬ÿ ÿ9:;<=>?@ABÒÿÁÿ¼ÿ¶ÿ¾ÿ½ÿºÿ¸ÿµÿ”ÿCDEFGHIJKLýÿúÿÛÿÌÿËÿÈÿÇÿÃÿÀÿ·ÿ³ÿ±ÿ­ÿªÿüÿMNOPQñÿåÿÊÿÆÿ»ÿ²ÿ¯ÿ®ÿ¨ÿÿþ;J#Yƒ"Õçñæ:{¿Ç›·8�8¨ì±³bm5v”F²!aÇ4$jPĦ¯ƒ9N}�"Õ}ˆÉa[â³õEñæK¢Î¸ŽMtbr•=£±[F“ˆÁϽ…˜\�ðd½ûêÒì TTÖÉÁ7vOþ„Ÿ²Šoì~íOø)«¨„rÇÞ¨ô'‘•Ç««Æîéi±ÕYÅ•…?Áˆ¬|8^]5v¿~D@luVñFåuáO0"+ŽWW�ÝS{¼ºjì~ýˆ4€Øê¬â�Êk‚Qy]d¿Ç�ÅsoÄ8¨¨œ�|é+•YůmYú Fe‘U¼µ[_Á¨¼.²ŠwmÓÆöÆWˆ.ðÈ”Uü©­Šg¢D¾Â6¥šÍe•¥5w=1F¯�[ÎF° Fåu‘U¼p6BYÁ¨Ì*Þ8ÁµM…è�L«¬¢²ÇÈá‰q¶ºçC"8˜ë`DV°¶ÄAEåläc{ã+DxdÊ**[£SfŠ�k—Uâ[PÁt™)^6¿¦�¹½ûêÒìŠ_°YeLbëj·4«¬‚é ‘Š€ðÄC¤"T§Áê‚ÁuÁxWÓËš² лk4?7v¿Î*@м="<±SÁtÙò� ¦;â[Pñ3ÅÀËæ×4£1W‚Ÿ{ 1¹âlVYÅ[W»Å­T0Ýõ.Äîí©É*~H„X�Ž ]Rñ[£SñÀL1pí–ͧçÞBLnÓÆêûUVñÀ�7Õéˆ�РK*ÓeËct*ÓÝL1ðrS}ßnªÍ*«xLwÄÖ-öۛǕŠÇta×eÌ/›ö]µYe[W»¥|ˆ�+¿Çºf#ÔÑ1*ž]—ýñM�ÒLw3ÅÀµË*˜î†DˆÕéˆ�àÐ%¿å1: ‰pS�Ž º¤â1]fŠ�{ˆíÍcõcõC»Áf•U<0S \»eSmÚò!>V?V?¬T<».«`º›)®� ¦ »Îû=â÷öˆƒ ».û=v”ÖÜõÄ9¼v •¥5w=1fŠ�_; –UTöØQt©O sÅÌTà ¢r6òÑWˆ.ðÈ”UT¶Vÿ¬þ±Ê*ÀL1píTØuÙï1S üÚY0TTö|˜œÕØQZs×£xî�X‹÷%*•Y8yo¨`T^Y8y?¢‚QYdï(Í­[§¢ <2­òAEeÿÝ{¼«^þûç‡?>]ýöþãAEeÏ÷�ÉY�¥5w=1Fë‹âFËÙÈû-*•×EVñ¾D£²È*ÀÙÈcúv�x@£²È*Ó·n�jTˆ.ðÈ”U€³‘Çta¢D¨°M©fs«|PQÙ÷ïªÏþ|yùrõÛû�•-�Ñy¿Ç¿?¼ÿ;J#Yƒƒ 0D*Bu ÔsVÞÕô²¦¬Ì×.«3ÅÀµ[6¹b@H(bÓ×Á§¾?÷brÅf•U€™bàÚ-›�%>[_o¾$êÌmVY Þ±L—‘ÃkgÁkËÖµÍ*«`ºÄÍÛ#Â;Lw[£SñÅsoÄ‹µe»m˲um³Ê*~´¾(n–m[–í:ñÐ6-%Ze¸ÀD‰žØa¦øµ³`*˜îØu*@ïB¬Ñü|­Â®»Rùûíím{ûõ›ÛÛß?ýï_\ÿùð‚Ûéooné¯Ûé›ÿ?~ç:ƒýk×mïW´KêÇ ×®Û¹vÿˆ*SOLVGV.PAS[ßÿšÿõÿ òÿ�ÿ ‘ÿ–ÿ�ÿ‹ÿöÿžÿ“ÿ›ÿÄÿŒÿÅÿÓÿœÿoÿ˜ÿ™ÿ�ÿ !"#$%&'()*Šÿ‰ÿˆÿÂÿÎÿ’ÿ„ÿ‚ÿ�ÿ¤ÿ+,-./0123456¢ÿ×ÿÖÿ•ÿûÿ—ÿùÿ‡ÿØÿ†ÿÁÿÍÿÒÿÏÿÌÿÆÿ”ÿÑÿ789:;<Ãÿÿÿ­ÿÈÿ=>?@ABCD¼ÿ¬ÿ ÿ¾ÿ½ÿEFGHIJKLMNOúÿ÷ÿÕÿÔÿÊÿÇÿ»ÿºÿ¸ÿ¶ÿµÿPQRSTUVWXYZ²ÿ±ÿ°ÿ«ÿñÿÐÿËÿÀÿ·ÿŽÿýÿøÿåÿÉÿ³ÿ¯ÿªÿ©ÿ¨ÿ§ÿ¦ÿÿþOÙN9ݳµùút½ŽñÀ—O|ÿï<†xš¶Ã4ó”í”Ó=½ñ¤<·¼g«÷WsŸŠÚÕÆÖæ«^[áò‘Ótµm_^·\¦‚æz_ËÔk+<†¸©ý-÷Ws¯O³8´²õ©t®uè-7ÃáC+[÷Óû·ü¾†Çýôþ0nù} ‡ûÇ'�)?~ÞÆ-SæôñùîçÏûé}îï~þ¼ŸÞ^ÐΤ¦y ‡¯§ËÕýýDZãðvÊ5<¦ýDZcÊ�Ÿ·5<ʾ\ë0vÔÒuR®áq®¹õ}x(³åØqimÖTÖðXÔ•÷cGjš×p8ü”í å*ÅIýOËÔ§—×S2í˜òãçm �\OÉÇS~ü¼­á1€ë))ûr­ÃŽZºNÊWkø�“:×Ó|¥�sKʾ\ëÀT¦ÌéãÆ´ÿÈc8|=å¨û×cG-]'å_tª% õLi�sÍ­Óߪð‡9ÿxH4oâ\së»Ûó4oZÃp“µk.kROšz˜ã››¬]/?ü§vÃýT>¢ÿ|5õÚÊöùðj s|“š–¹¼,¯ÂpUz�)¿ÜOïs C=S>ÝÑߪ„9¾¹èTK˜ã»›¬]/?ü§vÃýT>rheëSé\ëÐ[nÿ‘¯Ö0Çw©i™ËËr­Ã«5Ìñݹ%uw{Go–�j 8·äõîöŽÞ(,-<8¾¹èTKxp|w“µëåëÝ·ý‡^­áÁñ]jZ^NÏuÿúÅ«5<8¾«g^¾æ¾-”¿-×:¼ºýJ«ÂMÖ®¹„Ç7*Ëæø×õL¹ÖáÓWú[•ð€‹Nµ„Ç7ç–¼ÞÝÞÑåZ–ß]tª%<ÆMÖ®—8þõv^­á1RÓòòãsÝ¿~ñ*<8¾SYÖðàø&5-s PYÂÿJeYÇx ~™[{â1†›¬]sYÃp“µëåŽïþÕÔ³¾ÿðj C=S®uøô•þV…›¬]/?pôZÙúTúöáÕ†›¬]sYÃpnIÝÝÞÑ…¥…9¾¹èTK˜ã»sK^ïnïè�ÂÒÂã&k×Ëé¹î_¿Øý¾ûû|xµ†9¾;·äõîöŽÞ(×:°´ð¸ÉÚõòÃîÃþãsÝ¿~±û}÷^­aŽïn²vÍ% *Ë:Æx ~™[{â1 7Y»æ•eŒê™òéŽÇ0*Ë:xÊvÐr•â¤þ§eê�áðS¶ƒ–«7Y»þ´L}ZÃã�§¬¥Ó®:SÙn”�áðõ”£î_�µt�”k8|Ñ©–0Ô3åZ‡O_éoUÂß\tª%ÌñÝMÖ®¹¼üðÇ6_õÚ ^­aŽïÎ-©»Û;z£°´ð¸èTKxÀ¹%¯w·wôF¹Ö�¥…Ç77Y»^~|®û×/vßw÷j ¸ÉÚ5—ðPY ²Œê™Ç0š7…á¢S-aŽon²vÍååŽïþ¹\+7}xµ†9¾9·¤înïè�ÂÒÂß]tª%<Î-y½»½£7 K ¸ÉÚõrz®û×/vßw÷j �›¬]s s|§²¬aŽon²vÍe s|s“µëå‡PWÞ×2•NÝø°_Ô•÷»»¯»¿{•eãÍ›x s“µk.a•eÜdíúÓ2õ‰Çp8ü”í å*ÅiºÚ^_‡ÇËë)Çeì˜òãçmlÿùjJq?õ¬ïigMçs=T•¾ñ\O9nÆŽ)?~ÞÖñÀ¡•­O¥s­CoÉýÔ³¾ç1<¸žr,êÊû±#5Íëô·bQWÞ×2•ÎcxŒrhóØQK×I¹ŽZ.JÚ™û©g}ÏcxŒr=vÔÒuR®ã�ruQÒÎZÙúTúÆcx\O9”Ùr츴6k*¯Öñ@Ï+QÏÜO=ë{êÆVËéjž’Çpø�š®¶�i¹L…û©g}O-×Ê­¶ÂT¶6_õÚ �áøË˲/¯84�ÏõPUúÆýÔ³¾ç¢C»×F-×ÊM<†àÿ¼,ûûWZÙúT:×:ô–/·W\th÷bkóU¯­p­CoÉcøuå=u£¿‹ºò¾–©tà̖·wÔ3[-§«yJÃðÏÿúþñÿ¾,ûo¯x ?À¿þßÔ�þV”«û‹’væZ‡Þrã1ž§‹f¾_Ãáë)ã–EïÇŽ)súø|÷óçýôþ°¿ûùóÛ Ú™ZºNÊ5<êþõþÇ~Þ‡GÍv³¯‡6ïãìç»±£–®“r �§zÝúþm›—}xlW÷ûé²�¾¿ÔÓØ‘šæ5~ÊvÐr•b»™ž^^OÉ´¿ìHMó«5|=åxÛæeìHMó_tª%<Þ¶yÙÝNkxL»ÛË—ÝíÛ6/a•eÕC›éoUÂß\tª%ÌñÝ¢®¼ßÝ~YÔ•÷k˜ã»sKæÝí½QXZxl7ÓÓËËsÍv³Ÿ_ì/ÏõÐæýüâÕæø®ž)ן¾Òߪ„ǹ%óîöŽÞ(×,-<`»™ž^Þ<×l7ûùÅþæ¹Ú¼Ÿ_¼ *Ëx ž©Ùn~ùTmæ1¬²¬ã�Ótµ½þÆc8|Ñ©–1xÊvÐr•â4]m¯?óL‡~5Íl}ÊN;sš®¶í5�aPfËÝíyš7­a(»Ûrhó†sKêîöŽÞ(,-ÌñM-‹Þ?×ý·»Û¯kuåýîöîç×5 ç–ÔÝí½QXZ˜ã›‹Nµ„9¾y`Ó”‡·œ[ÒߊyÊ“¶ŽfÝ«tÃß\êiwûõç×5Ìñ͹%¯w·wôFaiaŽï.:ÕõL-‹Þ?¿Þ{ñ˧;ú[•ð€‹Nµ„Ç7ç–üØÝÞÑ…¥…Ç¿ºèTKxpü«z¦–EïŸ쿽øtG«ß]tª%<ÆMÖ®¹¼<¼Í—¿¿ÚøÇß~û7¿í¸ŸzÖ÷Ô�­–ÓÕ<å‡Wkx e¶ÜÝö¼ÒãÔzãûß�ñÀtiÙy ŽïT–5<ê™Z½þ±ÿöâ—;ú[•ð€zfºl//ϯ÷?^¼út©'ú[•ðàøæ¢S-áÁñ]Ív³»}½†ÇwõÐæÝí�5<8¾»ÔÓîvºl/ÿòüzÿãÅ«0ƒã•%<•eŒ~|™[{â1Ìñ¯U–1¨gÃߨ,ëxàõ—¹µ'ÃPË¢÷ÏõÐæý·»ÛZ½®‡6�øÛ»5 µ,zÿ\÷w/v·5Û͆Z½®ûÏ/v·õÐæ5ÌñÍiºÚ^[Çxà|•ý­’íê²ÔëºÕVhgNÓÕ¶½æ1<Æx`©×uOõºu²ÝpùÈS½n�C›¯î �axª×­ïn/ÏõÐæ}=´ùņE]y¿»]Ô•÷óT¯[_Ãpy®‡6ïë¡Í/v·w?¿®a8·dÞÝÞÑ…¥…9¾¹<×C›÷ó‹Ýíå¹Ú¼Ÿ_üû§zÝú†z¦\úJ«æøæÜ’yw{Go”k–æøîæ¹Ú¼Ÿ_ìnožë¡ÍûùÅ¿ª×­¯ax µ\Diå©^·N¶›�Ç0œ[2ßínïè�ÂÒÂß\tª%Ìñ]=3ßýò©ÚL«�j è»ÛËó|·¯‡6¿XÃ.ÏóݾÚübwûu 8·dÞÝÞÑ…¥…Ç7—çùn?¿ØÝ^žç»ýüâËå¹Ú¼Ÿ_üM_Ãê™rýé+ý­Jxp|snɼ»½£7Ê5K Žïnžç»ýübw{ó<ßíç_nžë¡ÍûùÅßô0Çw*Ëx ž™ï~ùTmæ1 ¨,cÝÑߪ„9¾¹èTK˜ã»›¬]syyx›/µÿð�¿ýöo~Ûq?õ¬ï©[-§«yʯÖ0ÇwÊl¹»íy¥5ÌñÝ©õÆ÷ïã�éÒ²óæøFeYÃß¿ïÂ*Ë:ÆOÙZ®Rœ¦«m{Íc8¾èTËxà~ª…§l§œîy ùæÖw·=¯´†ásþñ�kn²vÍe ÿÕûþ‡6·|ù—ùJ¯Ö0ÜdíšËˬ÷WsŸŠÚÕÆÖæ«^[áò‘š®¶íË¿´\¦òáÕ†›¬]syùá_]ͽ>ÍâÐÊÖ§Ò¹Ö¡·Üö´ä~êYßS˵rÓ‡Wkþ­Þ÷?´¹åËÿ§yn7¯Ö0¤ž4õ0Ç7'õ?-SŸ^Nû�û²/×:¼ZÃßÔ3åÓý­J˜ã»‹Nµ„ÇiºÚ^_¿œö÷‹ºò~_öåZ‡½2[¾Zãž)­£Ì–ô·*ÜdíúÓ2õi �Ô´¼\®îï?¾ •% W¥×™òËç°Êò3üß>ó?þù/üzüw/ýõͯ¿þ«?ÿÛßî€ÿùç?òëñß½úõÍýõø_þyþñ—gÓÈ4þîÓý_þöé§¿ùôÓ·Ÿ=¹»óÁÃÝýS>ÝÿòïŸþñ7Ÿ~úí�îî—7pwÿ”O÷¿üݧüÓ§ŸÞ½X6—�à°løtÿËvÿëSOLVIT.PASeßÿ õÿ òÿ–ÿ�ÿšÿ�ÿ‘ÿžÿoÿÕÿ !"#‹ÿ“ÿÅÿÄÿŒÿÓÿ°ÿ×ÿÖÿºÿœÿ­ÿÎÿÂÿ$%&'()*+,-./±ÿ¤ÿ¢ÿ»ÿŠÿ’ÿ›ÿ˜ÿ«ÿ�ÿ¹ÿ¶ÿˆÿ¾ÿ�ÿ‡ÿûÿ•ÿ012345¸ÿ‰ÿùÿ6789:;<=>†ÿ™ÿ?@ABCDEFGHIJKLMNÑÿ½ÿ÷ÿÏÿ©ÿ¯ÿ”ÿÍÿÌÿ·ÿOPQRSTUVWXYZ[\]^_`abcd—ÿÆÿÁÿÿÿÒÿÃÿ¬ÿ¼ÿªÿñÿØÿÇÿ³ÿ¦ÿóÿ ÿéÿÔÿ²ÿïÿÐÿÈÿµÿúÿøÿðÿíÿëÿçÿÊÿìÿýÿôÿåÿàÿÞÿÜÿËÿ¨ÿ§ÿŽÿhÿÿÿþŸŽÍËxý•Ë_uÖºMvÛd]©„6q²Gøþ×|"uJhï�Ûòi¨†�ó©q{¶ï�á[ƒ¶>ÓUVüŽÞïµ·ÖT¤N mâšÏø?ÓynMÍ·Þí�Ô)¡Mxîx´µ¦²|EçGk2¶!3úNê”Ð&*—o2í<ºbbbbb"uJh;·9æ–›±ƒ®´ó¼ZSiçI�%mâÓP !çfÜÞ„-™ãfÍ{g¶Tz»É³à­ÛTT.ßdÚyR§¤Mßñ6Uõ�_9³ ›ë­ö!ÓΓ:%J¾Ý,¾uPÛp7ÌL—J`î3ÓÇ¥%‡~Ú+�`Þ3×q¼þp9}ðÁ6Ü͊愱!/•@0ï*˜¹Žãõ‡Ë郶á>¬hNòR óîóŠ™ë8^¸œ>ø`î¦fúàƒm¸+šƆ¼T¢ä“ë¨Þ¥ ˜wU©gßSÌ»ªT¡æHüMA0ï>¯J%àk¶5ºæI�ö™Ý[S*kŒ3Ä·‚£s¹ ¾T¢äÓ±ùv¿þÎØ³›ªz*�ö“ëÈ‘øë‚`Þ}^•´‰ê?›`,Û�}ǽgpöý{=h볊Ô)!>Þ?*æ]UB›œ¯²à3^í�9Cꔟ\GgßSÌ»ª„6Q¹|“içyµCæ ©SB|øÁåÄ_hŸÙ½5%´ gvÖàÞ³ ™ÑwR§„øøä:b�q¦àè\nƒïJÚDf6ýžmÈŒ¾Si¿ßäÁ�:%JÚ/aSUüÊ™]ðlCfôí_­©´ó¿£rù&ÓΓ:%m‚ë.Ü2»ã½q[~6|Û™­>ƒÔ)iœì¾_óý‰Ô)iða»¨ƒ³ïßëA[Ÿ± ™Ñ÷š£ÜÖVhÿjMeI�’6?làŒÞkrç«,øŒW;dÎ�:%mþÕ.êŸu ÎWYð¯vÈœi«Ž£ÜÖR¹|“içyµCæ ©SÒ&`ÝúñgèŠì+–�ͬÙj|Fê”´ èDZ™™Ðï©´ßoò`H�’6çźÿw»¨¿èH�’6‹OÐ~³=Zƒ{Ïà|•Ÿñj‡Ì™ŠÔ)Qòƒë‡ýP|õ«õW¿_*QòÉuTâ£à:Ž×.§>؆ûP3}ðÁ6܇Í cC^*íwö^pÇë—ÓlÃ}¨™>øà‹Í í3»·¦TºæYóYM^ã_k´q—=¸¼Æ×äP }f÷Ö”J`g3k¶57ý겚¯¸|WSm¶5YM8Öõ¾ÀØ�—J”|:6ßî×ß{ªK¸µŸ\GBͱÀØ�w¥%Ÿ\G%ð—ï Œ y©DɇýËym¢º„©S_qùŽb&”J PÌK%p¤˜ùŠËwJúÅÚÄ͸Áî6ÆR]Â�Ô•J”(ù°9/ˆ¿n/aSUßø•3»àÙí¹·7aKê”´‰Û&c6Õós¾b�%uJÚħcóí~ý�±g6ÕóóR‰’\?ìÀW¿_*QòÉuTºæYóYM^“OÚgvoM©DɇýËyAê MÜŒìnc,û°©žŸ“:%Ð&Â�mBN•“áÞ³›ªz’:%`�q†bæ}È+[*ÿJ13Ñ&*í÷¹ep¾Ê‚ÏxµCæ ©+•€§˜ñƒËK%pjF4ÅÌÄ¡Á³n”ö/ç…âÛe©k¦ÅÌ»¥^Ñ&w{Çà|•Ÿñj‡ÌRW*!¾i¿³÷¥®ùbE1ó±â£_¬K%°³™5[Š™éƒ�K%pjF4ÅÌÄ¡Á³n”ö/ç…â[›¨l0ÃWxï y0{[eØÜn­ÏH�âÛQï)f>þàãR ñíÔŒ<)f& žu£„øÑ‡ýËy¡„(çÚïì}ù¬ùbÅ7¿ÆÄáË~¡„ø£û—óB ñ»§fä3Š™‰CƒgÝ(!þüÃþå¼PBüÝù„ö;{_~VóÅŠ¯1qø²_(!þþÃþå¼PBüÉÅèÌæ¾ýý86cÁ6dFß©´ßoò`¾×•Jˆ?±Æ8C1“™�-•òÒ¾ú}âGm"�ÉH�âïûźTBüÝù„ö;{_~VóÅŠo2qø²_(!þþ|"«ö¸|Ö|¶êøG½çðe¿PBüɇýËy¡„ømÜ…bæY*!þA.§˜ù¬TBüÃQï)f±j�ËgÍg«N ñ'ýb­„øó~±¦M|FîÜ�Ô)!þ¨_¬•?êkÚēܹ©+•ß´ßÙûR.¯ùbE1£ýÎÞ—zpyÍ+~ÊT*!¾i¿³÷¥®™V3Ú¸K©„ø¦ýÎÞ—ºæóÅŒ\^*QÒ&âc6Õó RG›x¿1ÙW¬¡ÚwúUWÚyÜ{öaSUORW*i“’OÇæÛýú;cÏ>lªç¥%Ÿ\G%�hŸÙ½5¥%ö/ç©£MÜŒìnc,û°©ž_�:%J MhŸY3|%ø½Å¸KEæ¸m2núÕe8ÏN‡½ó!'uJà|Bwá›_C.çðe¿PB||Ø¿œJˆo;›Y³¥˜ù;›Y³-•ßNÍHN13qhð¬%Ä�ªK¸µÇ¥6îR“¯jŽK=¸¼&_u¥âÛù„åk|ÌáË~¡„øÑ©É)f& þ•u£„(Õ%ÜÚËRw©ÉW5—¥\^“¯:%ÄG¿XÓ&ô{´q¾ù5ôàrR§¤Mô‹5©£Mìæz~AêJ%Jˆomb§_õÎrÓ¯.ø ÇwÜô«Ë\¾ÙzR§„øvÓ¯.£˜9.õàò=¸|U*!¾ílfÍ–bfg3k¶$núÕe¥âÛq©—×èÁå+Š™éƒ�K%Ä·S3’SÌL<ëF ñ£ãR.¯ÉW3Ç¥\^“¯ø7ýê²R ñí|¿ò5>æðe¿PBüèÔŒä3‡ÿʺQB”ËR.¯ÉW3—¥\^“¯ø7ýê²R ñ­M`ìn3X¼ó7ýê2Œ»T¤N ñíÔŒäÅÌÄ¡Á³n”?ú°9/”å|"Ÿøæ×ЃË9|Ù/”ôaÿr^(!~7£˜9.ó©F._•Jˆß=.ó©F._QÌ|üÁÇ¥âwOÍHN13qhð¬%ÄŸ—ùT“¯(fŽË|ªÉW|ƒãR.¯ÉW$²R ñ»çþ•¯ñ1‡/û…âÏOÍHN13qhð¯¬%Äß]–ùT“¯(f.Ë|ªÉW|ƒËR.¯ÉW$²R ñGýb ´‰ó‰|â›_C.'uJˆõ‹µâ£_¬išÜ¹©+•ÀW¿_(iýbMêhû°©žŸ“ºR‰’6Á>lªçç¤ÚÄ{mªŒ¯„ü=î=û°©ª'©+•Àù„5Æ_ö ^šCÃW¿Z*�6¡}fÍð•à÷–Áå›­¯H�85#šbfâÐàY7Jˆ�û—óB ñ-§˜ñ|ÍO™J%Ä·ó íwö¾Ìk¦ßüÚïì}™×|¾âðe¿PBüèÃþå¼PBmÜ…bFû�½/óšiU*!Š\N1£ýÎÞ—yÍç«R QNÍÈg3‡ϺQBüQu ·ö¸ü¬FwYÕ—ŸÕèÁå«N ñ£~±¦Mè÷h¿³wR§„øèkhšÜ¹©+•À©ùŒbfâÐàY7Jˆ�ó íwö¾ü¬æ‹ßü‡/û…âÛ‡ýËy¡„øÑÅèÌæ¾ýý86cÁ6dFß©´ßoò`¾×•JˆYcœ¡˜ÉÌÆ–Jˆ½4‡†¯~háèLFê”ßúźT§fDSÌL<ëF ñ18û~©W3—¥®™V¥øêW %ýbM›¸7ØÝÆXöaSUORW*Q¢äÓ±ùv¿þÎØ³·Ù�w! í'ב@A0ï>¯J%Ä?}ryGA0ïªR ñOŸ\G|Í–í3»·¦+•(i•Í67ü7Žï¾áùŠÎ�ÖdlCfô�Ô)QòÉuTºæI�ö™Ý[S*Qòaÿr^(�S3¢)f& žu£„øø°9/”ßÂÒ×zE13}ðñ/ZÏOÑ|ƒ©+•ßÂR×~E1–¾Ö+%ÄG¿X—J ,}íW3Óÿ¢ýþàãR ñíÔŒ<)f& žu£„øÑ»¥^Q̼[ê?%,uý\)!>úźT£3›ûR œOx¾É/9|Ù/”ö/ç…âÛ©ÑÅÌÄ¡ÁúQBüèÃþå¼PB”S3ò,f& [Ö�â�.Fg¶%,uý\Qü²øcÍ÷à{]©„(£3›û–ïQð½šwK½¢øeñÇN ñ£~±.•ß.Fg6÷Jˆ�~±†6¡ßã¿ùKR§¤_¬i7ã»ÛËÞf?Þ…,�ºR‰’OÇæÛýú;cÏÅèÌþx²P*QÒ&nFû ·ÉȾb ¾ºXS‘:%J>¹ŽJ@S }f÷Ö”J”|Ø¿œJàÔŒhŠ™‰CÖu£„ø¸�Ù–ÁÙ÷K½¢˜¾(¾Ú•Jàbtfs_*ékÚÄÅèÌþx²@êJ%JÚħcóí~ý�±g6UõT´Ÿ\Gñ7Á¼û¼*QB|¼#þ¥ ˜wU‰âã“ëÈàì{⣠˜wU‰âÃ.'~T }f÷Ö”(!>>¹ŽXcœ ŽÎå6ø®Tbï™5¾$uJÚĉ—ëw¾õ­_}ðéõ[¤N‰’û—óÚÄ6hÏ͸½ [R§Ârª§ÅÌôÁÇ¥ð3Ÿ—J`K1ãK%0öŸö׃âco³ïBhCÍ»_³íJ%ÄÇ©Ñ3‡ϺQB|;5#OŠ™‰CƒgÝ(!~t\êú¹¢˜ K]?W´‰Êf›g>#Þ‘ºR ñ±›ªzÒkÞÕ Î¾¯ñ5ÖgºR ñq>á]†5Æ_ö .FgöÇ»�…R ñá)füO§R ñ±¥˜ñJà;‹Ãùx¾Æ6Ü�’~±þ@É_¿¿û·¯/~ûõ¯ÿ ¿~ëðOøôú-¾¿û÷¯ÿ÷·_ÿúúë·„O¯ßâëñ»ÿøúÿ~ûõøçÿ‹ÿ“ÿÅÿÄÿŒÿÓÿ°ÿ×ÿÖÿº procedure { bubble- } sort(var a: ary; n: integer); {--> 173} var i,j : integer; hold : real; begin { procedure sort } for i:=1 to n-1 do for j:=i+1 to n do begin if a[i]>a[j] then begin hold:=a[i]; a[i]:=a[j]; a[j]:=hold end end { for } end; { procedure sort } IB (MATR1 PAS ) { --> 176} procedure {bubble} sort(var a: ary; n: integer); { adapted from 'Introduction to PASCAL', R.Zaks, Sybex, 1980 } var no_change : boolean; j : integer; procedure swap(p,q: real); var hold : real; begin hold:=p; p:=q; q:=hold end; { swap } begin { procedure sort } repeat no_change:=true; for j:=1 to n-1 do begin if a[j]>a[j+1] then begin swap(a[j],a[j+1]); no_change:=false end end { for } until no_change end; { procedure sort }  { --> 183} procedure sort(var x: ary; n: integer); { a NONRECURSIVE quicksort routine } { Adapted from 'Software-Tools', B.Kernighan, Addison Wesley, 1976 } var left,right : array[1..20] of integer; i,j,sp,mid : integer; pivot : real; procedure swap(var p,q: real); var hold : real; begin hold:=p; p:=q; q:=hold end; { swap } begin left[1]:=1; right[1]:=n; sp:=1; while sp>0 do begin if left[sp]>=right[sp] then sp:=sp-1 else begin i:=left[sp]; j:=right[sp]; pivot:=x[j]; mid:=(i+j)div 2; if (j-i)>5 then if ((x[mid]x[i])) or ((x[mid]>pivot)and(x[mid]pivot)) or ((x[i]>x[mid])and(x[i]=right[sp]-i then begin { put shorter part first } left[sp+1]:=left[sp]; right[sp+1]:=i-1; left[sp]:=i+1 end else begin left[sp+1]:=i+1; right[sp+1]:=right[sp]; right[sp]:=i-1 end; sp:=sp+1 { push stack } end { if } end { while } end; { QUICK SORT }  { --> 180} procedure {quick} sort(var x: ary; n: integer); { a RECURSIVE sorting routine } { Adapted from 'The design of Well-Structured and Correct Programs', S. Alagic, Springer-Verlag, 1978 } procedure qsort(var x: ary; m,n: integer); var i,j : integer; procedure partit(var a: ary; var i,j: integer; left,right: integer); var pivot : real; procedure swap(var p,q: real); var hold : real; begin hold:=p; p:=q; q:=hold end; { swap } begin pivot:=a[(left+right)div 2]; i:=left; j:=right; while i<=j do begin while a[i] 178} procedure {shell} sort(var a: ary; n: integer); { Shell-Metzner sort } { Adapted from 'Programming in pascal', P. Grogono, Addison-Wesley, 1980 } var done : boolean; jump,i,j: integer; procedure swap(var p,q: real); var hold : real; begin hold:=p; p:=q; q:=hold end; { swap } begin jump:=n; while jump>1 do begin jump:=jump div 2; repeat done:=true; for j:=1 to n do begin i:=j+jump; if a[j]>a[i] then begin swap(a[j],a[i]); done:=false end { if } end { for } until done end { while } end; { SORT }  procedure square(x: ary2; y: ary; var a: ary2s; var g: arys; nrow,ncol: integer); { matrix multiplication routine } { a= transpose x times x } { g= y times x } var i,k,l : integer; begin { square } for k:=1 to ncol do begin for l:=1 to k do begin a[k,l]:=0.0; for i:=1 to nrow do begin a[k,l]:=a[k,l]+x[i,l]*x[i,k]; if k<>l then a[l,k]:=a[k,l] end end; { l-loop } g[k]:=0.0; for i:=1 to nrow do g[k]:=g[k]+y[i]*x[i,k] end { k-loop } end; { square } program trap1; { -> 264 } { integration by the trapezoidal rule } var done : boolean; sum,upper,lower : real; pieces : integer; function fx(x: real): real; { find f(x)=1/x } { watch out for x=0 ! } begin fx:=1.0/x end; procedure trapez(lower,upper : real; pieces : integer; var sum : real); { numerical integration by the trapezoid method } { function is FX, limits are LOWER and UPPER } { with number of regions equal to PIECES } { fixed partition is DELTA_X, answer is SUM } var i : integer; x,delta_x,esum,psum : real; begin delta_x:=(upper-lower)/pieces; esum:=fx(lower)+fx(upper); psum:=0.0; for i:=1 to pieces do begin x:=lower+i*delta_x; psum:=psum+fx(x) end; sum:=(esum+2.0*psum)*delta_x*0.5 end; { TRAPEZ } begin { main program } done:=false; lower:=1.0; upper:=9.0; writeln; repeat write('How many sections? '); readln(pieces); if pieces<0 then done:=true else begin trapez(lower,upper,pieces,sum); writeln('area=',sum) end until done end. program trap2; { -> 266 } { integration by the trapezoidal rule } const tol = 1.0E-6; var sum,upper,lower : real; function fx(x: real): real; { find f(x)=1/x } { watch out for x=0 ! } begin fx:=1.0/x end; procedure trapez(lower,upper,tol: real; var sum : real); { numerical integration by the trapezoid method } { function is FX, limits are LOWER and UPPER } { with number of regions equal to PIECES } { fixed partition is DELTA_X, answer is SUM } var pieces,i : integer; x,delta_x,end_sum,mid_sum,sum1 : real; begin pieces:=1; delta_x:=(upper-lower)/pieces; end_sum:=fx(lower)+fx(upper); sum:=end_sum*delta_x/2.0; writeln(' 1',sum); mid_sum:=0.0; repeat pieces:=pieces*2; sum1:=sum; delta_x:=(upper-lower)/pieces; for i:=1 to pieces div 2 do begin x:=lower+delta_x*(2.0*i-1.0); mid_sum:=mid_sum+fx(x) end; sum:=(end_sum+2.0*mid_sum)*delta_x*0.5; writeln(pieces:5,sum) until abs(sum-sum1)<=abs(tol*sum) end; { TRAPEZ } begin { main program } ClrScr; lower:=1.0; upper:=9.0; writeln; trapez(lower,upper,tol,sum); writeln; writeln(chr(7),'area=',sum) end. NLEAST4 PAS !—LEAST5 PAS #íprogram trap3; { -> 270 } { integration by the trapezoidal rule } const tol = 1.0E-6; var sum,upper,lower : real; function fx(x: real): real; { find f(x)=1/x } { watch out for x=0 ! } begin fx:=1.0/x end; function dfx(x: real): real; begin dfx:=-1.0/sqr(x) end; {$I trapez.lib} begin { main program } ClrScr; lower:=1.0; upper:=9.0; writeln; trapez(lower,upper,tol,sum); writeln; writeln(chr(7),'area=',sum) end. -r { -> 270 } procedure trapez( lower,upper,tol: real; var sum : real); { numerical integration by the trapezoid method } { function is f (as parameter), limits are LOWER and UPPER } { with number of regions equal to PIECES } { fixed partition is DELTA_X, answer is SUM } var pieces,i : integer; x,delta_x,end_sum,mid_sum, end_cor,sum1 : real; begin pieces:=1; delta_x:=(upper-lower)/pieces; end_sum:=fx(lower)+fx(upper); end_cor:=(dfx(upper)-dfx(lower))/12.0; sum:=end_sum*delta_x/2.0; writeln(' 1',sum); mid_sum:=0.0; repeat pieces:=pieces*2; sum1:=sum; delta_x:=(upper-lower)/pieces; for i:=1 to pieces div 2 do begin x:=lower+delta_x*(2.0*i-1.0); mid_sum:=mid_sum+fx(x) end; sum:=(end_sum+2.0*mid_sum)*delta_x*0.5-sqr(delta_x)*end_cor; writeln(pieces:5,sum) until abs(sum-sum1)<=abs(tol*sum) end; { TRAPEZ } EANSTD LIB +=NEWDR PAS ,kNEWDR2 PAS -rvÿÙÃTSTBES.PASBßÿšÿõÿ òÿ‘ÿ –ÿ‹ÿžÿ�ÿŒÿ’ÿöÿÅÿÄÿÂÿ“ÿoÿ×ÿÖÿ�ÿ‡ÿ !"#$%&'()*+›ÿ˜ÿÏÿŠÿÎÿ�ÿ™ÿœÿÕÿÑÿ†ÿùÿ„ÿ‚ÿûÿ,-./01234�ÿÍÿ•ÿÐÿÔÿÓÿÒÿ—ÿˆÿØÿËÿ ÿÊÿÌÿÃÿ567Áÿ‰ÿ89:;ŽÿÉÿ<=>?@AÆÿ½ÿúÿåÿºÿ¸ÿµÿ±ÿ°ÿ§ÿ”ÿÿþïúé²·‰:ê­Æ:Ï/|ù‹ß?~ð~¡jTêWq«1´ãî:ïk9%¯áêWñŸmšw×y_Ë))ƒ’÷»ë ]ðÿÝú|qJÍËíé´SË5<Ÿ?ŸúEŸºÚn ‡Ãw×y_Ë)¹lÓÔç…®¶;.tµÝ¾?å¨ó»2oü~¼ùqóë_Þÿs ‡ÿn}.Ÿ?Ì %«.Õ×ðüôù²MóBWÛ­áð­.KÎó —mšw×y_Ë)y C¹ãü×võxEýª ³»ÕeÉ0ûç§e;zÿxµ†Ù?_¶iÙÆ?z=¼xW>>t~wxzØåáéøépóåæãá÷ÕÃÓÃÓñøñpóþáéøå鸆Ù?_¶ijËvÙ¦�‡óÃáüéæx ³S^„A»¡y~áüçŠ×0û·[]– ³þ°lWk˜ýóÓ²�×0ûç®wj5<X¶ŸnÖðü´lOŸn¯Â쟯³–O]=^­aöÏ—mZ¶Ë6Míðt\çù…®ûë>Êßâ¾ív¼†Ù?ß�:eÙ®¨'>|¹áâž/Û´l—múx8º9®aöÏ—mšÚ²]¶)ÌþMy1¿pþsÅkXy±Îó —mšw×y_Ë)y ‡ï®ó¾–Sr«1>Οs¡«íŽ ]m·†_¸Ú•¼èå¾íøW�¡w×y_Ë)9ÝQ¿Š»ÒGåÿJ^ð~¡~—mšw×y_Ë))ƒ®\—® ^ÃáûSŽ:×ÓnÞ¸y¼ú�/?Öðü®Ì¿o~Üüú—÷ÿ\Ãá¿[ŸË§¾ý¬êÓçð<®§Ïç÷ó¼ÐÕvk8|«Ë’ó ·ã¯a8¿_¶óÃy C¹ãpÞ®¯Ž-/ÿ½Ý<^©_•ÜjŒËvõxí†(wœÿºùEýªä…6ž¦wõTË=:¿k9Ê)y ³»Õ–mü£×Ãû�‡wåá|<>ÜŸÆáüå]ùøãK>¼+ßàÝP˜ýÛ­.K†Ù?—;r»z¼¢~U2®§e»y¼ ³Önˆq=-›Îïù°ËÃùãûãñãe›¦vÈO7�WÇ5Ìþ9õígUŸ–m\Ok˜ýsY¶«5 ]ïÔj˜ý[Y¶òéf ³«êÓ²¥¾ý¬êÓfÿ–úö³ªOËö¥ªOç÷W�ï}<”‡C~º9×0û·q=-Û¸ž>¥¾ý¬êS®³–ívRß~Võéøgk·ã0®§‡zÚ×0ÜjŒË6®§0Ê‹ù…r÷V^¬ó ·ã¯áð­.KÎó S+Ék.N©e»k»¡5 ]ïÔj˜ýÛ·^ªßÿ§_¨/|?®aöo]íb—‡S¿èÇ5Ìþ­ÜqêýÏ—÷¿¯¨_•\œRËVûµÂìß´ ³¾ÕeÉðü­—ªÃ÷ÿ]ø~\ÃsW»Øåá|\Ãó·^ªvyøþ_ü«ÆÐŽ2øþùVc|8œ?ŸúE?ÃìÿMy†ë¬eÇÅ)V^<†ÿ}¿üî×ß{ªK¸µŸ\GBͱÀØ�w¥% program tstgam; { -> 340 } { test the gamma function } var x : real; external procedure cls; function gamma(x: real): real; const pi = 3.1415926; var i,j : integer; y,gam : real; begin { gamma function } if x>=0.0 then begin y:=x+2.0; gam:=sqrt(2*pi/y)*exp(y*ln(y)+(1-1/(30*y*y))/(12*y)-y); gamma:=gam/(x*(x+1)) end else { x<0 } begin j:=0; y:=x; repeat j:=j+1; y:=y+1.0 until y>0.0; gam:=gamma(y); { recursive call } for i:=0 to j-1 do gam:=gam/(x+i); gamma:=gam end { x<0 } end; { gamma function } begin cls; writeln; repeat repeat write('X: '); read(x) until x<>0.0; writeln('Gamma is ',gamma(x)) until x<-22.0; end.