mirror of
https://github.com/vishapoberon/compiler.git
synced 2026-04-06 01:42:24 +00:00
93 lines
3.4 KiB
Text
93 lines
3.4 KiB
Text
Out module tests.
|
|
SIZE(INTEGER) = 2
|
|
|
|
Testing LONGREAL.
|
|
|
|
1 2 3
|
|
123456789012345678901234567890
|
|
1.0D0: 1.0D+000
|
|
1.1D0: 1.1D+000
|
|
2.1D0: 2.1D+000
|
|
-1.1D0: -1.1D+000
|
|
1.1D3: 1.1D+003
|
|
1.1D-3: 1.1D-003
|
|
1.2345678987654321D3: 1.23456789876543D+003
|
|
0.0: 0.0D+000
|
|
0.000123D0: 1.23D-004
|
|
1/0.0: Infinity
|
|
-1/0.0: -Infinity
|
|
|
|
1 2 3
|
|
123456789012345678901234567890
|
|
1.0D0: 1.00000D+000
|
|
1.1D0: 1.10000D+000
|
|
2.1D0: 2.10000D+000
|
|
-1.1D0: -1.1000D+000
|
|
1.1D3: 1.10000D+003
|
|
1.1D-3: 1.10000D-003
|
|
1.2345678987654321D3: 1.23456789876543D+003
|
|
0.0: 0.00000D+000
|
|
0.000123D0: 1.23000D-004
|
|
1/0.0: Infinity
|
|
-1/0.0: -Infinity
|
|
|
|
1 2 3
|
|
123456789012345678901234567890
|
|
1.0D0: 1.000000000000000D+000
|
|
1.1D0: 1.100000000000000D+000
|
|
2.1D0: 2.100000000000000D+000
|
|
-1.1D0: -1.100000000000000D+000
|
|
1.1D3: 1.100000000000000D+003
|
|
1.1D-3: 1.100000000000000D-003
|
|
1.2345678987654321D3: 1.234567898765430D+003
|
|
0.0: 0.000000000000000D+000
|
|
0.000123D0: 1.230000000000000D-004
|
|
1/0.0: Infinity
|
|
-1/0.0: -Infinity
|
|
|
|
|
|
|
|
Testing REAL.
|
|
|
|
1 2 3
|
|
123456789012345678901234567890
|
|
1.0E0: 1.0E+00
|
|
1.1E0: 1.1E+00
|
|
2.1E0: 2.1E+00
|
|
-1.1E0: -1.1E+00
|
|
1.1E3: 1.1E+03
|
|
1.1E-3: 1.1E-03
|
|
1.2345678987654321E3: 1.234568E+03
|
|
0.0: 0.0E+00
|
|
0.000123E0: 1.23E-04
|
|
1/0.0: Infinity
|
|
-1/0.0: -Infinity
|
|
|
|
1 2 3
|
|
123456789012345678901234567890
|
|
1.0E0: 1.000000E+00
|
|
1.1E0: 1.100000E+00
|
|
2.1E0: 2.100000E+00
|
|
-1.1E0: -1.10000E+00
|
|
1.1E3: 1.100000E+03
|
|
1.1E-3: 1.100000E-03
|
|
1.2345678987654321E3: 1.234568E+03
|
|
0.0: 0.000000E+00
|
|
0.000123E0: 1.230000E-04
|
|
1/0.0: Infinity
|
|
-1/0.0: -Infinity
|
|
|
|
1 2 3
|
|
123456789012345678901234567890
|
|
1.0E0: 1.000000E+00
|
|
1.1E0: 1.100000E+00
|
|
2.1E0: 2.100000E+00
|
|
-1.1E0: -1.100000E+00
|
|
1.1E3: 1.100000E+03
|
|
1.1E-3: 1.100000E-03
|
|
1.2345678987654321E3: 1.234568E+03
|
|
0.0: 0.000000E+00
|
|
0.000123E0: 1.230000E-04
|
|
1/0.0: Infinity
|
|
-1/0.0: -Infinity
|
|
|