fortranaffio.h

Go to the documentation of this file.

// include guard
#ifndef TF_FORTRANAFFIO_H_VERSION

#define TF_FORTRANAFFIO_H_VERSION \
  "TF_FORTRANAFFIO_H   V1.2"

#include <aff/array.h>
#include <aff/series.h>
#include <aff/iterator.h>
#include <tfxx/fortranio.h>

namespace tfxx {
  namespace fortranio {

    template<class C>
    void readaff(tfxx::fortranio::FortranBinInput& is, C& s)
    {
      aff::Iterator<C> i(s);
      while (i.valid()) { is >> *i; ++i; }
    }

    template<class T>
    tfxx::fortranio::FortranBinInput& 
    operator >>(tfxx::fortranio::FortranBinInput& is, aff::Series<T>& s)
    {
      readaff(is, s);
      return(is);
    }

    template<class T>
    tfxx::fortranio::FortranBinInput& 
    operator >>(tfxx::fortranio::FortranBinInput& is, aff::Array<T>& s)
    {
      readaff(is, s);
      return(is);
    }

  } // namespace fortranio
} // namespace tfxx

#endif // TF_FORTRANAFFIO_H_VERSION (includeguard)

/* ----- END OF fortranaffio.h ----- */