Index: src/examples/rational.c
===================================================================
--- src/examples/rational.c	(revision 8a3467770a0171ca9f928918daee8eb73663ff9a)
+++ src/examples/rational.c	(revision 224e52f62cdbfa54726c14ee6a4272f91b3194b6)
@@ -11,10 +11,11 @@
 // Created On       : Mon Mar 28 08:43:12 2016
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Wed Apr  6 18:02:02 2016
-// Update Count     : 19
+// Last Modified On : Thu Apr  7 17:25:44 2016
+// Update Count     : 20
 // 
 
 #include <limits>
 #include <rational>
+#include <fstream>
 
 int main() {
Index: src/libcfa/limits.c
===================================================================
--- src/libcfa/limits.c	(revision 8a3467770a0171ca9f928918daee8eb73663ff9a)
+++ src/libcfa/limits.c	(revision 224e52f62cdbfa54726c14ee6a4272f91b3194b6)
@@ -10,9 +10,9 @@
 // Created On       : Wed Apr  6 18:06:52 2016
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Wed Apr  6 21:12:17 2016
-// Update Count     : 10
+// Last Modified On : Thu Apr  7 17:18:45 2016
+// Update Count     : 11
 // 
 
-#include <limits>
+#include "limits"
 
 // Integral Constants
Index: src/libcfa/rational
===================================================================
--- src/libcfa/rational	(revision 8a3467770a0171ca9f928918daee8eb73663ff9a)
+++ src/libcfa/rational	(revision 224e52f62cdbfa54726c14ee6a4272f91b3194b6)
@@ -10,9 +10,9 @@
 // Created On       : Wed Apr  6 17:56:25 2016
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Wed Apr  6 21:51:42 2016
-// Update Count     : 8
+// Last Modified On : Thu Apr  7 17:23:36 2016
+// Update Count     : 9
 // 
 
-#include <fstream>
+#include "iostream"
 
 struct Rational {
@@ -44,6 +44,6 @@
 double widen( Rational r );
 Rational narrow( double f, long int md );
-ifstream * ?|?( ifstream *is, Rational *r );
-ofstream * ?|?( ofstream *os, Rational r );
+forall( dtype istype | istream( istype ) ) istype * ?|?( istype *, Rational * );
+forall( dtype ostype | ostream( ostype ) ) ostype * ?|?( ostype *, Rational );
 
 // Local Variables: //
Index: src/libcfa/rational.c
===================================================================
--- src/libcfa/rational.c	(revision 8a3467770a0171ca9f928918daee8eb73663ff9a)
+++ src/libcfa/rational.c	(revision 224e52f62cdbfa54726c14ee6a4272f91b3194b6)
@@ -11,11 +11,11 @@
 // Created On       : Wed Apr  6 17:54:28 2016
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Wed Apr  6 21:52:16 2016
-// Update Count     : 7
+// Last Modified On : Thu Apr  7 17:28:03 2016
+// Update Count     : 12
 // 
 
 #include "rational"
-#include <fstream>
-#include <stdlib>
+#include "fstream"
+#include "stdlib"
 
 extern "C" {
@@ -188,5 +188,6 @@
 } // narrow
 
-ifstream * ?|?( ifstream *is, Rational *r ) {
+forall( dtype istype | istream( istype ) )
+istype * ?|?( istype *is, Rational *r ) {
 	long int t;
     is | &(r->numerator) | &(r->denominator);
@@ -197,5 +198,6 @@
 } // ?|?
 
-ofstream * ?|?( ofstream *os, Rational r ) {
+forall( dtype ostype | ostream( ostype ) )
+ostype * ?|?( ostype *os, Rational r ) {
     return os | r.numerator | '/' | r.denominator;
 } // ?|?
