/[eiffelstudio]/FreeELKS/trunk/library/kernel/real_32.e
ViewVC logotype

Contents of /FreeELKS/trunk/library/kernel/real_32.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 91477 - (show annotations)
Sun Jan 14 09:47:13 2007 UTC (13 years ago) by ericb
File size: 2396 byte(s)
Synchronized with ISE 6.0.65740
1 indexing
2 description: "Real values, single precision"
3 external_name: "System.Single"
4 assembly: "mscorlib"
5 library: "Free implementation of ELKS library"
6 copyright: "Copyright (c) 1986-2006, Eiffel Software and others"
7 license: "Eiffel Forum License v2 (see forum.txt)"
8 date: "$Date$"
9 revision: "$Revision$"
10
11 frozen expanded class REAL_32 inherit
12
13 REAL_32_REF
14 redefine
15 infix "<",
16 truncated_to_integer,
17 truncated_to_integer_64,
18 to_double,
19 ceiling_real_32,
20 floor_real_32,
21 infix "+",
22 infix "-",
23 infix "*",
24 infix "/",
25 infix "^",
26 prefix "-",
27 prefix "+",
28 out
29 end
30
31 create
32 default_create,
33 make_from_reference
34
35 convert
36 make_from_reference ({REAL_32_REF}),
37 to_double: {DOUBLE}
38
39 feature -- Comparison
40
41 infix "<" (other: like Current): BOOLEAN is
42 -- Is `other' greater than current real?
43 external
44 "built_in"
45 end
46
47 feature -- Conversion
48
49 truncated_to_integer: INTEGER is
50 -- Integer part (same sign, largest absolute
51 -- value no greater than current object's)
52 external
53 "built_in"
54 end
55
56 truncated_to_integer_64: INTEGER_64 is
57 -- Integer part (same sign, largest absolute
58 -- value no greater than current object's)
59 external
60 "built_in"
61 end
62
63 to_double: DOUBLE is
64 -- Current seen as a double
65 external
66 "built_in"
67 end
68
69 ceiling_real_32: REAL_32 is
70 -- Smallest integral value no smaller than current object
71 external
72 "built_in"
73 end
74
75 floor_real_32: REAL_32 is
76 -- Greatest integral value no greater than current object
77 external
78 "built_in"
79 end
80
81 feature -- Basic operations
82
83 infix "+" (other: like Current): like Current is
84 -- Sum with `other'
85 external
86 "built_in"
87 end
88
89 infix "-" (other: like Current): like Current is
90 -- Result of subtracting `other'
91 external
92 "built_in"
93 end
94
95 infix "*" (other: like Current): like Current is
96 -- Product by `other'
97 external
98 "built_in"
99 end
100
101 infix "/" (other: like Current): like Current is
102 -- Division by `other'
103 external
104 "built_in"
105 end
106
107 infix "^" (other: DOUBLE): DOUBLE is
108 -- Current real to the power `other'
109 external
110 "built_in"
111 end
112
113 prefix "+": like Current is
114 -- Unary plus
115 external
116 "built_in"
117 end
118
119 prefix "-": like Current is
120 -- Unary minus
121 external
122 "built_in"
123 end
124
125 feature -- Output
126
127 out: STRING is
128 -- Printable representation of real value
129 external
130 "built_in"
131 end
132
133 end

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision

  ViewVC Help
Powered by ViewVC 1.1.23