ginac/exprseq_suppl.cpp

   1 /** @file exprseq_suppl.cpp
   2  *
   3  *  Supplement to exprseq.cpp, contains the parts which were
   4  *  not automatically generated. */
   5
   6 #include "ginac.h"
   7
   8 bool exprseq::info(unsigned inf) const
   9 {
  10     if (inf==info_flags::exprseq) return 1;
  11     return basic::info(inf);
  12 }
  13
  14 ex & exprseq::let_op(int const i)
  15 {
  16     ASSERT(i>=0);
  17     ASSERT(i<nops());
  18
  19     return seq[i];
  20 }
  21