complexio.h

Go to the documentation of this file.

// include guard
#ifndef TF_COMPLEXIO_H_VERSION

#define TF_COMPLEXIO_H_VERSION \
  "TF_COMPLEXIO_H   V1.1"

#include<complex>
#include<tfxx/fortranio.h>

namespace tfxx {

  namespace fortranio {


    template<typename T>
      tfxx::fortranio::FortranBinOutput& 
        operator << (tfxx::fortranio::FortranBinOutput& fo, 
                     const std::complex<T>& value)
    {
      fo.put(value.real());
      fo.put(value.imag());
      return(fo);
    }

    template<typename T>
      tfxx::fortranio::FortranBinInput& 
        operator >> (tfxx::fortranio::FortranBinInput& fi, 
                     std::complex<T>& value)
    {
      T rvalue,ivalue;
      fi.get(rvalue);
      fi.get(ivalue);
      value=std::complex<T>(rvalue, ivalue);
      return(fi);
    }

  } // namespace fortranio

}

#endif // TF_COMPLEXIO_H_VERSION (includeguard)

/* ----- END OF complexio.h ----- */