9
#include <libpsio/psio.h>
12
** int chkpt_rd_phase_check()
14
** Reads a boolean flag indicating whether the SCF code was able to correct
15
** the phases of the molecular orbitals relative to the guess orbitals. This
16
** is important for restarting correlated wfn calculations from earlier vectors.
20
** returns: pcheck = Phase check flag (1 if phase has been checked, else 0)
24
int chkpt_rd_phase_check(void)
28
keyword = chkpt_build_keyword("Phase check");
30
psio_read_entry(PSIF_CHKPT, keyword, (char *) &pcheck, sizeof(int));
38
** void chkpt_wt_phase_check(int)
40
** Reads a boolean flag indicating whether the SCF code was able to correct
41
** the phases of the molecular orbitals relative to the guess orbitals. This
42
** is important for restarting correlated wfn calculations from earlier vectors.
44
** \param pcheck = Phase check flag (1 if phase has been checked, else 0)
51
void chkpt_wt_phase_check(int pcheck)
54
keyword = chkpt_build_keyword("Phase check");
56
psio_write_entry(PSIF_CHKPT, keyword, (char *) &pcheck, sizeof(int));