1
/*! \defgroup IWL libiwl: I/O Library for Integrals with Labels */
9
#include <libpsio/psio.h>
15
** \param Buf Buffer to be closed
16
** \param keep Do not delete if keep==1
18
** Close a Integrals With Labels Buffer
21
void iwl_buf_close(struct iwlbuf *Buf, int keep)
24
psio_close(Buf->itap, keep ? 1 : 0);