operator>>() [4/5]

template<class T , int N>

tfxx::fortranio::FortranBinInput& tfxx::fortranio::operator>>	(	tfxx::fortranio::FortranBinInput &	fi,
		blitz::Array< T, N > &	a
	)

Input operator template for class FortranBinInput and blitz.

The compiler will consider namespace tfxx::fortranio due to the involved FortranBinInput object.

Todo:

still far from finished

Definition at line 149 of file blitzfortranio.h.

References tfxx::fortranio::FortranBinInput::get(), tfxx::fortranio::FortranBinInput::match_magic(), and TFXX_assert.

{
  TFXX_assert((fi.match_magic(blitz_magic<T,N>::magic)),
    "ERROR (blitz array operator>>): input has no matching magic number!");
  int n;
  fi.get(n);
  TFXX_assert((N==n), "ERROR (blitz array operator>>): illegal rank!");
  blitz::TinyVector<int, N> lbound, extent;
  for (int i=0; i<N; i++) fi.get(lbound[i]);
  for (int i=0; i<N; i++) fi.get(extent[i]);
  blitz::Array<T, N> result(lbound, extent, blitz::fortranArray);
  for (blitz::Array<T, N>::iterator i=result.begin(); i!=result.end(); ++i)
  { fi.get(*i); }
  a.reference(result);
  return(fi);
}

Here is the call graph for this function: