Так вот в Лиспе существует понятие точечной пары. Название точечной пары происходит из использованной в ее записи точечной нотации, в которой для разделения полей CAR и CDR используется выделенная пробелами точка. Базовые функции CAR и CDR действуют совершенно симметрично.

 

_(CONS ‘a ‘d) р (a . d)

_(CAR ‘(a . b)) р a

_(CDR ‘(a . (b . c))) р (b . c)

 

Любой список можно записать в точечной нотации. Преобразование можно осуществить (на всех уровнях списка) следующим образом:

(a1 a2 ... an) у (a1 . (a2 . ...(an . nil)... ))

 

_(a b c (d e)) у (a . (b . (c . ((d . (e . nil)) . nil))))

 

Признаком списка здесь служит NIL в поле CDR последнего элемента списка, символизирующий его окончание.

Использование точечных пар в программировании на Лиспе в общем-то излишне. Точечные пары применяются в теории, книгах и справочниках по Лиспу. Кроме того они используются совместно с некоторыми типами данных и с ассоциативными списками, а также в системном программировании.

 

2. Структурированные типы данных.

Списки (ассоциативные).

Ассоциативный список или просто а-список - состоит из точечных пар, поэтому его также называют списком пар.

((a1 . t1) (a2 . t2) ... (an . tn))

 

Первый элемент пары называют ключом а второй - связанными с ключом данными. Обычно ключом является символ. связанные с ним данные могут быть символами, списками или какими не будь другими лисповскими объектами.

В работе со списками пар нужно уметь строить списки, искать данные по ключу и обновлять их.

PAIRLIS.

Функция PAIRLIS строит а-список из списка ключей и списка, сформированного из соответствующих им данных. Третьим аргументом является старый а-список, в начало которого добавляются новые пары:

(PAIRLIS ключи данные а-список)

 

_(SETQ спис ‘(один . Иванов)) р (один . Иванов)

_(SETQ спис

(PAIRLIS ‘(три два) ‘(Петров Сидоров)

спис)) р ((три . Петров) (два . Сидоров) (один . Иванов))

 

ASSOC.

Ассоциативный список можно считать отображением из множества ключей в множество значений. Данные можно получить с помощью функции

(ASSOC ключ а-список)

 

которая ищет в списке пар данные, соответствующие ключу, сравнивая искомый ключ с ключами пар слева направо.

 

_(ASSOC ‘три спис) р (три . Петров)

 

ACONS.

Ассоциативный список можно обновлять и использовать в режиме стека. Новые пары добавляются к нему только в начало списка, хотя в списке уже могут быть данные с тем же ключом. Это осуществляется функцией ACONS:

(ACONS x y а-список)

Поскольку ASSOC просматривает список слева направо и доходит лишь до первой пары с искомым ключом, то более старые пары как бы остаются в тени более новых.

 

Строки.

Строка состоит из последовательности знаков. В строке знаки записываются в последовательности друг за другом, для ограничения которой с обеих сторон в качестве ограничителя используется знак «».

При вводе строки в интерпретаторе, в качестве результата получаем ту же строку.

CHAR.

Произвольный элемент строки можно прочитать (т. е. сослаться на него с помощью индекса) функцией CHAR:

(CHAR строка n)

 

(CHAR «строка» 0) р \с ;индексация начинается с 0

 

Сравнение строк.

 

(STRING= строка1 строка2)

(STRING< строка1 строка2)

(STRING> строка1 строка2)

(STRING/= строка1 строка2)

 

Массивы.

Для работы с массивами в MuLisp необходимо загрузить файл ARRAY.LSP.

Массивы создаются формой:

(MAKE-ARRAY (n1 n2 ... nN) режимы)

 

Функция возвращает в качестве значения новый объект - массив. n1, n2, ... nN - целые числа, их количество N отражает размерность массива, а значения - размер по каждой размерности. Необязательными аргументами можно задать тип элементов массива, указать их начальные значения или придать самому массиву динамический размер. Общий размер массива в этом случае знать и закреплять не обязательно.

