[cj_lex]

Добрый день. ковырял лиспом клотоиду(элемент трассы autocad civil 3d), вытащил в переменную некоторое значение, которое по логике вещей является бесконечно большим. вот результаты "анализа":

Код:

[Выделить все]

Команда: (print a)
1.#INF

Команда: (type a)
REAL

;сравниваем эту переменную с очень большим числом
Команда: (> a 9999999999999999999999999999999999999999999999999999999999999.9)
T

;делим это число 1000000 раз на максимальное число
Команда: (repeat 1000000 (setq a (/ a 9999999999999999999999999999999999999999999999999999999999999.9)))
1.#INF

;снова сравниваем
Команда: (> a 9999999999999999999999999999999999999999999999999999999999999.9)
T

;начинаем чудить
Команда: (setq b (/ a a))
-1.#IND

;пытаемся понять что за число получилось в переменной b
Команда: (type b)
REAL

Команда: (> b 0)
nil

Команда: (< b 0)
nil

Команда: (= b 0)
nil

Собственно, вопрос: как задать это самое бесконечно большое значение переменной через SETQ и что же за число получилось в переменной b?

[Дима_]

Глюк (недочет) это обычный - какой практический смысл в таком "чудо" числе.

[cj_lex]

Сообщение от Дима_ Глюк (недочет) это обычный - какой практический смысл в таком "чудо" числе.

смысл - расчет этой самой "клотоиды", правда, как именно, пока сам еще весьма смутно представляю.

[Дима_]

Вытащили Вы данные в каком-то левом формате - который лисп "по ошибке" преобразовал во float (real), который естественно глючит безбожно.

[cj_lex]

Сообщение от Дима_ Вытащили Вы данные в каком-то левом формате - который лисп "по ошибке" преобразовал во float (real), который естественно глючит безбожно.

вытаскивал чем-то вроде (vlax-get-property(nth i list_data)'RadiusOut)
(nth i list_data) - элемент сложного VLA объекта Civil'a
на глюк не похоже.

Код:

[Выделить все]

Команда: (setq c (/ 1 a))
0.0

Команда: (= c 0)
T

если ничего не путаю, это подтверждает то что число а бесконечно большое

[Дима_]

Сообщение от cj_lex если ничего не путаю, это подтверждает то что число а бесконечно большое

Это подтверждает что такого числа не существует - обычное "глючное" поведение для типов с "неверноуказаной" типизацией - для компьютера любые данные - это просто набор нулей и едениц и если программа (компилятор/интерпритатор) "глюканула" с типом - рождаются новые математические законы. Просто в большинстве языков, от такого типа действий (когда 2+"2" складывают) защищает компилятор, а например в ассемблере это обычное дело:

Код:

[Выделить все]

mov al,2; в регистр al заносим 2
mov bl,'2'; в регистр bl '2'
add al,bl; складываем al bl

О ЧУДО 2+2=34!!!!
Вы примерно то-же самое сейчас описываете.

[Vov.Ka]

1.0e+309
win 2k3 acad 2005

[cj_lex]

Понятненько)))

Сообщение от Vov.Ka 1.0e+309

- точно!!))
всем спасибо, вопрос исчерпан.