9
#include <libpsio/psio.hpp>
11
#include <libchkpt/chkpt.h>
13
#include <libchkpt/chkpt.hpp>
17
int *Chkpt::rd_snumg(void)
22
keyword = build_keyword("Primitives per shell");
25
snumg = array<int>(nshell);
27
psio->read_entry(PSIF_CHKPT, keyword, (char *) snumg, nshell*sizeof(int));
33
void Chkpt::wt_snumg(int *snumg)
37
keyword = build_keyword("Primitives per shell");
41
psio->write_entry(PSIF_CHKPT, keyword, (char *) snumg, nshell*sizeof(int));
50
** Reads in array of the numbers of the primitive Gaussians in shells.
52
** takes no arguments.
55
** snumg = Reads in array of the numbers of the primitive Gaussians
60
int *chkpt_rd_snumg(void)
62
return _default_chkpt_lib_->rd_snumg();
68
** Writes out array of the numbers of the primitive Gaussians in shells.
70
** \param snumg = array of the numbers of the primitive Gaussians
75
void chkpt_wt_snumg(int *snumg)
77
_default_chkpt_lib_->wt_snumg(snumg);