Для вычислений, осуществляемых с массивами, наряду с функцией создания массива используются функции для выборки и изменения элементов массива. Ссылка на элемент N-мерного массива осуществляется с помощью вызова:

(ARREF массив n1 n2 ...nN)

 

n1, n2, ..., nN - координаты, или индексы, элемента, на который ссылаются. В качестве функции присваивания используется обобщенная функция присваивания SETF.

 

_(SETQ мас (MAKE-ARRAY ‘(5 4)

:ELEMENT-TYPE ‘ATOM

:INITIAL-ELEMENT A)) р (ARRAY ((A A A A) ... (A A A A) (5 6)))

_(SETF (AREF мас 0 1) B) р B

_мас р (ARRAY ((A B A A) ... (A A A A )))

 

Структуры.

Для объединения основных типов данных (чисел, символов, строк, массивов) в комплексы, отображающие предметы, факты используется составной тип, который называется структурами.

Определение структурного типа осуществляется с помощью макроса DEFSTRUCT, формой которого является

 

(DEFSTRUCT класс-структур

поле1

поле2

...)

 

Определим структурный тип БАЗА состоящий из компонент ПРОФИЛЬ, ПЛОЩ и ВМЕСТИМ:

 

_(DEFSTRUCT база

профиль площ вместим) р БАЗА

 

Для каждого нового типа данных генерируется начинающаяся с MAKE- функция создания структуры данного типа. Например объект типа БАЗА можно создать и присвоить переменной БАЗА1 следующим вызовом:

 

_(SETQ БАЗА1 (MAKE-БАЗА))

 

Полю с помощью ключевого слова, которым является имя поля с двоеточием перед ним, присвоить при создании начальное значение.

Вызов MAKE-БАЗА возвращает в качестве значения созданную структуру.

Для копирования структуры генерируется функция, начинающаяся с COPY- (COPY-БАЗА).

Для каждого поля определяемой структуры создается функция доступа, имя которой образуется написанием после имени типа через тире имени поля, например:

 

_(БАЗА-ПРОФИЛЬ x)

 

Вызов возвращает значение поля ПРОФИЛЬ для БАЗЫ, задаваемой структурой x.

Для присваивания значений полям структуры используется обобщенная функция присваивания SETF:

 

_(SETF (БАЗА-ПРОФИЛЬ БАЗА1) ОВОЩ) р ОВОЩ

 

 

 

 

Имперское Казачество.

Имперское Казачье Войсковое Общество

 

tsar symbol

За Веру, За Царя, За Отечество.

С нами Бог

 

 

 

 

 

 

 

 

За Русь Святую.

Имперское Казачье Войсковое Общество

 

f0062

 

Боже Царя Храни.

С нами Бог

 

 

 

 

  • Что такое: Денежно-кредитная (или монетарная) политика

      Денежно-кредитная (или монетарная) политика — это политика государства, воздействующая на количество денег в обращении с целью обеспечения стабильности цен, полной занятости населения и роста реального объема производства. Осуществляет монетарную политику Центральный банк. Воздействие на макроэкономические процессы (инфляцию, экономический рост, безработицу) осуществляется посредством...

    Подробнее...

  • Конгресс Казаков в Америке | US Cossacks Congress

              HELPING THE RUSSIAN ORTHODOX MISSION IN COLOMBIA Posted Ср, 07/05/2017 - 14:05 by kazaksusa The Cossack Congress in America is accepting donations to help the Cossack Stanitsa and The Russian Orthodox Mission in Colombia. The Russian Orthodox mission in Colombia was organized 3 years ago, and has established communities in the cities of Bogota, Medellin, and Cali. The Russian Orthodox Mission in...

    Подробнее...

  • What is: Ценова́я поли́тика

      Ценова́я поли́тика — это принципы и методики определения цен на товары и услуги. Выделяют микро- (на уровне фирмы) и макро- (в сфере государственного регулирования цен и тарифов) уровни формирования цен.   1. Ценовая политика фирмы Ценовая политика фирмы формируется в рамках общей стратегии фирмы и включает ценовую стратегию и тактику ценообразования. 'Ценовая стратегия предполагает позиционирование...

    Подробнее...

  • Что такое: дивидендная, западная и внешнеторговая политика

      Дивидендная политика — политика акционерного общества в области распределения прибыли компании, то есть распределения дивидендов между держателями акций. Дивидендная политика формируется советом директоров. В зависимости от целей компании и текущей/прогнозируемой ситуации, прибыль компании может быть реинвестирована, списана на нераспределенную прибыль или выплачена в виде дивидендов. Термин «дивидендная...

    Подробнее...

 

 

 

 

