9
#include <libpsio/psio.hpp>
11
#include <libchkpt/chkpt.h>
13
#include <libchkpt/chkpt.hpp>
17
double Chkpt::rd_emp2()
21
keyword = build_keyword("MP2 Energy");
24
psio->read_entry(PSIF_CHKPT, keyword, (char*)&energy, sizeof(double));
26
// Return the value to the user
30
void Chkpt::wt_emp2(double emp2)
33
keyword = build_keyword("MP2 Energy");
35
psio->write_entry(PSIF_CHKPT, keyword, (char*)&emp2, sizeof(double));
43
** chkpt_rd_emp2(): Reads in the MP2 contribution to total energy.
45
** takes no arguments.
47
** returns: double emp2 the MP2 energy.
50
double chkpt_rd_emp2(void)
53
emp2 = _default_chkpt_lib_->rd_emp2();
58
** chkpt_wt_emp2(): Writes out the MP2 contribution to total energy.
60
** \param emp2 = the MP2 energy.
65
void chkpt_wt_emp2(double emp2)
67
_default_chkpt_lib_->wt_emp2(emp2);