Слово /−/: различия между версиями

Материал из ПМК вики
Перейти к навигации Перейти к поиску
Строка 42: Строка 42:
Впервые оно появилось под именем 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 в программе 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
Имя MINUS перешло в fig-Форт, но во все стандарты Форта слово /−/ вошло под именем NEGATE


В Форте FSP88M слово /−/ известно под именем NEG
В Форте FSP88M слово /−/ известно под именем NEG

Версия от 21:13, 20 марта 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.

История

Слово /−/ является одним из самых древних слов Форта.

Впервые оно появилось под именем MINUS в программе CURVE, написанной Чак Муром на Алголе для Burroughs B5500 в 1964 году (Национальная ускорительная лаборатория SLAC, Стэнфордский университет).

Имя MINUS перешло в fig-Форт, но во все стандарты Форта слово /−/ вошло под именем NEGATE

В Форте FSP88M слово /−/ известно под именем NEG

Имя /−/ в Каллисто взято от советского ПМК «Электроника Б3-34», выпущенного в 1980 году.

Реализация /−/

Слово /−/ в Каллисто является примитивом, но при необходимости его можно определить через ноль и вычитание:

: /−/  ( r -- -r )  0 ↔ − ;

Ссылки


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


  Это заготовка статьи. Вы можете помочь проекту, дополнив её.