Мы Равные Партнёры США.

Имперское Казачье Войсковое Общество

 

 

Party USA WAY

 

За торгово-экономические успехи.

С нами Бог

 

 

 

 

  • О символике Имперского Казачьего Войска

    Символика казачьего войскового общества имеет в своей основе Гетманский скипетр, он совмещён с казачьим полковничьим символом - шестопером, в целом...

    Подробнее...

  • Алексеевы купцы

    Алексеевы купцы   Происходят они из крестьян сельца Добродеева Ярославской губернии, принадлежавшего Наталье Никифоровне Ивановой. Предок их, Алексей Петрович...

    Подробнее...

  • Устав ВКОИКВ

    Выписка из Устава ВКОИКВ: 1.4. Общество создается и действует на основе принципов добровольности, равноправия, самоуправления, законности,...

    Подробнее...

  • Дебильность

    Дебильность — самая легкая форма умственной отсталости, характеризующаяся значительным снижением способности к абстрактному мышлению и обобщению при сохранности моторики. Типичным для дебильности является наглядно-образное мышление, невозможность построения...

    Подробнее...

 

 

 

 

Имперское Казачье Движение.

Имперское Казачье Войсковое Общество

 

ikd

 

Долой негодяев.

С нами Бог

 

 

 

 

 

 

Основные слова Царя от Казачества Михаило Романова:

 

Это не первый случай дискриминации,

в Кремле уже стояли ставленники Швеции,

Литвы, Поляки, Грузины, Евреи, "питерцы", и это было и это есть,

не такой сложный для меня вопрос, но всё-таки разбираться понемногу надо бы,

я против бардака, никому не выгодного,

Президенты и "путин" биороботы и двойники, которых в реалии в природе вообще нет - это продукция Германии,

фирмы "Мерседес", основной машины вермахта,

и машины Адольфа Гитлера, разработчика фашисткого танка "Тигр",

всё это время в Кремле стояли именно "Мерседесы",

это и пьяный ёжик в тумане видит,

астрологические "рыба" и "кролик" (знаки близкие к 6 часам),  а это близкие знаки пРезидентов,

как пишут астрологи: "будут семью искать за границей",

я имею в основе себя знак "сентябрь" знак Иоанна Грозного (знак близкий к 12 часам)

и "сокол", который не бросит Отечество, и наведёт порядок в даже иностранцам ненужном хаоснике,

это ничего разберёмся, такое уже было на Руси,

но немецкие Бароны при Царях, и ГЕРБОВНИКЕ,

пили чай с Русскими Графьями, и имели общий

интерес в коммерции, но это при Царях

было всё налажено, а вот сейчас Американцы

ставят вопрос о Германизации России, это

не я блокирую немецкий "путинизм" и его продолжения,

это США ставит на место немцев, я УРЕЗАЮ

Президенство по Имперской линии АПРФ,

и с Администрацией Президента, а правит Россией

фактически она, всё ещё с 2011 года кабинетно

с Т. Овчинниковой и с УФСБ всё согласовано,

в реальном общении, Е. Фёдорову я лично сказал тоже,

что Европа начудила, а не Американцы начудили,

хотя, в этой ОККУПАЦИОННОЙ каше все начудили,

ДВОРЯНСТВО и Царь спасут Америку, Евразию и Россию,

но всё сложнее, специалисты нужны.

 

 

border="0"name="obj1"

 

 

Поэтому Русь пока ещё развита как Татжикистан,

или я работаю, или вы на иждивении запада, реально в виде макак,

в виде опасных самому западу, и в виде нищих, а

