00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00025
00026
00027
00028 #ifndef _chemistry_qc_integral_symmint_h
00029 #define _chemistry_qc_integral_symmint_h
00030
00031 #ifdef __GNUC__
00032 #pragma interface
00033 #endif
00034
00035 #include <util/state/state.h>
00036 #include <chemistry/qc/basis/obint.h>
00037 #include <chemistry/qc/basis/tbint.h>
00038 #include <chemistry/qc/basis/petite.h>
00039
00040 namespace sc {
00041
00042
00043
00044 class SymmOneBodyIntIter : public OneBodyIntIter {
00045 protected:
00046 Ref<PetiteList> pl;
00047
00048 public:
00049 SymmOneBodyIntIter(const Ref<OneBodyInt>&, const Ref<PetiteList>&);
00050 ~SymmOneBodyIntIter();
00051
00052 void start(int ist=0, int jst=0, int ien=0, int jen=0);
00053 void next();
00054
00055 double scale() const;
00056 };
00057
00058 class SymmTwoBodyIntIter : public TwoBodyIntIter {
00059 protected:
00060 Ref<PetiteList> pl;
00061
00062 public:
00063 SymmTwoBodyIntIter(const Ref<TwoBodyInt>&, const Ref<PetiteList>&);
00064 ~SymmTwoBodyIntIter();
00065
00066 void start();
00067 void next();
00068
00069 double scale() const;
00070 };
00071
00072 }
00073
00074 #endif
00075
00076
00077
00078
00079