ADMB Documentation  11.1.2247
 All Classes Files Functions Variables Typedefs Friends Defines
dvect_io.cpp
Go to the documentation of this file.
00001 /*
00002  * $Id: dvect_io.cpp 1865 2014-04-08 03:59:24Z johnoel $
00003  *
00004  * Author: David Fournier
00005  * Copyright (c) 2008-2012 Regents of the University of California
00006  */
00011 // file: dvect_io.cpp
00012 
00013 // i/o ooperations for class dvector
00014 #include "fvar.hpp"
00015 
00016 #ifdef __TURBOC__
00017   #pragma hdrstop
00018   #include <iostream.h>
00019   #include <iomanip.h>
00020   #include <fstream.h>
00021   #define __USE_IOSTREAM__
00022 #endif
00023 
00024 #ifdef __ZTC__
00025   #include <iostream.hpp>
00026   #include <iomanip.hpp>
00027   #include <fstream.hpp>
00028   #define __USE_IOSTREAM__
00029 #endif
00030 
00031 #include <string.h>
00032 
00037 ostream& operator<<(const ostream& _ostr,const dvector& z)
00038 {
00039   ostream& ostr=(ostream&) _ostr;
00040   z.write_on(ostr);
00041 
00042   return ostr;
00043 }
00044 
00049 void dvector::write_on(const ostream& _s) const
00050 {
00051   ostream& s=(ostream&) _s;
00052 #ifdef __USE_IOSTREAM__
00053   int new_w = s.width();
00054   int new_p = s.precision();
00055 #if !defined(__cplusplus)
00056   long new_form = s.flags();
00057 #else
00058   ios::fmtflags new_form = s.flags();
00059 #endif
00060   char new_fill = s.fill();
00061 #endif
00062   for (int i=indexmin(); i <= indexmax(); i++)
00063   {
00064   #ifdef __USE_IOSTREAM__
00065      s.width(0);
00066      s << " ";
00067      s.width(new_w);
00068      s.precision(new_p);
00069      s.flags(new_form);
00070      s.fill(new_fill);
00071      s << (*this)[i];
00072   #else
00073      s << " " << (*this)[i];
00074   #endif
00075   }
00076 }
00077 
00082 istream& operator>>(const istream& _istr, const dvector& _z)
00083 {
00084   dvector& z = (dvector&)_z;
00085   istream& istr= (istream&) _istr;
00086   z.read_from(istr);
00087 
00088   return istr;
00089 }
00090 
00095 void dvector::read_from(const istream& _s)
00096 {
00097   istream& s= (istream&) _s;
00098   for (int i=indexmin(); i <= indexmax(); i++)
00099   {
00100      s >> elem(i);
00101   }
00102 }
00103 
00104