9
#include <libpsio/psio.hpp>
11
#include <libchkpt/chkpt.h>
13
#include <libchkpt/chkpt.hpp>
17
int *Chkpt::rd_clsdpi(void)
22
keyword = build_keyword("Closed shells per irrep");
24
nirreps = rd_nirreps();
25
clsdpi = array<int>(nirreps);
27
psio->read_entry(PSIF_CHKPT, keyword, (char *) clsdpi,
34
void Chkpt::wt_clsdpi(int *clsdpi)
38
keyword = build_keyword("Closed shells per irrep");
40
nirreps = rd_nirreps();
42
psio->write_entry(PSIF_CHKPT, keyword, (char *) clsdpi,
50
** chkpt_rd_clsdpi(): Reads in the number of closed-shell orbitals in each
56
** int *clsdpi, an array which has an element for each irrep of the
57
** point group of the molecule (n.b. not just the ones
58
** with a non-zero number of basis functions). each
59
** element contains the number of closed-shell orbitals for
63
int *chkpt_rd_clsdpi(void)
66
clsdpi = _default_chkpt_lib_->rd_clsdpi();
72
** chkpt_wt_clsdpi(): Writes the number of closed-shell orbitals in each irrep.
74
** \param clsdpi = an array which has an element for each irrep of the
75
** point group of the molecule (n.b. not just the ones
76
** with a non-zero number of basis functions). each
77
** element contains the number of closed-shell orbitals for
83
void chkpt_wt_clsdpi(int *clsdpi)
85
_default_chkpt_lib_->wt_clsdpi(clsdpi);