2
\file num_unique_shell.c
9
#include <libpsio/psio.h>
12
** int chkpt_rd_num_unique_shell()
13
** Reads in the number of symmetry unique shells.
15
** returns: nunique = number of symmetry unique shells.
19
int chkpt_rd_num_unique_shell(void)
23
keyword = chkpt_build_keyword("Num. unique shells");
25
psio_read_entry(PSIF_CHKPT, keyword, (char *) &nunique, sizeof(int));
33
** void chkpt_wt_num_unique_shell(int)
34
** Writes out the number of symmetry unique shells.
36
** \param nunique = number of symmetry unique shells.
42
void chkpt_wt_num_unique_shell(int nunique)
45
keyword = chkpt_build_keyword("Num. unique shells");
47
psio_write_entry(PSIF_CHKPT, keyword, (char *) &nunique, sizeof(int));