порой и в виде МЯСА (Беслан, Норд-ост, Доненцк),

да я на России тоже зарабатываю, имею полное право,

но я и помогаю Руси и Союзу, мне самому здесь

и неприятно бывает и попросту страшно,

а так же правильно 

в игровом стиле, и взаимовыгодно интегрирую запад с Россией,

в таком положении гео-хаоса как хочу, как надо по уму,

Россия не понимает демократии, зачастую это временный подлог власти и хаос,

Русь всё-таки ИМЕЕТ! историю!, и это патриархальная,

пусть зимняя, суровая, но когда-то была самая мощная по ИСТОРИИ! Держава,

являясь СПРАВЕДЛИВЫМ! оплотом мира и согласия во всём мире,

так и действую, не с проста на Руси говорили:

"С ЦАРЁМ В ГОЛОВЕ", вы служите не мне и не казакам,

Вы служите - самому СЛОВУ Царь, каждый в себе немножко Царь,

а на Руси это слово всегда стоит рядом со словом ПАТРИАРХ

(и посол США).

 

1917-2011-2017

 

Авторские Великие Слова: Царь от Казачества Михаило Романов

 

 

 

 

 

 

 

 

 

 

 

 

m2r in aprf 1

 

Ох и сложны вопросы,

Михаил Романов 23 года в Администрации Президента России, а толку пока маловата,

во напали на Россию супостаты, как гиены, да и в мире что происходит, то смотреть 

можно только при выключенном телевизоре, который ещё и - брешет,

ну, тогда смотри - Интернет, если ум есть может и - спасёшься.

 

 

 

 

 

 

impersky flag

 

 

 

 

 

 

Страшные вещи происходят на этой планете ОБЕЗЬЯН,

да, это ещё недоразвитая недоцивилизованная планета,

едят друг друга, по официальному заявлению

Конгресса США, Германия подкупила Мерседесами

и онемеченными фальшивыми деньгами (и напечатанными рублями

допечатанными, в "онемеченном питерском бурге, грефе и гоффе", не государственном

немецком центро-банке, по конституции не принадлежащем России, 

эмулированными "рублями" или "карточками для нищих" или попросту "фантиками",

 для захвата власти России, с ящером временного правительства

керенского, это ящер который на рублях раньше был на фоне свастики),

в общем Германия снова и опять подкупила и захватила

правительства! 23 стран мира, в том числе и особенно! в России,

это не враньё США, ведь в частности от РФг, США могло 

подвергнутся ЯДЕРНОМУ! нападению, СПРОВОЦИРОВАННОМУ

наличием немцев в Кремле, а русский эмигрант

живущий в Германии Александр Рар,

так и назвал свою достаточно популярную книгу

о п_резидентах тРусляндии - "немцы в кремле",

подумайте как может США не отреагировать,

ведь немцы когда-то "фашиствовали", 

они убили ~500.000 американцев, ~20 миллионов

европейцев, и ~40 миллионов советских граждан и солдат,

а за годы СНГ при влезании немцев и остальных,

в большинстве своём европейских влезальщиков, в нищую страну и её сердце - Кремль,

уехало ~20 миллионов, погибло в конфликтах ~5 миллионов и сгинуло

от нищеты и порождённых ею болезней ~20 миллионов россиян,

и как пишет весь Интернет: "УЩЕРБ СОПОСТАВИМ

СО ВТОРОЙ МИРОВОЙ ВОЙНОЙ", вот и думайте

как вам быть с Царём в голове, или без Царя,

или вообще ДОХЛЫМИ ОБЕЗЬЯНАМИ.

 

 

94754245

 

 

Завязывайте с фашизмом.

 

2017

 

Конгресс Казаков США, Казаки Руси,

авт слова: Царь Михаило

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

... и не дай Бог, вам влезать в комбинации

слов на этом сайте, от этого сайта зависит

не только состояние отношений по России,

но и международное положение, вещей в природе,

цитировать можно только отдельные фразы,

перефразировать Авт Слова Казаков и Царя Михаило

пока не поправится некоторое положение

вещей, не допустимо, если конечно

вы не хотите оставаться нищими.