Слово /−/: различия между версиями
AtH (обсуждение | вклад) |
AtH (обсуждение | вклад) (→Ссылки) |
||
Строка 55: | Строка 55: | ||
* Слова [http://forth.sourceforge.net/standard/dpans/dpans6.htm#6.1.1910 NEGATE] и [http://forth.sourceforge.net/standard/dpans/dpans12.htm#12.6.1.1567 FNEGATE (f-negate)] в стандарте ANS Forth ''(англ.)'' | * Слова [http://forth.sourceforge.net/standard/dpans/dpans6.htm#6.1.1910 NEGATE] и [http://forth.sourceforge.net/standard/dpans/dpans12.htm#12.6.1.1567 FNEGATE (f-negate)] в стандарте ANS Forth ''(англ.)'' | ||
* Слова [http://www.forth200x.org/documents/html3/core/NEGATE.html NEGATE] и [http://www.forth200x.org/documents/html3/floating/FNEGATE.html FNEGATE (f-negate)] в черновике Forth 200x ''(англ.)'' | * Слова [http://www.forth200x.org/documents/html3/core/NEGATE.html NEGATE] и [http://www.forth200x.org/documents/html3/floating/FNEGATE.html FNEGATE (f-negate)] в черновике Forth 200x ''(англ.)'' | ||
* [http://gudleifr.h1.ru/cgi-bin/pilo.cgi?FL=../g9.txt&IS=\6.PERWOISTOTNIKI\LEO%20BRODIE%20STARTING%20FORTH\05.OPERAZII%20NAD%20ZELYMI%20TISLAMI ОПЕРАЦИИ НАД ЦЕЛЫМИ ЧИСЛАМИ] в книге [http://gudleifr.h1.ru/cgi-bin/pilo.cgi?FL=../g9.txt&IS=\6.PERWOISTOTNIKI\LEO%20BRODIE%20STARTING%20FORTH Л.Броуди «Начальный курс программирования на языке Форт»] | |||
Версия от 00:56, 25 марта 2016
/−/ (обратный знак, смена знака) — стандартное слово Каллисто. Смена знака числа.
/−/ ( x -- x1 ) Смена знака. x1 ← −x
x1 — число, противоположное x, то есть нуль минус x.
Если эта операция производится над 32-битными целыми числами её иногда, не совсем точно, называют дополнительным кодом или дополнением до двух (англ. two's complement).
Ввод слова /−/
В режиме NUM последовательно нажмите клавиши F ÷ − F ÷
Детали реализации
Слово /−/ является «обёрткой» вокруг команды ЭКВМ /−/ («смена знака»).
FNEGATE в стандарте ANS Forth
12.6.1.1567 FNEGATE "f-negate" FLOATING ( F: r1 -- r2 ) or ( r1 -- r2 ) r2 - отрицание r1.
NEGATE в стандарте ANS Forth
6.1.1910 NEGATE CORE ( n1 -- n2 ) Отрицание n1, возвращает его арифметическую инверсию n2.
См.: 6.1.1720 INVERT, 6.1.0270 0=.
NEGATE в предыдущем стандарте Forth-83 (англ.)
NEGATE n1 -- n2 79 n2 is the two's complement of n1, i.e, the difference of zero less n1.
NEGATE в стандарте Forth-79 (англ.)
NEGATE n -- -n 177 Leave the two's complement of a number, i.e., the difference of zero less n.
MINUS в fig-FORTH Release 1 glossary, май 1979 (англ.)
MINUS n1 --- n2 L0 Leave the two's complement of a number.
История
Слово /−/ является одним из самых древних слов Форта. Впервые оно появилось в 1964 году под именем MINUS в программе CURVE, написанной Чак Муром на Алголе для Burroughs B5500 (Национальная ускорительная лаборатория SLAC, Стэнфордский университет).
Из CURVE имя MINUS перешло в fig-Форт и оттуда в Форт ИТЭФ (1988 год), но во все стандарты Форта (включая Форт-79) слово /−/ вошло под именем NEGATE
В Форте FSP88M слово /−/ известно под именем NEG
Имя /−/ в Каллисто взято от советского ПМК «Электроника Б3-34», выпущенного в 1980 году.
Реализация /−/
Слово /−/ в Каллисто является примитивом, но при необходимости его можно определить через ноль и вычитание:
: /−/ ( r -- -r ) 0 ↔ − ;
Ссылки
- См. также слова NOT и 0=
- Противоположное число на Википедии
- Слова NEGATE и FNEGATE (f-negate) в стандарте ANS Forth (англ.)
- Слова NEGATE и FNEGATE (f-negate) в черновике Forth 200x (англ.)
- ОПЕРАЦИИ НАД ЦЕЛЫМИ ЧИСЛАМИ в книге Л.Броуди «Начальный курс программирования на языке Форт»
У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их. |
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |