8
#include <libpsio/psio.hpp>
10
#include <libchkpt/chkpt.h>
12
#include <libchkpt/chkpt.hpp>
16
int *Chkpt::rd_us2s(void)
19
int num_unique_shells;
21
keyword = build_keyword("Unique shell -> full shell map");
23
num_unique_shells = rd_num_unique_shell();
24
us2s = array<int>(num_unique_shells);
26
psio->read_entry(PSIF_CHKPT, keyword, (char *) us2s, num_unique_shells*sizeof(int));
32
void Chkpt::wt_us2s(int *us2s)
34
int num_unique_shells;
36
keyword = build_keyword("Unique shell -> full shell map");
38
num_unique_shells = rd_num_unique_shell();
40
psio->write_entry(PSIF_CHKPT, keyword, (char *) us2s, num_unique_shells*sizeof(int));
47
** int *chkpt_rd_us2s()
48
** Read in a mapping array betwen unique shell and
51
** returns: us2s = Read in an array num_unique_shell
55
int *chkpt_rd_us2s(void)
57
return _default_chkpt_lib_->rd_us2s();
61
** void chkpt_wt_us2s(int *)
62
** Writes out a mapping array betwen unique shell and
65
** \param us2s = An array num_unique_shell
71
void chkpt_wt_us2s(int *us2s)
73
_default_chkpt_lib_->wt_us2s(us2s);