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 #ifdef __GNUG__
00029 #pragma interface
00030 #endif
00031
00032 #ifndef _chemistry_qc_mbptr12_vxbevalabsa_h
00033 #define _chemistry_qc_mbptr12_vxbevalabsa_h
00034
00035 #include <util/ref/ref.h>
00036 #include <chemistry/qc/mbptr12/vxb_eval_info.h>
00037
00038 namespace sc {
00039
00040
00044 class R12IntEval_abs_A : virtual public SavableState {
00045
00046 Ref<R12IntEvalInfo> r12info_;
00047
00048 bool evaluated_;
00049 int current_orbital_;
00050 int restart_orbital_;
00051
00052
00053 int compute_transform_batchsize_(size_t mem_alloc, size_t mem_static, int nocc_act, const int num_te_types);
00054 distsize_t compute_transform_dynamic_memory_(int ni, int nocc_act, const int num_te_types);
00055
00056 public:
00057 R12IntEval_abs_A(StateIn&);
00058 R12IntEval_abs_A(Ref<R12IntEvalInfo>&);
00059 ~R12IntEval_abs_A();
00060
00061 void save_data_state(StateOut&);
00062 void obsolete();
00063
00064 void compute(RefSCMatrix& Vaa,
00065 RefSCMatrix& Xaa,
00066 RefSCMatrix& Baa,
00067 RefSCMatrix& Vab,
00068 RefSCMatrix& Xab,
00069 RefSCMatrix& Bab);
00070
00071 Ref<R12IntEvalInfo> r12info() const;
00072 };
00073
00074 }
00075
00076 #endif
00077
00078
00079
00080
00081
00082
00083