LG
LG (десятичный логарифм) — традиционное слово Каллисто. Вычисление десятичного логарифма.
LG ( p −− x ) Вычисление десятичного логарифма. x := lg p
x — логарифм p по основанию 10. Аргумент p должен быть больше нуля.
Ввод слова LG[править]
В режиме ЛАТ последовательно нажмите две клавиши − БП
FLOG в стандарте ANS Forth[править]
12.6.2.1557 FLOG "f-log" FLOATING EXT ( F: r1 -- r2 ) or ( r1 -- r2 ) r2 - десятичный логарифм r1. Неопределенная ситуация существует если r1 меньше или равно нулю.
История[править]
В MMSFORTH это слово называлось LOG10
В Каллисто имя LG восходит к надписи на клавиатуре советского ПМК «Электроника Б3-34», выпущенного в 1980 году.
Реализация[править]
Слово LG является «обёрткой» вокруг команды ЭКВМ F lg.
Десятичный логарифм не определён для нуля и отрицательных чисел. Обработка этой ошибки производится встроенной программой. Например, последовательность слов 0 LG вызывает аварийный останов Каллисто с сообщением «Переполнение» в строке комментариев. Можно ввести с клавиатуры произвольное число в качестве значения «логарифма 0» и вернуться в Каллисто, нажав С/П . Подробнее см. статью Авост Каллисто.
В случае аварийного останова рекомендуется произвести «холодную перезагрузку» Каллисто с удалением всех введённых слов, нажав последовательно клавиши В/О С/П .
1581 ;#LG 1582 ; LG ( p −− x ) Десятичный логарифм. x := lg p 1583 LLG: .DB 2 1584 .TEXT "LG" ; ( x −− lg x ) 1585 .DW LEXPE 1586 LG: .DW JLG 1587 JLG: PKRM03 FLG PKM03 KGOTO9 ; Обёртка вокруг Flg.
Реализация из SP-Forth 4.20:
CODE FLOG ( F: r1 -- r2 ) \ * FLDLG2 FXCH FYL2X RET END-CODE
Ссылки[править]
- Исходный текст слова LG в Каллисто Классик 1.0
- См. слова 10ˣ и LN
- Десятичный логарифм на Википедии
- Слово FLOG (f-log) в стандарте ANS Forth (англ.)
- Слово FLOG (f-log) в черновике Forth 200x (англ.)
У этой статьи нет иллюстраций. Вы можете помочь проекту, добавив их. |
Это заготовка статьи. Вы можете помочь проекту, дополнив её. |