Changeset f5e37a4 for libcfa/src/rational.cfa

Timestamp:

Nov 27, 2024, 6:12:44 PM (3 weeks ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

master

Children:

3e2e9b2, 81e768d

Parents:

71f3d45

Message:

small changes to rational

File:

• libcfa/src/rational.cfa (modified) (6 diffs)

libcfa/src/rational.cfa

@@ -10 +10 @@
 // Created On       : Wed Apr  6 17:54:28 2016
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Mon Nov 11 22:37:12 2024
-// Update Count     : 206
+// Last Modified On : Wed Nov 27 18:06:43 2024
+// Update Count     : 208
 //
 
@@ -19 +19 @@
 
 #pragma GCC visibility push(default)
+
+// Arithmetic, Relational
 
 forall( T | arithmetic( T ) ) {
@@ -190 +192 @@
                 return l = l / r;
         } // ?/?
-
-        // I/O
-
-        forall( istype & | istream( istype ) | { istype & ?|?( istype &, T & ); } )
+} // distribution
+
+// I/O
+
+forall( T ) {
+        forall( istype & | istream( istype ) | { istype & ?|?( istype &, T & ); } | arithmetic( T ) )
         istype & ?|?( istype & is, rational(T) & r ) {
                 is | r.numerator | r.denominator;
@@ -201 +205 @@
                 return is;
         } // ?|?
-} // distribution
-
-forall( T ) {
+
         forall( ostype & | ostream( ostype ) | { ostype & ?|?( ostype &, T ); } ) {
         ostype & ?|?( ostype & os, rational(T) r ) {
@@ -212 +214 @@
 } // distribution
 
+// Exponentiation
+
 forall( T | arithmetic( T ) | { T ?\?( T, unsigned long ); } ) {
         rational(T) ?\?( rational(T) x, long int y ) {
@@ -226 +230 @@
 } // distribution
 
-// conversion
+// Conversion
 
 forall( T | arithmetic( T ) | { double convert( T ); } )