Слово √

√ (квадратный корень) — традиционное слово Каллисто. Извлечение квадратного корня.

√              ( p -- x )                      Квадратный корень. x ← √p

Пример работы слова √

x — корень второй степени из p. Аргумент p должен быть больше нуля либо равен нулю.

Ввод слова √

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

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

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

Квадратный корень не определён для отрицательных чисел. Обработка этой ошибки производится встроенной программой. Например, последовательность слов  -1 √  вызывает аварийный останов Каллисто с сообщением «Неверный аргумент» в строке комментариев. Можно ввести с клавиатуры произвольное число в качестве значения «$\sqrt{-1}$» и вернуться в Каллисто, нажав  С/П . Подробнее см. статью Авост Каллисто.

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

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

12.6.2.1618   FSQRT                   "f-square-root"              FLOATING EXT
           ( F: r1 -- r2 ) or ( r1 -- r2 )
           r2 - квадратный корень r1. Неопределенная ситуация существует, если 
           r1 - меньше нуля.

История

Впервые слово √ под именем SQRT появилось в Форте 1971-73 годах, когда Чак Мур перенёс транслятор на DEC PDP-11 в National Radio Astronomy Observatory (англ., Шарлотсвилл). Слово SQRT работало только с целыми числами и получало 16-битный результат из 32-битного аргумента.

В Форте FSP88 и MMSFORTH слово √ было известно под именем SQR

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

Ссылки

• Исходный текст слова √ в Каллисто Классик 1.0
• См. слова X² и Yˣ
• Квадратный корень на Википедии
• Слово FSQRT (f-square-root) в стандарте ANS Forth (англ.)
• Слово FSQRT (f-square-root) в черновике Forth 200x (англ.)

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