MAX

MAX (максимум) — стандартное слово Каллисто. Нахождение большего из двух чисел.

MAX            ( x1 x2 -- x3 )

Засылает в стек число x3, которое является наибольшим из двух чисел x1 и x2.

Ввод слова MAX

В режиме ЛАТ последовательно нажмите три клавиши  ÷   ШГ←   0 

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

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

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

12.6.1.1562   FMAX                      "f-max"                        FLOATING
           ( F: r1 r2 -- r3 ) or ( r1 r2 -- r3 )
           r3 большее из r1 и r2.

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

6.1.1870   MAX                                                             CORE
           ( n1 n2 -- n3 )
           n3 большее из n1 и n2.

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

     MAX          n1 n2 -- n3                   79               "max"
          n3 is the greater of n1 and n2 according to the operation of
          > .

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

MAX            n1 n2 -- n3                   218              "max"
    Leave the greater of two numbers.

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

MAX           n1  n2  ---  max                L0
       Leave the greater of two numbers.

Ссылки

• См. слово MIN
• Слова MAX и FMAX (f-max) в стандарте ANS Forth (англ.)
• Слова MAX и FMAX (f-max) в черновике Forth 200x (англ.)
• ОПЕРАЦИИ НАД ЦЕЛЫМИ ЧИСЛАМИ в книге Л.Броуди «Начальный курс программирования на языке Форт»

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

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