Chain_terms/5 Внешняя База Данных

Назначение Возвращает термы из связанного списка

Обращение chain_terms(БДанн,Цепь,Дом,Терм,Укз)

Домены (db_selector,string,<domain>,<term>,ref)

Шаблоны описания (вх,вх,вх,вх/вых,вых)

аргументов

Описание При первом обращении chain_terms возвращает первый

терм из связанного списка и его указатель в связанном

списке Цепь. Затем каждый раз когда происходит поиск

с возвратом; следующий терм, размещенный в данном

связанном списке Цепь, возвращается в Терм, а

соответствующий указатель - в Укз. Когда последний

терм будет возвращен, следующее обращение даст

неудачное завершение. chain_terms также может быть

вызван с термом Терм, частично созданным.

Пример

domains

db_selector = mydba

dbdom = city(cityno,cityname);

person(firstname,lastname,street,cityno,

code)

cityno, cityname, firstname, lastname, street,

code = string

goal

db_open(mydba,"register.bin",in_file),

db_chains(mydba,Chain),

chain_terms(mydba,Chain,dbdom,Term,Ref),

write("\nTerm=",Term,", Ref=",Ref),

fail.

char_int/2

Назначение Преобразует символ в значение ASCII кода и обратно

Обращение char_int(СимвАрг,ЦелАрг)

Домены (char,integer)

Шаблоны описания (вх,вых),(вых,вх),(вх,вх)

аргументов

Описание (вх,вых)

Связывает ЦелАрг кода ASCII c СимвАрг.

(вых,вх)

Связывает символьную переменную СимвАрг с ASCII

кодом, определенным ЦелАрг.

(вх,вх)

Согласовывается, если ЦелАрг соответствует ASCII коду

СимвАрг. В противном случае не согласовывается.

Неудачное Смотри описание для потока (вх,вх).

завершение

Ошибки Отсутствуют.

Пример

Goal: char_int('a',X)

X=97

1 Решение

Goal: char_int(X,97)

X=a

1 Решение

Goal: char_int('a',97)

Да

Goal: char_int('a',197)

Нет