// // mbpt.h // // Copyright (C) 1996 Limit Point Systems, Inc. // // Author: Ida Nielsen // Maintainer: LPS // // This file is part of the SC Toolkit. // // The SC Toolkit is free software; you can redistribute it and/or modify // it under the terms of the GNU Library General Public License as published by // the Free Software Foundation; either version 2, or (at your option) // any later version. // // The SC Toolkit is distributed in the hope that it will be useful, // but WITHOUT ANY WARRANTY; without even the implied warranty of // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the // GNU Library General Public License for more details. // // You should have received a copy of the GNU Library General Public License // along with the SC Toolkit; see the file COPYING.LIB. If not, write to // the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. // // The U.S. Government is granted a limited license as per AL 91-7. // #ifndef _chemistry_qc_mbpt_mbpt_h #define _chemistry_qc_mbpt_mbpt_h #ifdef __GNUC__ #pragma interface #endif #include #include #include #include #include #include namespace sc { // ////////////////////////////////////////////////////////////////////////// /** The MBPT2 class implements several second-order perturbation theory methods. */ class MBPT2: public Wavefunction { protected: #define ref_to_mp2_acc 100.0 Ref reference_; Ref mem; int nfzc, nfzv; size_t mem_alloc; double cphf_epsilon_; int eliminate_in_gmat_; const double *intbuf_; Ref tbint_; Ref *tbints_; Ref *tbintder_; int nbasis; int noso; Ref msg_; int nvir, nocc, nsocc; Ref thr_; // use a dynamic load balance algorithm if possible if true // (will not work if messagegrp not thread safe and // memorygrp needs catchup to work) int dynamic_; // control how frequently progress is printed double print_percent_; // The maximum number of orbitals in a pass. int max_norb_; // the irreps of the orbitals and the offset within the irrep int *symorb_irrep_; int *symorb_num_; char *method_; char *algorithm_; // if do_d1_ is true, D1(MP2) will be computed even if the gradient is not int do_d1_; // if do_d2_ is true, D2(MP1) will be computed int do_d2_; int nfuncmax; double hf_energy_; RefSCVector hf_gradient_; double restart_ecorr_; int restart_orbital_v1_; int restart_orbital_memgrp_; protected: void init_variables(); // implement the Compute::compute() function void compute(); // Fill in the eigenvectors and eigenvalues (Guest & Saunders general // form is used for the Fock matrix in the open shell case). void eigen(RefDiagSCMatrix &vals, RefSCMatrix &vecs, RefDiagSCMatrix &occs); // calculate the opt2 energy using algorithm v1 void compute_hsos_v1(); // calculate the opt2 energy using algorithm v2 distsize_t compute_v2_memory(int ni, int nfuncmax, int nbfme, int nshell, int ndocc, int nsocc, int nvir, int nproc); void compute_hsos_v2(); // calculate the opt2 energy using the load balanced version of v2 void compute_hsos_v2_lb(); // calculate the closed shell mp2 energy and gradient int compute_cs_batchsize(size_t mem_static, int nocc_act); // distsize_t is used to allow memory requirements to be // estimated by starting the calculation on a single processor distsize_t compute_cs_dynamic_memory(int ni, int nocc_act); int make_cs_gmat(RefSymmSCMatrix& Gmat, double *DPmat); int make_cs_gmat_new(RefSymmSCMatrix& Gmat, const RefSymmSCMatrix& DPmat); void form_max_dens(double *DPmat, signed char *maxp); int init_cs_gmat(); void done_cs_gmat(); int make_g_d_nor(RefSymmSCMatrix& Gmat, double *DPmat, const double *mgdbuff); void cs_cphf(double **scf_vector, double *Laj, double *eigval, RefSCMatrix& P2aj); void s2pdm_contrib(const double *intderbuf, double *PHF, double *P2AO, double **hf_ginter, double **ginter); void hcore_cs_grad(double *PHF, double *PMP2, double **hf_ginter, double **ginter); void overlap_cs_grad(double *WHF, double *WMP2, double **hf_ginter, double **ginter); void compute_cs_grad(); public: MBPT2(StateIn&); /** The KeyVal constructor.
reference
This gives the reference wavefunction. It must be an object of type CLSCF for closed-shell molecules and HSOSSCF for open-shell molecules. The is no default.
nfzc
The number of frozen core orbitals. The default is 0. If no atoms have an atomic number greater than 30, then the number of orbitals to be frozen can be automatically determined by specifying nfzc = auto.
nfzv
The number of frozen virtual orbitals. The default is 0.
memory
The amount of memory, in bytes, that each processor may use.
method
This gives a string that must take on one of the values below. The default is mp for closed-shell systems and zapt for open-shell systems.
mp
Use Møller-Plesset perturbation theory. This is only valid for closed-shell systems. Energies and gradients can be computed with this method.
opt1
Use the OPT1 variant of open-shell perturbation theory. Only energies can be computed for open-shell systems.
opt2
Use the OPT2 variant of open-shell perturbation theory. Only energies can be computed for open-shell systems.
zapt
Use the ZAPT variant of open-shell perturbation theory. Only energies can be computed for open-shell systems.
algorithm
This gives a string that must take on one of the values given below. The default is memgrp for closed-shell systems. For open-shell systems v1 is used for a small number of processors and v2 is used otherwise.
memgrp
Use the distributed shared memory algorithm (which uses a MemoryGrp object). This is only valid for MP2 energies and gradients.
v1
Use algorithm V1. Only energies can be computed. The maximum number of processors that can be utilized is the number of virtual orbitals. This algorithm computes few integrals than the others, but has higher communication requirements.
v2
Use algorithm V2. Only energies can be computed. The maximum number of processors that can be utilized is the number of shells.
v2lb
Use a modified V2 algorithm that may compute more two electron integrals, but may get better load balance on the \f$O(n_\mathrm{basis}^5)\f$ part of the calculation. Only energies can be computed. This is recommended only for computations involving large molecules (where the transformation is dominant) on very many processors (approaching the number of shells).
The v1 and v2 algorithms are discussed in Ida M. B. Nielsen and Edward T. Seidl, J. Comp. Chem. 16, 1301 (1995). The memgrp algorithm is discussed in Ida M. B. Nielsen, Chem. Phys. Lett. 255, 210 (1996).
memorygrp
A MemoryGrp object is used by the memgrp algorithm. If this is not given the program will try to find an appropriate default.
*/ MBPT2(const Ref&); ~MBPT2(); void save_data_state(StateOut&); Ref ref() { return reference_; } double ref_energy(); double corr_energy(); RefSCVector ref_energy_gradient(); RefSCVector corr_energy_gradient(); int nelectron(); int nfzcore() const { return nfzc; }; int nfzvirt() const { return nfzv; }; RefSymmSCMatrix density(); int spin_polarized(); int gradient_implemented() const; int value_implemented() const; void symmetry_changed(); // override compute's obsolete so we can call the reference's obsolete void obsolete(); void print(std::ostream&o=ExEnv::out0()) const; }; } #endif // Local Variables: // mode: c++ // c-file-style: "CLJ" // End: