Редактирование: ¦X¦
Перейти к навигации
Перейти к поиску
Правка может быть отменена. Пожалуйста, просмотрите сравнение версий ниже, чтобы убедиться, что это нужная вам правка, и запишите страницу ниже, чтобы отменить правку.
Текущая версия | Ваш текст | ||
Строка 1: | Строка 1: | ||
'''|X|''' (абсолютное значение) — | '''|X|''' (абсолютное значение) — стандартное слово [[Каллисто]]. | ||
Получение абсолютного значения. | |||
Слово является «обёрткой» вокруг команды ЭКВМ [[K ABS|К |x|]]. | |||
== FABS в стандарте ANS Forth == | |||
12.6.2.1474 FABS "f-abs" FLOATING EXT | 12.6.2.1474 FABS "f-abs" FLOATING EXT | ||
( F: r1 -- r2 ) or ( r1 -- r2 ) | ( F: r1 -- r2 ) or ( r1 -- r2 ) | ||
r2 - абсолютное значение r1. | r2 - абсолютное значение r1. | ||
== ABS в стандарте ANS Forth == | |||
6.1.0690 ABS "abs" CORE | |||
( n -- u ) | |||
u - абсолютное значение n. | |||
== ABS в предыдущем стандарте Forth-83 (англ.) == | |||
ABS n -- u 79 "absolute" | ABS n -- u 79 "absolute" | ||
u is the absolute value of n. If n is -32,768 then u is the | u is the absolute value of n. If n is -32,768 then u is the | ||
same value. See: "arithmetic, two's complement" | same value. See: "arithmetic, two's complement" | ||
== ABS в стандарте Forth-79 (англ.) == | |||
ABS n1 -- n1 108 "absolute" | ABS n1 -- n1 108 "absolute" | ||
Leave the absolute value of a number. | Leave the absolute value of a number. | ||
== ABS в fig-FORTH Release 1 glossary, май 1979 (англ.) == | |||
ABS n --- u L0 | ABS n --- u L0 | ||
Leave the absolute value of n as u. | Leave the absolute value of n as u. | ||
== Реализация |X| == | |||
( | У Баранова-Ноздрунова приводится следующее описание слова |X| (стр. 28): | ||
: |X| ( A ---> абс A ) ↑ 0< IF NEGATE THEN ; | |||
== Ссылки == | == Ссылки == | ||
* | * [http://forth.sourceforge.net/standard/dpans/dpans6.htm#6.1.0690 Слово ABS (abs) в стандарте ANS Forth] ''(англ.)'' | ||
* [http://forth.sourceforge.net/standard/dpans/dpans12.htm#12.6.2.1474 Слово FABS (f-abs) в стандарте ANS Forth] ''(англ.)'' | |||
* [http://www.forth200x.org/documents/html/core.html#core:ABS Слово ABS (abs) в черновике Forth 200x] ''(англ.)'' | |||
* [http://www.forth200x.org/documents/html/float.html#floating:FABS Слово FABS (f-abs) в черновике Forth 200x] ''(англ.)'' | |||
* | |||
* [http://www. | |||
Строка 105: | Строка 49: | ||
{{заготовка}} | {{заготовка}} | ||
[[Категория:Слова Каллисто]] | [[Категория:Слова Каллисто]] | ||
[[Категория:Арифметические операции Каллисто]] | [[Категория:Арифметические операции Каллисто]] | ||
[[Категория:Одноместные операции Каллисто]] | [[Категория:Одноместные операции Каллисто]] | ||