Константы float.h суперкомпьютера Cray-1

[vak]

Поборол я проблему с библиотекой /lib/arith: файл просто лежал в другом месте. Теперь Си компилятор работает в полном объёме. К примеру, вот константы из файла <float.h>. Напечатано программой float-limits.c.

FLT_ROUNDS      = 0
FLT_RADIX       = 2

FLT_MANT_DIG    = 47
FLT_EPSILON     = 7.10542735760100e-15
FLT_DIG         = 13
FLT_MAX_EXP     = 8190
FLT_MAX         = 2.72687033904852e+2465
FLT_MAX_10_EXP  = 2465
FLT_MIN_EXP     = -8189
FLT_MIN         = 3.66720773510972e-2466
FLT_MIN_10_EXP  = -2465

DBL_MANT_DIG    = 47
DBL_EPSILON     = 7.10542735760100e-15
DBL_DIG         = 13
DBL_MAX_EXP     = 8190
DBL_MAX         = 2.72687033904852e+2465
DBL_MAX_10_EXP  = 2465
DBL_MIN_EXP     = -8189
DBL_MIN         = 3.66720773510972e-2466
DBL_MIN_10_EXP  = -2465

LDBL_MANT_DIG   = 94
LDBL_EPSILON    = 2.5243548967072377773175314089e-29
LDBL_DIG        = 27
LDBL_MAX_EXP    = 8190
LDBL_MAX        = 2.7268703390485170000000000000e+2465
LDBL_MAX_10_EXP = 2465
LDBL_MIN_EXP    = -8189
LDBL_MIN        = 3.6672077351097250254390190391e-2466
LDBL_MIN_10_EXP = -2465

Comments

[spamsink]

LDBL_MANT_DIG = 94 - это серьёзно!

[vak]

Для сравнения я запустил то же самое на Raspberry Pi - ещё круче выходит.

LDBL_MANT_DIG   = 113
LDBL_EPSILON    = 1.9259299443872358530559779425849273e-34
LDBL_DIG        = 33
LDBL_MAX_EXP    = 16384
LDBL_MAX        = 1.1897314953572317650857593266280070e+4932
LDBL_MAX_10_EXP = 4932
LDBL_MIN_EXP    = -16381
LDBL_MIN        = 3.3621031431120935062626778173217526e-4932
LDBL_MIN_10_EXP = -4931

[kondybas]

А что такое еpsilon для типа?

[vak]

Минимальное число, которое можно прибавить к единице.

[kondybas]

Ага, понятно. Не в классическом понимании - к нулю (єто MIN), а к единице.

[vak]

Ага. Показывает дискретность числовой сетки в окрестности единицы.

[kondybas]

Мне всегда біло интересно, как бі лег неклассический анализ Робинсона на вічтехнику, потому что машинное представление R - єто, все таки, R*.

[juan_gandhi]

Эпсилон есть, дельты нету.

[vak]

А что такое дельта для float?

[juan_gandhi]

Она дожна существовать для каждого эпсилона. ∀ε∃δ

[vak]

Да это только в матане. 😀
И то математики не уверены: всякий раз заставляют доказывать.

[spamsink]

Для сравнения, на БЭСМ-6 было, судя по всему,

LDBL_MIN = 9.1680193377742358281050e-2467
LDBL_EPSILON = 1.6543612251060553497428e-24

[vak]

С константой LDBL_MAX они прохалявили на Крэе:

LDBL_MAX        = 2.7268703390485170000000000000e+2465

Должна быть:

LDBL_MAX        = 2.7268703390485398236574606117e+2465

[spamsink]

Библиотека ввода-вывода плавающей точки - особь статья.

А какие там ещё языки есть, кроме С?

[vak]

Загляни в этот файл: https://github.com/andrastantos/cray-sim/blob/master/unicos_tools/lang_patch.tar
Там несколько бинарников, хакнутых, чтобы номер лицензии не спрашивали.
Среди них компиляторы с Фортрана.
Но что с этими файлами делать - непонятно.

[spamsink]

FlexLM родимый! Да уж, хакать проблема невелика.

По идее можно установить $DISPLAY и вызвать xhelp. Бинарники все вроде статические, так что что-то должно произойти. :)

[spamsink]

Ух что нашлось! Это лучше выглядит на чёрном фоне; и чтобы увидеть "RESEARCH INC", мне пришлось снять очки ради снижения резкости.

#   ................   ...................              ...         ...              ...
  ..................  ....................           .......      ......          ......
 ...................  .....................        ..........      ........    ........
...................   ....             ....       ...... ......     ..................
....                  ....            ....      .......   .......      ............
....                  ....................    ....................        ......
...................   ....................   .......................       ....
 ...................  ..................... .........................      ....
  ..................  ...              .... ....                 ....      ....
    ...............    .                .    ..                   ..        ..

 ......................................................................................
 ......................................................................................
 ...    ...     ...    ..     .... ....    ....    ... ... ....... ..  ... ...    .....
 ... ... .. ...... ...... .......   ... ... .. .... .. ... ....... .. . .. .. .... ....
 ...     ..     ...   ...     .. ... ..     .. .......     ....... .. .. . .. .........
 ... .. ... .......... .. ......     .. .. ... .... .. ... ....... .. ...  .. .... ....
 ... ... ..     ..    ...     . ..... . ... ...    ... ... .  .... .. .... ...    .. ..
 ............................................................ .........................
 ......................................................................................

[vak]

Классно! Откуда такая красота?

[spamsink]

Из strings xhelp :)

[vak]

Библиотека ввода-вывода не виновата: константа так определена в /usr/include/float.h.

#define _LDBL_MAX           2.726870339048517e2465L