¦X¦: различия между версиями

Материал из ПМК вики
Перейти к навигации Перейти к поиску
Нет описания правки
Строка 47: Строка 47:
* Слова [http://forth.sourceforge.net/standard/dpans/dpans6.htm#6.1.0690 ABS (abs)] и [http://forth.sourceforge.net/standard/dpans/dpans12.htm#12.6.2.1474 FABS (f-abs) ] в стандарте ANS Forth ''(англ.)''
* Слова [http://forth.sourceforge.net/standard/dpans/dpans6.htm#6.1.0690 ABS (abs)] и [http://forth.sourceforge.net/standard/dpans/dpans12.htm#12.6.2.1474 FABS (f-abs) ] в стандарте ANS Forth ''(англ.)''
* Слова [http://www.forth200x.org/documents/html3/core/ABS.html ABS (abs)] и [http://www.forth200x.org/documents/html3/floating/FABS.html FABS (f-abs)] в черновике Forth 200x ''(англ.)''
* Слова [http://www.forth200x.org/documents/html3/core/ABS.html ABS (abs)] и [http://www.forth200x.org/documents/html3/floating/FABS.html FABS (f-abs)] в черновике 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| (абсолютное значение) — стандартное слово Каллисто. Вычисление модуля.

|X|            ( x -- p )

p — абсолютная величина числа x, т.е. тоже значение числа, но непременно положительное.

Для нуля и положительных чисел p=x, для отрицательных чисел p=−x.

Ввод слова |X|

В режиме NUM последовательно нажмите клавиши  F   П     Р-ГРД-Г   0     P   F   П 

Детали реализации

Слово является «обёрткой» вокруг команды ЭКВМ К |x|.

FABS в стандарте ANS Forth

12.6.2.1474   FABS                           "f-abs"               FLOATING EXT
           ( F: r1 -- r2 ) or ( r1 -- r2 )
           r2 - абсолютное значение r1.

ABS в стандарте ANS Forth

6.1.0690   ABS                                 "abs"                       CORE
           ( n -- u )
           u - абсолютное значение n.

ABS в предыдущем стандарте Forth-83 (англ.)

     ABS          n -- u                        79          "absolute"
          u is the absolute value of n.  If n is -32,768 then u is the
          same value.  See:  "arithmetic, two's complement"

ABS в стандарте Forth-79 (англ.)

ABS            n1 -- n1                      108         "absolute"
    Leave the absolute value of a number.

ABS в fig-FORTH Release 1 glossary, май 1979 (англ.)

ABS           n  ---  u                        L0
       Leave the absolute value of n as u.

Реализация |X|

У Баранова-Ноздрунова приводится следующее описание слова |X| (стр. 28):

 : |X|   ( A ---> абс A )    ↑ 0< IF NEGATE THEN ;

История

В отличие от Форта-83, в Каллисто абсолютная величина -32768 равна 32768.

Ссылки


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


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