9
#include <libpsio/psio.h>
13
** Reads the reference type from the flag in checkpoint
14
** 0 = RHF | 1 = UHF | 2 = ROHF | 3 = TCSCF
16
** returns: refnum = number indicating the reference.
20
int chkpt_rd_ref(void)
24
keyword = chkpt_build_keyword("Reference");
26
psio_read_entry(PSIF_CHKPT, keyword, (char *) &refnum, sizeof(int) );
34
** void chkpt_wt_ref(int)
35
** Writes out the reference type from the flag in checkpoint
36
** 0 = RHF | 1 = UHF | 2 = ROHF | 3 = TCSCF
38
** \param refnum = number indicating the reference.
42
void chkpt_wt_ref(int refnum)
45
keyword = chkpt_build_keyword("Reference");
47
psio_write_entry(PSIF_CHKPT, keyword, (char *) &refnum, sizeof(int));