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)
24
key = chkpt_build_keyword("Num. unique shells");
25
psio_read_entry(PSIF_CHKPT, key, (char *) &nunique, sizeof(int));
32
** void chkpt_wt_num_unique_shell(int)
33
** Writes out the number of symmetry unique shells.
35
** \param nunique = number of symmetry unique shells.
41
void chkpt_wt_num_unique_shell(int nunique)
44
key = chkpt_build_keyword("Num. unique shells");
45
psio_write_entry(PSIF_CHKPT, key, (char *) &nunique, sizeof(int));