Changeset f5e37a4 for libcfa/src/rational.hfa

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.hfa (modified) (6 diffs)

libcfa/src/rational.hfa

@@ -12 +12 @@
 // Created On       : Wed Apr  6 17:56:25 2016
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Fri Nov  8 17:02:09 2024
-// Update Count     : 126
+// Last Modified On : Wed Nov 27 18:11:07 2024
+// Update Count     : 128
 //
 
@@ -21 +21 @@
 #include "math.trait.hfa"                                                               // arithmetic
 
-// implementation
+// Implementation
 
 forall( T ) {
@@ -28 +28 @@
         }; // rational
 }
+
+// Arithmetic, Relational
 
 forall( T | arithmetic( T ) ) {
@@ -73 +75 @@
         rational(T) ?/?( rational(T) l, rational(T) r );
         rational(T) ?/=?( rational(T) & l, rational(T) r );
-
-        // I/O
-        forall( istype & | istream( istype ) | { istype & ?|?( istype &, T & ); } )
-        istype & ?|?( istype &, rational(T) & );
 } // distribution
 
+// I/O
+
 forall( T ) {
+        forall( istype & | istream( istype ) | { istype & ?|?( istype &, T & ); } | arithmetic( T ) )
+        istype & ?|?( istype &, rational(T) & );
+
         forall( ostype & | ostream( ostype ) | { ostype & ?|?( ostype &, T ); } ) {
                 ostype & ?|?( ostype &, rational(T) );
@@ -86 +89 @@
 } // distribution
 
+// Exponentiation
+
 forall( T | arithmetic( T ) | { T ?\?( T, unsigned long ); } ) {
         rational(T) ?\?( rational(T) x, long int y );
@@ -91 +96 @@
 } // distribution
 
-// conversion
+// Conversion
+
 forall( T | arithmetic( T ) | { double convert( T ); } )
 double widen( rational(T) r );