#include CPS_START_NAMESPACE //-------------------------------------------------------------------- // CVS keywords // // $Author: zs $ // $Date: 2004/08/18 11:57:39 $ // $Header: /space/cvs/cps/cps++/src/alg/alg_s_spect/aots_s.C,v 1.6 2004/08/18 11:57:39 zs Exp $ // $Id: aots_s.C,v 1.6 2004/08/18 11:57:39 zs Exp $ // $Name: v5_0_16_hantao_io_test_v7 $ // $Locker: $ // $RCSfile: aots_s.C,v $ // $Revision: 1.6 $ // $Source: /space/cvs/cps/cps++/src/alg/alg_s_spect/aots_s.C,v $ // $State: Exp $ // //-------------------------------------------------------------------- // aots_s.C CPS_END_NAMESPACE #include #include #include CPS_START_NAMESPACE //----------------------------------------------------------------- // static member initialization //----------------------------------------------------------------- char Aots::cname[] = "Aots"; //----------------------------------------------------------------- // CTOR //----------------------------------------------------------------- Aots::Aots(int s, int e, int stride) : start(s), end(e), step(stride), current (s) { char *fname = "Aots(int, int, int)"; VRB.Func(cname, fname); if ( (step <= 0) || (start < 0) || (end < 0) || (start > end) || (start >= GJP.TnodeSites() * GJP.Tnodes()) || (end >= GJP.TnodeSites() * GJP.Tnodes())) ERR.General(cname, fname, "Invalid Aots Parameters\n"); } CPS_END_NAMESPACE