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
00041
00042 class SymmOneBodyIntIter : public OneBodyIntIter {
00043 protected:
00044 Ref<PetiteList> pl;
00045
00046 public:
00047 SymmOneBodyIntIter(const Ref<OneBodyInt>&, const Ref<PetiteList>&);
00048 ~SymmOneBodyIntIter();
00049
00050 void start(int ist=0, int jst=0, int ien=0, int jen=0);
00051 void next();
00052
00053 double scale() const;
00054 };
00055
00056 class SymmTwoBodyIntIter : public TwoBodyIntIter {
00057 protected:
00058 Ref<PetiteList> pl;
00059
00060 public:
00061 SymmTwoBodyIntIter(const Ref<TwoBodyInt>&, const Ref<PetiteList>&);
00062 ~SymmTwoBodyIntIter();
00063
00064 void start();
00065 void next();
00066
00067 double scale() const;
00068 };
00069
00070 #endif
00071
00072
00073
00074
00075