3
#include <libdpd/dpd.h>
10
psio_close(EOM_TMP,0);
11
psio_close(EOM_TMP0,0);
12
psio_close(EOM_TMP1,0);
17
psio_open(CC_TMP,PSIO_OPEN_NEW);
18
psio_open(EOM_TMP,PSIO_OPEN_NEW);
19
psio_open(EOM_TMP0,PSIO_OPEN_NEW);
20
psio_open(EOM_TMP1,PSIO_OPEN_NEW);
21
psio_open(CC_GLG,PSIO_OPEN_NEW);
22
psio_open(CC_GL,PSIO_OPEN_NEW);
23
psio_open(CC_GR,PSIO_OPEN_NEW);
25
if((params.ref==0) || (params.ref==1)) {
26
free_block(moinfo.ltd);
27
free_block(moinfo.rtd);
29
else if(params.ref==2) {
30
free_block(moinfo.ltd_a);
31
free_block(moinfo.ltd_b);
32
free_block(moinfo.rtd_a);
33
free_block(moinfo.rtd_b);