BIE Overview Quick Start Theoretical overview Available methods Parallel chains Computation engine Command Line Interface Graphical User Interface Assigning Output Visualization tool Data handling Software technology Parallel debugging Results to date Recent developments Links User guide Future features Project goals Project Team Copyright and license

/home/weinberg/src/BIE/include/clivector_manip.h // This is really -*- C++ -*- #ifndef CLIVECTOR_MANIP_H #define CLIVECTOR_MANIP_H #include <typeinfo> #include <clivector.h> using namespace std; namespace BIE { //+ CLICLASS vmanip class vmanip : public Serializable { private: /* Pointers to all possible clivector types; this is a poor way of getting around the lack of a base class */ vector<double>* D; vector<int>* I; vector<string>* S; vector<Tessellation*>* T; string id; // Type name for error output // Template to check for a valid index value template <class T> bool chk(const vector<T>* t, int n) { if (n<0 || n>=static_cast<int>(t->size())) { cerr << typeid(*t).name() << " index=" << n << " out of bounds [0, " << t->size()-1 << "]" << endl; return false; } return true; } // Template to set vector element values template <class T> void sv(vector<T>* t, T& v, int n) { if (chk(t, n)) (*t)[n] = v; } // Template to print a single element value template <class T> void pv(const vector<T>* t, int n) { if (chk(t, n)) cout << (*t)[n] << endl; } // Template to print all elements values template <class T> void pa(const vector<T>* t) { if (t->size()) { for (unsigned i=0; i<t->size(); i++) cout << "v[" << i << "]=" << (*t)[i] << endl; } else { cout << "empty" << endl; } } void wrong_type(string tp) { cerr << "This vector is " << id << "-valued, not a " << tp << endl; } public: //+ CLICONSTR vmanip() { D=0; I=0; S=0; T=0; } //+ CLICONSTR clivectord* vmanip(clivectord* v) { D=v; I=0; S=0; T=0; id="double"; } //+ CLICONSTR clivectori* vmanip(clivectori* v) { D=0; I=v; S=0; T=0; id="int"; } //+ CLICONSTR clivectors* vmanip(clivectors* v) { D=0; I=0; S=v; T=0; id="string"; } //+ CLICONSTR clivectortess* vmanip(clivectortess* v) { D=0; I=0; S=0; T=v; id="Tessellation*"; } //+ CLIMETHOD void setval int double void setval(int n, double v) { if (D) sv<double>(D, v, n); else wrong_type("double"); } //+ CLIMETHOD void setval int int void setval(int n, int v) { if (I) sv<int>(I, v, n); else wrong_type("int"); } //+ CLIMETHOD void setval int string void setval(int n, string v) { if (S) sv<string>(S, v, n); else wrong_type("string"); } //+ CLIMETHOD void setval int Tessellation* void setval(int n, Tessellation* v) { if (T) sv<Tessellation*>(T, v, n); else wrong_type("Tessellation*"); } //+ CLIMETHOD void showval int void showval(int n) { if (D) pv<double> (D, n); if (I) pv<int> (I, n); if (S) pv<string> (S, n); if (T) pv<Tessellation*>(T, n); } //+ CLIMETHOD void showall void showall() { if (D) pa<double> (D); if (I) pa<int> (I); if (S) pa<string> (S); if (T) pa<Tessellation*>(T); } private: friend class boost::serialization::access; template<class Archive> void serialize(Archive & ar, const unsigned int version) { try { ar & BOOST_SERIALIZATION_BASE_OBJECT_NVP(Serializable); BIE_CATCH_BOOST_SERIALIZATION_EXCEPTION; } try { ar & BOOST_SERIALIZATION_NVP(id); BIE_CATCH_BOOST_SERIALIZATION_EXCEPTION; } try { ar & BOOST_SERIALIZATION_NVP(D); BIE_CATCH_BOOST_SERIALIZATION_EXCEPTION; } try { ar & BOOST_SERIALIZATION_NVP(I); BIE_CATCH_BOOST_SERIALIZATION_EXCEPTION; } try { ar & BOOST_SERIALIZATION_NVP(S); BIE_CATCH_BOOST_SERIALIZATION_EXCEPTION; } try { ar & BOOST_SERIALIZATION_NVP(T); BIE_CATCH_BOOST_SERIALIZATION_EXCEPTION; } } }; } // END namespace BIE BIE_CLASS_TYPE_INFO(BIE::vmanip) #endif