epnio.h
1 /***************************************************************************
2  *
3  * Copyright (C) 2004 by Willem van Straten
4  * Licensed under the Academic Free License version 2.1
5  *
6  ***************************************************************************/
7 /*
8  *
9  * epnio.h - defines a C interface to rwepn
10  *
11  * The structs defined in this header file must be a binary match to
12  * the common blocks defined in epnhdr.inc. This includes:
13  *
14  * #define EPN_MAXBLK mmm // where: parameter(maxblk=mmm) in epnhdr.inc
15  *
16  * #define EPN_MAXBIN nnn // where: parameter(maxbin=nnn) in epnhdr.inc
17  *
18  * Willem van Straten - July 2004
19  *
20  */
21 
22 #ifndef __EPN_IO_H
23 #define __EPN_IO_H
24 
25 #ifdef __cplusplus
26 extern "C" {
27 #endif
28 
29  /* First line of main header */
30  typedef struct {
31  char version[8];
32  char history[68];
33  int counter;
34  } epn_header_line1;
35 
36  /* Second line of main header */
37  typedef struct {
38  char jname[12];
39  char cname[12];
40  double pbar;
41  double dm;
42  double rm;
43  char catref[6];
44  char bibref[8];
45  } epn_header_line2;
46 
47  /* Third line of main header */
48  typedef struct {
49  int rah;
50  int ram;
51  int ded;
52  int dem;
53  float ras;
54  float des;
55  char telname[8];
56  double epoch;
57  double opos;
58  char paflag;
59  char timflag;
60  } epn_header_line3;
61 
62  /* Fourth line of main header */
63  typedef struct {
64  double xtel, ytel, ztel;
65  } epn_header_line4;
66 
67  /* Fifth line of main header */
68  typedef struct {
69  int cdy, cdm, cdd;
70  int scanno, subscan;
71  int npol, nfreq, nbin;
72  double tbin;
73  int nint, ncal, lcal;
74  float fcal;
75  double tres;
76  char fluxflag;
77  } epn_header_line5;
78 
79  /* Maximum blocks writing to sub-header... */
80  #define EPN_MAXBLK 16
81 
82  /* First line of block sub-header */
83  typedef struct {
84  char idfield[EPN_MAXBLK][8];
85  int nband[EPN_MAXBLK];
86  int navg[EPN_MAXBLK];
87  double f0[EPN_MAXBLK];
88  char f0u[EPN_MAXBLK][8];
89  double df[EPN_MAXBLK];
90  char dfu[EPN_MAXBLK][8];
91  double tstart[EPN_MAXBLK];
92  } epn_block_subheader_line1;
93 
94  /* Second line of block sub-header (required to scale/descale data) */
95  typedef struct {
96  double offset[EPN_MAXBLK];
97  double scale[EPN_MAXBLK];
98  double rms[EPN_MAXBLK];
99  double papp[EPN_MAXBLK];
100  } epn_block_subheader_line2;
101 
102  /* Maximum number of phase bins... */
103  #define EPN_MAXBIN 4096
104 
105  /* Data block */
106  typedef struct {
107  float rawdata[EPN_MAXBLK][EPN_MAXBIN];
108  } epn_data_block;
109 
110  /* C wrapper of the Fortran rwepn function */
111  int crwepn ( const char* filename, int readwri, int recno, int padout,
112  epn_header_line1* line1,
113  epn_header_line2* line2,
114  epn_header_line3* line3,
115  epn_header_line4* line4,
116  epn_header_line5* line5,
117  epn_block_subheader_line1* sub_line1,
118  epn_block_subheader_line2* sub_line2,
119  epn_data_block* data );
120 
121  /* C wrapper of the Fortran nepnrec function */
122  int cnepnrec (const char* filename);
123 
124  void epn_dump (const epn_header_line1* line1,
125  const epn_header_line2* line2,
126  const epn_header_line3* line3,
127  const epn_header_line4* line4,
128  const epn_header_line5* line5);
129 
130 #ifdef __cplusplus
131 }
132 #endif
133 
134 #endif
Generated using doxygen 1.8.17