34 #if !defined(MIR_MIRIAD_H)
44 #include <sys/types.h>
51 #ifndef MIRIAD_TYPES_DEFINED
53 #define MIRIAD_TYPES_DEFINED 1
67 #if !defined(__cplusplus)
68 # define private static
74 # if defined(__STDC__) || defined(__cplusplus)
83 #if defined(__cplusplus)
93 # error "TRUE should be 1"
101 # error "FALSE should be 0"
117 void hflush_c(
int tno,
int *iostat);
122 void haccess_c(
int tno,
int *ihandle,
Const char *keyword,
Const char *status,
int *iostat);
123 void hmode_c(
int tno,
char *mode);
127 void hio_c(
int ihandle,
int dowrite,
int type,
char *buf, off_t offset,
size_t length,
int *iostat);
128 void hseek_c(
int ihandle, off_t offset);
130 void hreada_c(
int ihandle,
char *line,
size_t length,
int *iostat);
135 #define hreadb_c(item,buf,offset,length,iostat) \
136 hio_c(item,FALSE,H_BYTE,buf,offset,length,iostat)
137 #define hwriteb_c(item,buf,offset,length,iostat) \
138 hio_c(item,TRUE,H_BYTE,buf,offset,length,iostat)
139 #define hreadi_c(item,buf,offset,length,iostat) \
140 hio_c(item,FALSE,H_INT,(char *)(buf),offset,length,iostat)
141 #define hwritei_c(item,buf,offset,length,iostat) \
142 hio_c(item,TRUE,H_INT,(char *)(buf),offset,length,iostat)
143 #define hreadj_c(item,buf,offset,length,iostat) \
144 hio_c(item,FALSE,H_INT2,(char *)(buf),offset,length,iostat)
145 #define hwritej_c(item,buf,offset,length,iostat) \
146 hio_c(item,TRUE,H_INT2,(char *)(buf),offset,length,iostat)
147 #define hreadl_c(item,buf,offset,length,iostat) \
148 hio_c(item,FALSE,H_INT8,(char *)(buf),offset,length,iostat)
149 #define hwritel_c(item,buf,offset,length,iostat) \
150 hio_c(item,TRUE,H_INT8,(char *)(buf),offset,length,iostat)
151 #define hreadr_c(item,buf,offset,length,iostat) \
152 hio_c(item,FALSE,H_REAL,(char *)(buf),offset,length,iostat)
153 #define hwriter_c(item,buf,offset,length,iostat) \
154 hio_c(item,TRUE,H_REAL,(char *)(buf),offset,length,iostat)
155 #define hreadd_c(item,buf,offset,length,iostat) \
156 hio_c(item,FALSE,H_DBLE,(char *)(buf),offset,length,iostat)
157 #define hwrited_c(item,buf,offset,length,iostat) \
158 hio_c(item,TRUE,H_DBLE,(char *)(buf),offset,length,iostat)
159 #define hreadc_c(item,buf,offset,length,iostat) \
160 hio_c(item,FALSE,H_CMPLX,(char *)(buf),offset,length,iostat)
161 #define hwritec_c(item,buf,offset,length,iostat) \
162 hio_c(item,TRUE,H_CMPLX,(char *)(buf),offset,length,iostat)
163 #define hwrite_c(item,type,buf,offset,length,iostat) \
164 hio_c(item,TRUE,type,(char *)(buf),offset,length,iostat)
165 #define hread_c(item,type,buf,offset,length,iostat) \
166 hio_c(item,FALSE,type,(char *)(buf),offset,length,iostat)
193 void dtrans_c (
char *inpath,
char *outpath,
int *iostat);
196 void dopen_c (
int *fd,
char *
name,
char *status, off_t *
size,
int *iostat);
197 void dclose_c (
int fd,
int *iostat);
198 void dread_c (
int fd,
char *buffer, off_t offset,
size_t length,
int *iostat);
199 void dwrite_c (
int fd,
char *buffer, off_t offset,
size_t length,
int *iostat);
200 void dwait_c (
int fd,
int *iostat);
229 void uvselect_c (
int tno,
Const char *
object,
double p1,
double p2,
int datasel);
230 void uvset_c (
int tno,
Const char *
object,
Const char *
type,
int n,
double p1,
double p2,
double p3);
231 void uvread_c (
int tno,
double *preamble,
float *
data,
int *
flags,
int n,
int *nread);
240 #define uvputvra_c(tno,name,value) \
241 uvputvr_c(tno,H_BYTE,name,value,strlen(value))
242 #define uvputvrj_c(tno,name,value,n) \
243 uvputvr_c(tno,H_INT2,name,(char *)(value),n)
244 #define uvputvri_c(tno,name,value,n) \
245 uvputvr_c(tno,H_INT,name,(char *)(value),n)
246 #define uvputvrr_c(tno,name,value,n) \
247 uvputvr_c(tno,H_REAL,name,(char *)(value),n)
248 #define uvputvrd_c(tno,name,value,n) \
249 uvputvr_c(tno,H_DBLE,name,(char *)(value),n)
250 #define uvputvrc_c(tno,name,value,n) \
251 uvputvr_c(tno,H_CMPLX,name,(char *)(value),n)
253 #define uvgetvra_c(tno,name,value,n) \
254 uvgetvr_c(tno,H_BYTE,name,value,n)
255 #define uvgetvrj_c(tno,name,value,n) \
256 uvgetvr_c(tno,H_INT2,name,(char *)(value),n)
257 #define uvgetvri_c(tno,name,value,n) \
258 uvgetvr_c(tno,H_INT,name,(char *)(value),n)
259 #define uvgetvrr_c(tno,name,value,n) \
260 uvgetvr_c(tno,H_REAL,name,(char *)(value),n)
261 #define uvgetvrd_c(tno,name,value,n) \
262 uvgetvr_c(tno,H_DBLE,name,(char *)(value),n)
263 #define uvgetvrc_c(tno,name,value,n) \
264 uvgetvr_c(tno,H_CMPLX,name,(char *)(value),n)
266 #define uvrdvra_c(tno,name,data,def,len) \
267 uvrdvr_c(tno,H_BYTE,name,data,def,len)
268 #define uvrdvri_c(tno,name,data,def) \
269 uvrdvr_c(tno,H_INT,name,(char *)(data),(char *)(def),1)
270 #define uvrdvrr_c(tno,name,data,def) \
271 uvrdvr_c(tno,H_REAL,name,(char *)(data),(char *)(def),1)
272 #define uvrdvrd_c(tno,name,data,def) \
273 uvrdvr_c(tno,H_DBLE,name,(char *)(data),(char *)(def),1)
274 #define uvrdvrc_c(tno,name,data,def) \
275 uvrdvr_c(tno,H_CMPLX,name,(char *)(data),(char *)(def),1)
285 void xymkrd_c (
int tno,
int index,
int *runs,
int n,
int *nread);
294 int mkread_c (
char *handle,
int mode,
int *
flags, off_t offset,
int n,
int nsize);
307 void xyzs2c_c (
int tno,
long subcubenr,
int coords[]);
308 void xyzc2s_c (
int tno,
Const int coords[],
long *subcubenr);
318 void xyzdim_c (
int tno,
int *naxis,
int *dimsub);
337 void scrread_c (
int handle,
float *buffer, off_t offset,
size_t length);
346 void tabfmtc_c (
int tno,
int col,
char *fmt);
347 void tabcmt_c (
int tno,
char *comment);
361 void keyini_c (
int argc,
char *argv[]);
377 void inWrite_c(
const int conid,
const int icocd,
const int traid,
const int inhid,
const int ints,
const int itq,
const float az,
const float el,
const float ha,
const int iut,
const int iref_time,
const double dhrs,
const float vc,
const int ivctype,
const double sx,
const double sy,
const double sz,
const float rinteg,
const int proid,
const int souid,
const int isource,
const int ipos,
const float offx,
const float offy,
const int iofftype,
const int ira,
const int idec,
const double rar,
const double decr,
const float epoch,
const float sflux,
const float size);
378 void blWrite_c(
const int blhid,
const int inhid,
const int isb,
const int ipol,
const float pa,
const int iaq,
const int ibq,
const int icq,
const int ioq,
const int irec,
const int iffc,
const float u,
const float v,
const float w,
const float prbl,
const float angres,
const float vis,
const float coh,
const float sigcoh,
const float csnr,
const float vflux,
const float cnoise,
const double avedhrs,
const float ampav,
const float phaave,
const float tpvar,
const int blsid,
const int itel1,
const int itel2,
const int iblcd,
const float ble,
const float bln,
const float blu,
const int soid);
379 void spWrite_c(
const int sphid,
const int blhid,
const int inhid,
const int igq,
const int ipq,
const int iband,
const int ipstate,
const float tau0,
const double vel,
const float vres,
const int ivtype,
const double fsky,
const float fres,
const float tssb,
const float integ,
const float wt,
const int itaper,
const float snoise,
const int nch,
const int nrec,
const int dataoff,
const int linid,
const int itrans,
const double rfreq,
const int pasid,
const int gaiidamp,
const int gaiidpha,
const int flcid,
const int atmid);
380 void codeWrite_c(
const char *v_name,
const int icode,
const char *code,
const int ncode);
381 void visWrite_c(
const float *re,
const float *im,
const int numvis,
const int startvis,
int *nbytes);
387 #if defined(__cplusplus)
void scrrecsz_c(int handle, size_t recsize)
void wrhdc_c(int tno, Const char *keyword, Const float *value)
void tabopen_c(int *tno, Const char *name, Const char *status, int *ncol, int *nrow)
void uvvarini_c(int tno, int *vhan)
void xyflgwr_c(int tno, int index, Const int *flags)
void uvopen_c(int *tno, Const char *name, Const char *status)
char * mkopen_c(int tno, char *name, char *status)
void xymkwr_c(int tno, int index, Const int *runs, int n)
void tabwcd_c(int tno, int col, double value)
void uvvarcpy_c(int vhan, int tout)
void bugno_c(char s, int n)
void bugrecover_c(void(*cl)(void))
void uvvarset_c(int vhan, Const char *var)
LatticeExprNode mask(const LatticeExprNode &expr)
This function returns the mask of the given expression.
void bug_c(char s, Const char *m)
void dwait_c(int fd, int *iostat)
void uvselect_c(int tno, Const char *object, double p1, double p2, int datasel)
void hdaccess_c(int ihandle, int *iostat)
void keyf_c(Const char *keyword, char *value, Const char *keydef)
TableExprNode array(const TableExprNode &values, const TableExprNodeSet &shape)
Create an array of the given shape and fill it with the values.
void spWrite_c(const int sphid, const int blhid, const int inhid, const int igq, const int ipq, const int iband, const int ipstate, const float tau0, const double vel, const float vres, const int ivtype, const double fsky, const float fres, const float tssb, const float integ, const float wt, const int itaper, const float snoise, const int nch, const int nrec, const int dataoff, const int linid, const int itrans, const double rfreq, const int pasid, const int gaiidamp, const int gaiidpha, const int flcid, const int atmid)
void hdelete_c(int tno, Const char *keyword, int *iostat)
void uvputvr_c(int tno, int type, Const char *var, Const char *data, int n)
void xyflgrd_c(int tno, int index, int *flags)
void blWrite_c(const int blhid, const int inhid, const int isb, const int ipol, const float pa, const int iaq, const int ibq, const int icq, const int ioq, const int irec, const int iffc, const float u, const float v, const float w, const float prbl, const float angres, const float vis, const float coh, const float sigcoh, const float csnr, const float vflux, const float cnoise, const double avedhrs, const float ampav, const float phaave, const float tpvar, const int blsid, const int itel1, const int itel2, const int iblcd, const float ble, const float bln, const float blu, const int soid)
int uvchkshadow_c(int tno, double diameter_meters)
void hflush_c(int tno, int *iostat)
void hmode_c(int tno, char *mode)
void buglabel_c(Const char *name)
void xyzpixrd_c(int tno, long pixelnr, float *data, int *mask)
void tabcmt_c(int tno, char *comment)
void xyzopen_c(int *tno, Const char *name, Const char *status, int *naxis, int axlen[])
void uvrdvr_c(int tno, int type, Const char *var, char *data, const char *def, int n)
void tabwci_c(int tno, int col, int value)
void uvinfo_c(int tno, Const char *object, double *data)
virtual casacore::String type() const
Implements RegionShape::type.
void hisread_c(int tno, char *text, size_t length, int *eof)
off_t htell_c(int ihandle)
void dopen_c(int *fd, char *name, char *status, off_t *size, int *iostat)
void tabgetd_c(int tno, int row, double *data)
ABSTRACT CLASSES Abstract class for colors Any implementation of color should be able to provide a hexadecimal form of the if a human readable name(i.e."black").In many places throughout the plotter
void hisopen_c(int tno, Const char *status)
void xywrite_c(int tno, int index, Const float *array)
void mkeyr_c(Const char *keyword, float value[], Const int nmax, int *n)
void uvflgwr_c(int tno, Const int *flags)
void visWrite_c(const float *re, const float *im, const int numvis, const int startvis, int *nbytes)
void keyl_c(Const char *keyword, int *value, Const int keydef)
void xyzread_c(int tno, Const int coords[], float *data, int *mask, int *ndata)
void rdhdi_c(int tno, Const char *keyword, int *value, int defval)
void tabgeta_c(int tno, int row, char *data)
void hopen_c(int *tno, Const char *name, Const char *status, int *iostat)
void inWrite_c(const int conid, const int icocd, const int traid, const int inhid, const int ints, const int itq, const float az, const float el, const float ha, const int iut, const int iref_time, const double dhrs, const float vc, const int ivctype, const double sx, const double sy, const double sz, const float rinteg, const int proid, const int souid, const int isource, const int ipos, const float offx, const float offy, const int iofftype, const int ira, const int idec, const double rar, const double decr, const float epoch, const float sflux, const float size)
void uvgetvr_c(int tno, int type, Const char *var, char *data, int n)
void xyzplnwr_c(int tno, int planenr, Const float *data, Const int *mask, Const int *ndata)
ABSTRACT CLASSES Deliberately vague to be general enough to allow for many different types of data
void xymkrd_c(int tno, int index, int *runs, int n, int *nread)
void ddelete_c(char *path, int *iostat)
void uvtrack_c(int tno, Const char *name, Const char *switches)
void uvset_c(int tno, Const char *object, Const char *type, int n, double p1, double p2, double p3)
void tabgetr_c(int tno, int row, float *data)
void mkeyi_c(Const char *keyword, int value[], Const int nmax, int *n)
int hdprsnt_c(int tno, Const char *keyword)
void mkflush_c(char *handle)
void tabfmtc_c(int tno, int col, char *fmt)
int keyprsnt_c(Const char *keyword)
void setmaski_c(int *mask, Const int *masks)
void keyi_c(Const char *keyword, int *value, Const int keydef)
void keyput_c(Const char *task, char *string)
LatticeExprNode pa(const LatticeExprNode &left, const LatticeExprNode &right)
This function finds 180/pi*atan2(left,right)/2.
void wrhdi_c(int tno, Const char *keyword, int value)
void uvprobvr_c(int tno, Const char *var, char *type, int *length, int *updated)
void dwrite_c(int fd, char *buffer, off_t offset, size_t length, int *iostat)
void scrclose_c(int handle)
void mkeyd_c(Const char *keyword, double value[], Const int nmax, int *n)
void hwritea_c(int ihandle, Const char *line, size_t length, int *iostat)
void xyzprfwr_c(int tno, int profilenr, Const float *data, Const int *mask, Const int *ndata)
void wrhda_c(int tno, Const char *keyword, Const char *value)
void wrhdl_c(int tno, Const char *keyword, int8 value)
int mkread_c(char *handle, int mode, int *flags, off_t offset, int n, int nsize)
LatticeExprNode length(const LatticeExprNode &expr, const LatticeExprNode &axis)
2-argument function to get the length of an axis.
void hiswrite_c(int tno, Const char *text)
std::string path(const std::string &name)
void xyzpixwr_c(int tno, long pixelnr, Const float *data, Const int *mask)
void uvcopyvr_c(int tin, int tout)
void uvwwrite_c(int tno, Const float *data, Const int *flags, int n)
void dtrans_c(char *inpath, char *outpath, int *iostat)
void xyzwrite_c(int tno, Const int coords[], Const float *data, Const int *mask, Const int *ndata)
void xyzc2s_c(int tno, Const int coords[], long *subcubenr)
void bughandler_c(void(*handler)(char s, Const char *m))
void wrhdd_c(int tno, Const char *keyword, double value)
char * zterm(char *string, int length)
void uvsela_c(int tno, Const char *object, Const char *string, int datasel)
void haccess_c(int tno, int *ihandle, Const char *keyword, Const char *status, int *iostat)
void dread_c(int fd, char *buffer, off_t offset, size_t length, int *iostat)
void xyzsetup_c(int tno, Const char *subcube, Const int blc[], Const int trc[], int viraxlen[], long vircubesize[])
void dclosedir_c(char *contxt)
void hseek_c(int ihandle, off_t offset)
void mkwrite_c(char *handle, int mode, Const int *flags, off_t offset, int n, int nsize)
void dopendir_c(char **contxt, char *path)
void wrhdr_c(int tno, Const char *keyword, double value)
void rdhdd_c(int tno, Const char *keyword, double *value, double defval)
void keyini_c(int argc, char *argv[])
void xyzprfrd_c(int tno, int profilenr, float *data, int *mask, int *ndata)
void xyread_c(int tno, int index, float *array)
void hreada_c(int ihandle, char *line, size_t length, int *iostat)
off_t hsize_c(int ihandle)
void mirInit_c(const char *f_name)
void tabwca_c(int tno, int col, char *value)
void uvwread_c(int tno, float *data, int *flags, int n, int *nread)
void keyinit_c(Const char *task)
void tabwcr_c(int tno, int col, float value)
void rdhdc_c(int tno, Const char *keyword, float *value, Const float *defval)
void scrread_c(int handle, float *buffer, off_t offset, size_t length)
void rdhdl_c(int tno, Const char *keyword, int8 *value, int8 defval)
void keya_c(Const char *keyword, char *value, Const char *keydef)
void hdprobe_c(int tno, Const char *keyword, char *descr, size_t length, char *type, int *n)
void scrwrite_c(int handle, Const float *buffer, off_t offset, size_t length)
int uvscan_c(int tno, Const char *var)
void xysetpl_c(int tno, int naxis, Const int *axes)
void pad(char *string, int length)
void rdhda_c(int tno, Const char *keyword, char *value, Const char *defval, int len)
void mkclose_c(char *handle)
void getmaski_c(Const int mask, int *masks)
void xyzs2c_c(int tno, long subcubenr, int coords[])
int dexpand_c(char *tmplte, char *output, int length)
void hio_c(int ihandle, int dowrite, int type, char *buf, off_t offset, size_t length, int *iostat)
void drmdir_c(char *path, int *iostat)
void dmkdir_c(char *path, int *iostat)
void rdhdr_c(int tno, Const char *keyword, float *value, double defval)
void codeWrite_c(const char *v_name, const int icode, const char *code, const int ncode)
void hdcopy_c(int tin, int tout, Const char *keyword)
void tabsetr_c(int tno, int row)
void xyopen_c(int *tno, Const char *name, Const char *status, int naxis, int axes[])
void keyr_c(Const char *keyword, float *value, Const float keydef)
int xyzpix_c(int tno, int dims)
int hexists_c(int tno, Const char *keyword)
void xyzdim_c(int tno, int *naxis, int *dimsub)
void dclose_c(int fd, int *iostat)
void bugv_c(char s, Const char *m,...)
char * bugmessage_c(void)
void uvwflgwr_c(int tno, Const int *flags)
void uvread_c(int tno, double *preamble, float *data, int *flags, int n, int *nread)
void uvwrite_c(int tno, Const double *preamble, Const float *data, Const int *flags, int n)
void scropen_c(int *handle)
LatticeExprNode value(const LatticeExprNode &expr)
This function returns the value of the expression without a mask.
void dreaddir_c(char *contxt, char *path, int length)
void keyd_c(Const char *keyword, double *value, Const double keydef)
void xyzplnrd_c(int tno, int planenr, float *data, int *mask, int *ndata)