8
#include <libpsio/psio.hpp>
10
#include <libchkpt/chkpt.h>
12
#include <libchkpt/chkpt.hpp>
16
int* Chkpt::rd_atom_dummy(void)
21
keyword = build_keyword("Dummy atom flags");
23
num_allatoms = rd_nallatom();
24
atom_dummy = (int *) malloc(sizeof(int)*num_allatoms);
26
psio->read_entry(PSIF_CHKPT, keyword, (char *) atom_dummy,
27
num_allatoms*sizeof(int));
33
void Chkpt::wt_atom_dummy(int* atom_dummy)
35
int num_allatoms = rd_nallatom();
37
keyword = build_keyword("Dummy atom flags");
39
psio->write_entry(PSIF_CHKPT, keyword, (char *) atom_dummy,
40
num_allatoms*sizeof(int));
47
** chkpt_rd_atom_dummy()
49
** Reads the array of flags which indicate whether the atom in full_geom
54
** Returns: atom_dummy = array of integers nallatom long.
57
int* chkpt_rd_atom_dummy(void)
59
return _default_chkpt_lib_->rd_atom_dummy();
64
** chkpt_wt_atom_dummy()
66
** Writes the array of flags which indicate whether the atom in full_geom
69
** \param atom_dummy = array of integers nallatom long.
74
void chkpt_wt_atom_dummy(int* atom_dummy)
76
_default_chkpt_lib_->wt_atom_dummy(atom_dummy);