10ˣ

Материал из ПМК вики
Перейти к навигации Перейти к поиску

10ˣ (десять в степени икс) — традиционное слово Каллисто. Вычисление десятичного антилогарифма.

10ˣ            ( x −− p )                           Вычисление десятичного антилогарифма. p := 10^x
Пример работы слова 10ˣ

Возводит десять в степень x, возвращает p. Аргумент x должен быть меньше ста.

Ввод слова 10ˣ[править]

В режиме NUM последовательно нажмите четыре клавиши  1   0     F   0 

FALOG в стандарте ANS Forth[править]

12.6.2.1484   FALOG                         "f-a-log"              FLOATING EXT
           ( F: r1 -- r2 ) or ( r1 -- r2 )
           Возводит десять в степень r1, возвращает r2.

История[править]

В MMSFORTH это слово называлось 10^

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

Реализация[править]

Слово 10ˣ является «обёрткой» вокруг команды ЭКВМ F 10x, вызывающей переполнение при аргументах, больше либо равных 100.

Обработка этой ошибки производится встроенной программой. Например, последовательность слов  100 10ˣ  вызывает аварийный останов Каллисто с сообщением «Переполнение» в строке комментариев. Можно ввести с клавиатуры произвольное число в качестве значения «10100» и вернуться в Каллисто, нажав  С/П . Подробнее см. статью Авост Каллисто.

В случае аварийного останова рекомендуется произвести «холодную перезагрузку» Каллисто с удалением всех введённых слов, нажав последовательно клавиши  В/О   С/П .

1562 ; ∗∗∗ Примитивы МК−161 ∗∗∗
1563 ;#FALOG
1564 ; 10ˣ              ( x −− p )                           Десятичный антилогарифм. p := 10ˣ
1565 LEXP10:         .DB     3
1566                 .TEXT   "10"                    ; ( x −− 10^x )
1567                 .DB     190                     ; 10^X
1568                 .DW     LMAX
1569 EXP10:          .DW     JEXP10
1570 JEXP10:         PKRM03 F10^X PKM03  KGOTO9      ; Обёртка вокруг F10^X.

Ссылки[править]


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