blob: 6b7a748b4e1666d0bbb25a7ebb502e0a7d096a9f (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
Real DEFINITIONS ::=
BEGIN
-- F.2.4.1
-- Use a real type to model an approximate number.
-- EXAMPLE
AngleInRadians ::= REAL
pi REAL ::=
{mantissa 3141592653589793238462643383279, base 10, exponent -30}
-- F.2.4.2
-- Application designers may wish to ensure full interworking with real
-- values despite
-- differences in floating point hardware, and in implementation
-- decisions to use
-- (for example) single or double length floating point for an application.
-- This can be achieved by the following:
App-X-Real ::= REAL (WITH COMPONENTS {
mantissa (-16777215..16777215),
base (2),
exponent (-125..128) } )
-- Senders shall not transmit values outside these ranges
-- and conforming receivers shall be capable of receiving
-- and processing all values in these ranges.
girth App-X-Real ::= {mantissa 16, base 2, exponent 1}
END
|