Редактирование: Слово /−/
Перейти к навигации
Перейти к поиску
Правка может быть отменена. Пожалуйста, просмотрите сравнение версий ниже, чтобы убедиться, что это нужная вам правка, и запишите страницу ниже, чтобы отменить правку.
Текущая версия | Ваш текст | ||
Строка 1: | Строка 1: | ||
'''/−/''' (обратный знак, смена знака) — | '''/−/''' (обратный знак, смена знака) — стандартное слово [[Каллисто]]. Смена знака числа. | ||
/−/ ( x -- x1 ) Смена знака. x1 ← −x | /−/ ( x -- x1 ) Смена знака. x1 ← −x | ||
x1 — число, противоположное x, то есть нуль минус x. | x1 — число, противоположное x, то есть нуль минус x. | ||
Строка 8: | Строка 8: | ||
В [[Режим NUM|режиме NUM]] последовательно нажмите клавиши [[Клавиша F|{{Оранжевая клавиша|F}}]] [[Клавиша ÷|{{Серая клавиша|÷}}]] [[Клавиша -|{{Серая клавиша|−}}]] [[Клавиша F|{{Оранжевая клавиша|F}}]] [[Клавиша ÷|{{Серая клавиша|÷}}]] | В [[Режим NUM|режиме NUM]] последовательно нажмите клавиши [[Клавиша F|{{Оранжевая клавиша|F}}]] [[Клавиша ÷|{{Серая клавиша|÷}}]] [[Клавиша -|{{Серая клавиша|−}}]] [[Клавиша F|{{Оранжевая клавиша|F}}]] [[Клавиша ÷|{{Серая клавиша|÷}}]] | ||
== | == Детали реализации == | ||
Слово /−/ является «обёрткой» вокруг [[Команда /−/|команды ЭКВМ /−/ («смена знака»)]]. | |||
== FNEGATE в стандарте ANS Forth == | |||
12.6.1.1567 FNEGATE "f-negate" FLOATING | 12.6.1.1567 FNEGATE "f-negate" FLOATING | ||
( F: r1 -- r2 ) or ( r1 -- r2 ) | ( F: r1 -- r2 ) or ( r1 -- r2 ) | ||
r2 - отрицание r1. | 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 | NEGATE n1 -- n2 79 | ||
n2 is the two's complement of n1, i.e, the difference of | n2 is the two's complement of n1, i.e, the difference of | ||
zero less n1. | zero less n1. | ||
== NEGATE в стандарте Forth-79 (англ.) == | |||
NEGATE n -- -n 177 | NEGATE n -- -n 177 | ||
Leave the two's complement of a number, i.e., the difference | Leave the two's complement of a number, i.e., the difference | ||
of zero less n. | of zero less n. | ||
== MINUS в fig-FORTH Release 1 glossary, май 1979 (англ.) == | |||
MINUS n1 --- n2 L0 | MINUS n1 --- n2 L0 | ||
Leave the two's complement of a number. | Leave the two's complement of a number. | ||
== | == История == | ||
Слово MINUS является одним из самых древних слов Форта. | |||
Оно появилось в программе CURVE, написанной Чак Муром на Алголе для Burroughs B5500 в 1964 году ([https://ru.wikipedia.org/wiki/%D0%9D%D0%B0%D1%86%D0%B8%D0%BE%D0%BD%D0%B0%D0%BB%D1%8C%D0%BD%D0%B0%D1%8F_%D1%83%D1%81%D0%BA%D0%BE%D1%80%D0%B8%D1%82%D0%B5%D0%BB%D1%8C%D0%BD%D0%B0%D1%8F_%D0%BB%D0%B0%D0%B1%D0%BE%D1%80%D0%B0%D1%82%D0%BE%D1%80%D0%B8%D1%8F_SLAC Национальная ускорительная лаборатория SLAC], [https://ru.wikipedia.org/wiki/%D0%A1%D1%82%D1%8D%D0%BD%D1%84%D0%BE%D1%80%D0%B4%D1%81%D0%BA%D0%B8%D0%B9_%D1%83%D0%BD%D0%B8%D0%B2%D0%B5%D1%80%D1%81%D0%B8%D1%82%D0%B5%D1%82 Стэнфордский университет]). | |||
Имя MINUS перешло в fig-Форт, но во все стандарты, начиная с Форта-79, слово /−/ вошло под именем NEGATE | |||
NEGATE | |||
В Форте FSP88M это слово известно под именем NEG | |||
Имя /−/ в Каллисто взято от советских ПМК. | |||
== Реализация /−/ == | |||
Слово /−/ в [[Каллисто]] является [[примитив]]ом, но при необходимости его можно определить через [[Слово 0|ноль]] и [[Слово −|вычитание]]: | |||
: /−/ ( r -- -r ) 0 ↔ − ; | |||
== Ссылки == | == Ссылки == | ||
* См. также слова [[Слово NOT|NOT]] и [[0=]] | |||
* См. также слова [[NOT]] и [[0=]] | |||
* [https://ru.wikipedia.org/wiki/%D0%9F%D1%80%D0%BE%D1%82%D0%B8%D0%B2%D0%BE%D0%BF%D0%BE%D0%BB%D0%BE%D0%B6%D0%BD%D0%BE%D0%B5_%D1%87%D0%B8%D1%81%D0%BB%D0%BE Противоположное число на Википедии] | * [https://ru.wikipedia.org/wiki/%D0%9F%D1%80%D0%BE%D1%82%D0%B8%D0%B2%D0%BE%D0%BF%D0%BE%D0%BB%D0%BE%D0%B6%D0%BD%D0%BE%D0%B5_%D1%87%D0%B8%D1%81%D0%BB%D0%BE Противоположное число на Википедии] | ||
* Слова [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:// | * Слова [http://www.forth200x.org/documents/html3/core/NEGATE.html NEGATE] и [http://www.forth200x.org/documents/html3/floating/FNEGATE.html FNEGATE (f-negate)] в черновике Forth 200x ''(англ.)'' | ||
Строка 114: | Строка 65: | ||
[[Категория:Арифметические операции Каллисто]] | [[Категория:Арифметические операции Каллисто]] | ||
[[Категория:Одноместные операции Каллисто]] | [[Категория:Одноместные операции Каллисто]] | ||
[[Категория: | [[Категория:Описание бета-версии Каллисто]] | ||