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

Contents of /FreeELKS/trunk/library/kernel/real_64.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: 2490 byte(s)
Synchronized with ISE 6.0.65740
1 indexing
2 description: "Real values, double precision"
3 external_name: "System.Double"
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_64 inherit
12
13 REAL_64_REF
14 redefine
15 infix "<",
16 truncated_to_integer,
17 truncated_to_integer_64,
18 truncated_to_real,
19 ceiling_real_64,
20 floor_real_64,
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_64_REF}),
37 truncated_to_real: {REAL_32}
38
39 feature -- Comparison
40
41 infix "<" (other: like Current): BOOLEAN is
42 -- Is `other' greater than current double?
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 truncated_to_real: REAL_32 is
64 -- Real part (Same sign, largest absolute
65 -- value no greater than current object's)
66 external
67 "built_in"
68 end
69
70 ceiling_real_64: REAL_64 is
71 -- Smallest integral value no smaller than current object
72 external
73 "built_in"
74 end
75
76 floor_real_64: REAL_64 is
77 -- Greatest integral value no greater than current object
78 external
79 "built_in"
80 end
81
82 feature -- Basic operations
83
84 infix "+" (other: like Current): like Current is
85 -- Sum with `other'
86 external
87 "built_in"
88 end
89
90 infix "-" (other: like Current): like Current is
91 -- Result of subtracting `other'
92 external
93 "built_in"
94 end
95
96 infix "*" (other: like Current): like Current is
97 -- Product with `other'
98 external
99 "built_in"
100 end
101
102 infix "/" (other: like Current): like Current is
103 -- Division by `other'
104 external
105 "built_in"
106 end
107
108 infix "^" (other: DOUBLE): DOUBLE is
109 -- Current double to the power `other'
110 external
111 "built_in"
112 end
113
114 prefix "+": like Current is
115 -- Unary plus
116 external
117 "built_in"
118 end
119
120 prefix "-": like Current is
121 -- Unary minus
122 external
123 "built_in"
124 end
125
126 feature -- Output
127
128 out: STRING is
129 -- Printable representation of double value
130 external
131 "built_in"
132 end
133
134 end

Properties

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

  ViewVC Help
Powered by ViewVC 1.1.23