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
00029 #ifndef _chemistry_qc_mbpt_csgrade12_h
00030 #define _chemistry_qc_mbpt_csgrade12_h
00031
00032 #ifdef __GNUC__
00033 #pragma interface
00034 #endif
00035
00036 #include <util/misc/regtime.h>
00037 #include <util/group/memory.h>
00038 #include <util/group/thread.h>
00039 #include <chemistry/qc/basis/integral.h>
00040
00041 #define PRINT_BIGGEST_INTS 0
00042
00043 class CSGradErep12Qtr: public Thread {
00044 private:
00045 Ref<MessageGrp> msg;
00046 Ref<MemoryGrp> mem;
00047 Ref<TwoBodyInt> tbint;
00048 Ref<GaussianBasisSet> basis;
00049 Ref<ThreadLock> lock;
00050 Ref<RegionTimer> timer;
00051 int mythread;
00052 int nthread;
00053 int ni;
00054 int nocc;
00055 int i_offset;
00056 int aoint_computed;
00057 int me;
00058 int nproc;
00059 double tol;
00060 double **scf_vector;
00061 int debug;
00062 int dynamic_;
00063 public:
00064 CSGradErep12Qtr(int mythread_a, int nthread_a,
00065 int me_a, int nproc_a,
00066 const Ref<MemoryGrp> &mem_a,
00067 const Ref<MessageGrp> &msg_a,
00068 const Ref<ThreadLock> &lock_a,
00069 const Ref<GaussianBasisSet> &basis_a,
00070 const Ref<TwoBodyInt> &tbint_a,
00071 int nocc_a,
00072 double **scf_vector_a,
00073 double tol_a, int debug_a,
00074 int dynamic_a);
00075 ~CSGradErep12Qtr();
00076
00077 void set_i_offset(int ioff) { i_offset = ioff; }
00078 void set_ni(int nivalue) { ni = nivalue; }
00079
00080 void run();
00081 };
00082
00083 #endif
00084
00085
00086
00087
00088
00089
00090