22 #ifndef VGOS_DB_CALC_H
23 #define VGOS_DB_CALC_H
40 #define UNUSED __attribute__((__unused__))
76 void kai_ (
short &kruc,
short &in,
short &iout,
short &istp,
char *lkynm_chr,
77 short &iveri,
char *lkout_chr,
char *lfto_chr,
short &ivero,
78 char *lfio_chr,
short &kerr,
79 size_t len1,
size_t len2,
size_t len3,
size_t len4);
85 void ask_ (
const char *lcode,
const short &ntoc,
const short &dim1,
const short &dim2,
86 const short &dim3,
const short &nver,
const char* ltext_chr,
const short &ktype,
87 short &kerr,
size_t len1,
size_t len2);
90 void mvrec_(
short &ntoc,
short &kmode,
short &knum,
short &kerr);
91 void phist_(
short &nhist,
const char *lhist_chr,
size_t len);
96 void adda_ (
const short& ntoc,
const char *lcode,
const char *descrText,
97 const short& dim1,
const short& dim2,
const short& dim3,
size_t len1,
size_t len2);
98 void addi_ (
const short& ntoc,
const char *lcode,
const char *descrText,
99 const short& dim1,
const short& dim2,
const short& dim3,
size_t len1,
size_t len2);
100 void addj_ (
const short& ntoc,
const char *lcode,
const char *descrText,
101 const short& dim1,
const short& dim2,
const short& dim3,
size_t len1,
size_t len2);
102 void add4_ (
const short& ntoc,
const char *lcode,
const char *descrText,
103 const short& dim1,
const short& dim2,
const short& dim3,
size_t len1,
size_t len2);
104 void addr_ (
const short& ntoc,
const char *lcode,
const char *descrText,
105 const short& dim1,
const short& dim2,
const short& dim3,
size_t len1,
size_t len2);
108 void dela_(
const short& ntoc,
const char *lcode,
size_t len);
109 void deli_(
const short& ntoc,
const char *lcode,
size_t len);
110 void delj_(
const short& ntoc,
const char *lcode,
size_t len);
111 void del4_(
const short& ntoc,
const char *lcode,
size_t len);
112 void delr_(
const short& ntoc,
const char *lcode,
size_t len);
115 void getr_(
char (&lcode)[14],
double values[],
short *dim1,
short *dim2,
short *dim3,
short numDims[],
116 short &kerr,
size_t len);
117 void get4_(
const char *lcode,
double values[],
118 const short &dim1,
const short &dim2,
const short &dim3,
short numDims[],
119 short &kerr,
size_t len);
120 void geti_(
const char *lcode,
short values[],
121 const short &dim1,
const short &dim2,
const short &dim3,
short numDims[],
122 short &kerr,
size_t len);
123 void getj_(
char (&lcode)[14],
int values[],
124 short *dim1,
short *dim2,
short *dim3,
short numDims[],
short &kerr,
size_t len);
125 void geta_(
const char *lcode,
char values[],
126 const short &dim1,
const short &dim2,
const short &dim3,
short numDims[],
127 short &kerr,
size_t len);
130 void puta_(
const char *lcode,
const char vals[],
131 const short &dim1,
const short &dim2,
const short &dim3,
133 void puti_(
const char *lcode,
const short vals[],
134 const short &dim1,
const short &dim2,
const short &dim3,
136 void putr_(
const char *lcode,
const double vals[],
137 const short &dim1,
const short &dim2,
const short &dim3,
139 void put4_(
const char *lcode,
const double vals[],
140 const short &dim1,
const short &dim2,
const short &dim3,
142 void putj_(
char (&lcode)[14],
int vals[],
short *dim1,
short *dim2,
short *dim3,
size_t len);
148 short trimlen_(
char *chrs,
size_t len);
162 void start_(
short& iLu,
const char* calcOnName,
short& iOut,
size_t len);
void obsnt_(int &kount, int &kend)
void adda_(const short &ntoc, const char *lcode, const char *descrText, const short &dim1, const short &dim2, const short &dim3, size_t len1, size_t len2)
void delj_(const short &ntoc, const char *lcode, size_t len)
void get4_(const char *lcode, double values[], const short &dim1, const short &dim2, const short &dim3, short numDims[], short &kerr, size_t len)
void puta_(const char *lcode, const char vals[], const short &dim1, const short &dim2, const short &dim3, size_t len)
void qString2fortArray(const QString &str, char *chrs, size_t len)
void put4_(const char *lcode, const double vals[], const short &dim1, const short &dim2, const short &dim3, size_t len)
void start_(short &iLu, const char *calcOnName, short &iOut, size_t len)
void dela_(const short &ntoc, const char *lcode, size_t len)
void putj_(char(&lcode)[14], int vals[], short *dim1, short *dim2, short *dim3, size_t len)
void mvrec_(short &ntoc, short &kmode, short &knum, short &kerr)
void kai_(short &kruc, short &in, short &iout, short &istp, char *lkynm_chr, short &iveri, char *lkout_chr, char *lfto_chr, short &ivero, char *lfio_chr, short &kerr, size_t len1, size_t len2, size_t len3, size_t len4)
void setmodeflag_(short *modeflag)
void addr_(const short &ntoc, const char *lcode, const char *descrText, const short &dim1, const short &dim2, const short &dim3, size_t len1, size_t len2)
void mimicCalcMain(int arg1, int arg2, const char *arg3, const char *arg4)
void geti_(const char *lcode, short values[], const short &dim1, const short &dim2, const short &dim3, short numDims[], short &kerr, size_t len)
void deli_(const short &ntoc, const char *lcode, size_t len)
void phist_(short &nhist, const char *lhist_chr, size_t len)
void geta_(const char *lcode, char values[], const short &dim1, const short &dim2, const short &dim3, short numDims[], short &kerr, size_t len)
void add4_(const short &ntoc, const char *lcode, const char *descrText, const short &dim1, const short &dim2, const short &dim3, size_t len1, size_t len2)
void delr_(const short &ntoc, const char *lcode, size_t len)
void addj_(const short &ntoc, const char *lcode, const char *descrText, const short &dim1, const short &dim2, const short &dim3, size_t len1, size_t len2)
SgVersion vgosDbCalcVersion
void putr_(const char *lcode, const double vals[], const short &dim1, const short &dim2, const short &dim3, size_t len)
void mimicCalcMain2(int arg1, int arg2, const char *arg3, const char *arg4, const QList< QString > &bands)
void puti_(const char *lcode, const short vals[], const short &dim1, const short &dim2, const short &dim3, size_t len)
short gethostname_(char *hostName, size_t len)
void ask_(const char *lcode, const short &ntoc, const short &dim1, const short &dim2, const short &dim3, const short &nver, const char *ltext_chr, const short &ktype, short &kerr, size_t len1, size_t len2)
void getr_(char(&lcode)[14], double values[], short *dim1, short *dim2, short *dim3, short numDims[], short &kerr, size_t len)
void del4_(const short &ntoc, const char *lcode, size_t len)
void addi_(const short &ntoc, const char *lcode, const char *descrText, const short &dim1, const short &dim2, const short &dim3, size_t len1, size_t len2)
short trimlen_(char *chrs, size_t len)
QString fortArray2QString(const char *chrs, size_t len)
void getj_(char(&lcode)[14], int values[], short *dim1, short *dim2, short *dim3, short numDims[], short &kerr, size_t len)
void quit_calc_(short iPar[])