Дьяконов В. Maple 7 - Учебный курс (1185900), страница 92
Текст из файла (страница 92)
Этот пакет предоставляет весьма внушительное число функций для этого: > и(тЫХИьтоо) 5) ( (Ас(с(АппЬисе, Ас(с(СЬ((А, АссгСопс, АпПЬшеСоипс, АссгсЬисе(г(атея Апг(Ьисе(а(ие, Ассг(Ьисе(га(ие(!гс(ЬРеуаи(с, Ассг(Ьисет, СРаса, СРасайаса, С!еапХМЬ, Соттепс, Соттеп(Тех!, Сапсем(Мос(е(, Сопсеп(Мос(е(Соил!, Е(етепс, Е(етепс((тате, Е(етеп($(ас(ассах, Е((иа(, Р(гз(СЬ((с(, Ргот$(г(сся, бе(А(сг(Ьисе, 6е(СМ(с(, Наел иг(Ьисе, ОазСМ(с(, 1а СРаса, 1аСоттет, 1зЕ(етел с, 1аРгосетз(пя1песгисс(оп, 614 Урок 16, Обзор пакетов специального назначения ДТгее, /о/пЕпшгез, Ьаз/СЫЫ, МахеЕ1етеи/, Рпп/, Р/Уп/Тор/1е, Рпп/То5/ггпу, РгосеззА//г/Ьи/ез, Ргосезз!щ1пз/гис//о/Ь Ргосезз/п5/паггис6опТ/а/а, Ргосыз/пе1пзггисг/опд/а/пе, /1еаАР/1е, /1ето~ еАпЫЬи/е, Реп/оуеА //г/Ьигез, йетоуеСЬ/Ы, ЯетоуеСои/еп/, 5есоп//СЬ/!А, 5е/ес/А ппЬи/ез, 5е/ес/Сотен/, Ее/ес/йетоуеА//г/Ьи/ез, 5е/ес/йеп/оуеСо///елг, 5ерагсаеЕпш[ез, 5е/Аа/це, 5/г/РА/гг/Ьи/ез, 5/ырСоппаепи, 5//ЬзА//г/Ьи/е, 5иЬзА//г/Ьи/едга/пе, ТЬ[гг/СЫЫ, То5/г///5, И//т/еГ/1е) Рассмотрение этих средств (как и средств поддержки НТМ[.) далеко выхолит за пределы тематики данной книги, хотя многие из нпх достаточно просты, Поэтому ограничимся единственным примером применения функции Ргтпс для получения программы на языке ХМ[.
соответствующей программе задания выражения, рассмотренного в предшествующем разделе: > ХМЬТ0015[рг1ПС3( т ): <васо хп1пз='ПССР //Уагх нЗ ог9/)999/Масшнаспны > <зевапс1сз> .вгои хге/=ЫО5'> <вгон хге[='ШЗ'> <в1 хге[='141'>а</п1- 'ао>мпч15зыет1пез:</п10> <в1 хгег-'Ш2'>х</в1> </вгох> <во +</по> яп х"ет='Ш4'>Ь</ву> </вгои> аппосаС|оп-хв1 енсом п9-'МаСПМ[-Сопсепс'> <арр1у Ш-'Ш5'> <р1оз/> <арр1у Ш-'ШЗ'> <Сугез/> <с1 Ш='зп['>а</сх> <сх зп-'102'>х</с1> </арр1у> <сз зп"'1О4'>Ь</с1> </арр1у> </аппосасхоп-хв1> <аппосас1оп епсоснпо='Мар1е'>а*х<Ь</аппосас;оп> </зевапс1сз> </паСЬ> Панет создания внешних программ ЕхТегпа1СаПпд Пакет Ехсегпа[Са[1[пй служит для создания внешних программ, записанных на языке Мар[е (или Сч-ь), Состав пакета представлен небольшим числом функций: О РеТ1пеЕМСегпа1 [1п.ехС!1Ь) — используя функцию пеппе ехСегпа1, Мар[е 7 задает внешнюю функцию Тп в таблице функций внешних библиотек ехС11Ь; О ЕхСегпа1 [АЬгагуйаве [Ьаэепаве.
ргестэ1оп) — задает имя Ьавепаве функции и точность вычислений ргесзззоп для функции внешней библиотеки. Детальное знакомство с этим пакетом мы опускаем. Заинтересованный читатель найдет нужные сведения в справке по этому пакету, Новые пакеты системы Нар(е 7 б15 Пакет линейных операторов ОпеагОрега1огб Пакет линейных операторов Е(пеагОрега(огз — новый пакет, содержащий средства для работы с линейнымп о~тераторамтт, Состав пакета виден из его вызова; > ч(тшстпевгорегатогв), ! Арр(у, ВЕТО ОгеРо(у, Рис(апет)А пи()К(итог.
Рас(оге«(ОСКВ, Рис(иге«(М(п(пти(А пи(Ь((а(ог, Гистогет)Ог«Ро(уТоВЕ, Рас(огет)ОгеРо(уТоОг«Ро(у, Гас!апет)ОгеРо(чТоКЕ,!п(«Кгат«Бо(з, МТтпйпи(АптЬт(итог, ОгеРо(у ТаВЕ, ОгеРо(уТоКЕ, КЕТоОг«Рп(у, т)А(ептЬегт(ипата(чег) Набор функций пакета достаточно представителен. Но, поскольку область применения пакета весьма специфична, рекоменлуется знакомиться с его возможностями по справкам на его функции и обзорной статье по нему, имеющейся в обзоре новых пакетов расширения Мар1е 7 (также размещенной в справочной базе данных пакета).
Пакет для работы со случайными объектами КапдотТооЬ Пакет для работы со случайными объектамп Кап((оп)Тоо1з служит для расширения базовых возможностей системы Мар1е 7 (для болыпинства пользователей и так вполне достаточных) в части генерации различных случайных объектов, таких как числа различных форматов, векторов, матриц, строковых символов, таблиц и т. д.
Они образно названы г)ачог (в буквальном переводе «букет (вина)»), что подчеркивает возвгожную сложность структуры создаваемых объектов. Пакет представлен небольшим числом основных функций: > ч(та(аапеочтоо1в): (А»)г)Р(ачог, Оепегаге, Се(Р(итог, Ое(Р(ачогх, На»Р(ачотз КеточеР(итог) Однако функции А((о»1ачог и 6епегасе могут использоваться с внушительным набором типов случайных объектов; Шепшса1 педтпт поптего гашопа1 сьоове сочр1ех ехргвед (птедег 11вт 115т1тзт Поппедаю че поппед(пт попровтпт Иопгегошт ро1упом рою от 5ет втгоссогес тгчега1ве Действие большинства из них вполне очевидно из названий.
Основной функцией является функция генерации случайных объектов 6епегасе(ехрг). Если тип объекта не задан (например, функцией Мог) ачог), то использование функции 6епегасе будет порождать сообщение об ошибке. Примеры применения функций представлены ниже: > ч(ть(двпеомтоо1в); ьепегате(а); Еггог, ()п Кап((оооо!вибепега(е) Йе йачог 'а' ()оеа по( ех)в( > АООГ1ачог(в гапд(1..20)): вепегате(а): б 46 Урок 16. Обзор пакетов специального назначеннл 2 > 6епегаее(а); 11 > депегасе(а)рпаспаг); Еггог, [!п Кап((опчТоо!а:-ьзепсгасе) (!)е Лачог 'а1рйас1чаг' ((осз по( схпп > А<Ыг)ачог(а!рпаспаг ргос() [а,о.с,о.е.г)[гало(1..6)()1 епд ргос): 6е1г)ачогз(): и, а(раасбиг„сйоозе, сончр!ех; ехргзед, (!он!, я гадес, йз!, ((зг((з(, не8аг(ч е, не8ч) чг, нонне8иг(ые, нонне8[нг, нннроз(н (, нонроз((чые. поччеего, нопаегонн, ро!ун очи, роет!. роз! ные, гигюпа(, зе(, з(ги8, (гне)а(зе > депегазе((пседег): -72580330913 > 6епегаее(1(зз([1оае, 3)): 1.00007110693270,.02633073697,.7256143563 1О ') > депегаее([а, чпгедег.
Г)оаг)): Еггоч; [!п Кап((очпТоо!а:-Сзепега(е) (1че йаыог 'а' ((оез по( ехчз( > Иаег(х(3, 3, 6епегазе(гас(опа)(пеппи(пазог=10). вакергос)); 3 -1 4 10 2 5 ! -1 0 2 10 3 -2 -1 10 5 2 > Иаег(х(3, 3. 6епегасе(газ(опа)(пеппи(пагог=10), вааергос)): -1 -1 -9 ! 5 10 !0 ! 4 2 2 5 5 -3 4 -9 10 5 10 > Чессог(4, депегаее(совр)ех((пгедег(галде-!..100)), вахергос)); 67+ 10 74+ 82 75+ 67 74+ 43 Функция 6есг)ачог(01 чг) представляют случайный объект [или объекты) и форме процедуры: > Апог)ачог(а - гапч((1..20))." 6епегаге(а): 15 > 6еСГ)ачог(а); Новые пакеты системы Нар!е 7 617 ргос () 1оса! |; я!оЬа! зее4 зеет(;= (гепт( ах зеет(, р); зеео|; со сопсиь с)о зеет(:= |геш(ах зев|бр); |:=зх| е зеет(епт) т)о; ксш( |, т((чЬпг ) + о((зе( спи ртос > 6еСЫ ачог(!пСевег); шот)в!еО(оса! 1)е)аи(тз; ехрогс Мапц спдшодв1с Другая функция йеСГ1ачогв() возвращает все типы случайных объектов: > 6еСГ1ачог5(): а, а(рйисйаг, сйоозе, соп|р(ех.
ехргзет(, ()оа(, |)|(снег, (Ь|, (Ь(йы, |теда((че, педйи, иоплейаи»е, полнея(пг, понроз|)|г, нонроз(!(че, нонаего, |ш|гхеюни, ро1упопй роз(ттг, роки(че, пгт(опи(, зег, згг(пе, згие(и(зе Функция Назр!ачог(Г1чг) служит для проверки наличия объекта данною типа в списке типов объектов, а функция РевочеГ1 ачог(т1чг) — для удалеиия типа обьскта. Следу)ощ|)е примеры иллюстриру|от применение этих функции: > Назг)ачог(а); |гне > аепючеГ1ачог(а); > На5(1ачог(а); |го Ьн > 6еСЕ1ачог5(); а(рйасйаг, сйоозе, совр(ех, ехргзет(„51оаг, |нгессг, (Ь|,!(5((Ь(, нега((че, неенй(, ноппеяа((че, полнее(пт, понроз(н(, попроз(((че, нопхего„попгего|нг, ро(улов|, роз(пг, роз (Иче, гидона(. зе(, з(г(ле, (гие)и(зе Обратите внимание иа то, что после уиичтожеиия объекта типа а ои исчез из списка, выводимого функцией йеСГ1ачогз.
Этот пакет, несмотря иа довольно специфические возможности, паверияка будет полезен тем читателям, которые всерьез заняты реализацией «продвииуттчх» методов Монте-Карло, основанных иа моделировании случайных объектов и ситуаций. Ои служит серьезным дополнением к пакету статистических расчетов асапв описанному в этом уроке выше. Пакет для работы со списками ~ЫТооЬ Новый пакет Ыз(Топ!5 содсржит ряд полезных команд для работы со списками, Их набор представлен ниже: >»ИСЬ(С(5СТоо1 5): ))((агп!пй, пйс ава(япе|) патпе Створ поте Ьаа а я1оЬа1 Ъ|п|)(пя 618 Урок 16.
Обзор пакетов специального назначенил ( ВгггагуР)асс, Вгпаг3гБеигс1г, Сагс8огггс, 13оГРгогтисг, РгпгУКереггггоггз, Паггеп, Лаггеп0ггсе, сгг оир, гпгег1еиге,,Уогп, /огггбс9ггеггсс, гЬга/гебггггоие, Раг7, Рог ггагзгггггз, Венегзс, Когаге, Боггсгг, Брггг, Тгитрозе ) Пакет содержит набор известных функций для работы со списками, например скалярного умножения списков, пх обращения. трапспонпрования, попорти а, объединения и и д. Ограничимся примером на вычисление скалярного пропзветгсния векторов: > ь := 18., 84, .91.
.14. -.76, †.96, -.28, .66, .99, .41, -.54П !.:= (О, 84,.91,.14,-.76,-.96,-.28,.66,.99,.41,-.54) > И : 11.. .54, †.42, -.99, -.65, .28, .96, .75, -.15. †,91. -.84)г г)г.= (1, 54,-.42,-.99,-.65,.28,.96,.75,-.15,-,91,-,84] > Юовргопцстй..