Back to home page

EIC code displayed by LXR
 
 

    

File indexing completed on 2024-05-18 08:30:01 

0001 /* 
0002  Corrections:       
0003  15-Feb-94 GF HGIVE  correct output args
0004               HGIVEN idem
0005  18-Feb-94 GF comment headers for routines with more than 10 Arguments
0006               and break long lines by \ (for the VAX)
0007  -------------above carried over from previous file on 15-Mar-94
0008  11-Apr-94 GF remove ALL occurences of ZTRING (these are not used so far)
0009               correct HOPEN, HROUT calls
0010  21-Apr-94 GF restore PROTOCCALLSFFUNi lines for functions.
0011  18-May-94 GF correct passing of external functions, must use ROUTINE
0012  further comments kept in RCS/CVS
0013 ---------------------------------------
0014 */
0015 
0016 #define H1EVLI(A1)  CCALLSFSUB1(H1EVLI,h1evli,INT,A1)
0017 #define H2PAGE(A1)  CCALLSFSUB1(H2PAGE,h2page,INT,A1)
0018 #define HADJUST(A1,A2,A3,A4,A5)  CCALLSFSUB5(HADJUST,hadjust,PDOUBLE,INT,DOUBLEV,PINT,PDOUBLE,A1,A2,A3,A4,A5)
0019 #define HARITH(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HARITH,harith,ROUTINE,PFLOAT,PFLOAT,PFLOAT,FLOATV,FLOATV,FLOATV,A1,A2,A3,A4,A5,A6,A7)
0020 #define HARRAY(A1,A2,A3)  CCALLSFSUB3(HARRAY,harray,INT,INT,PINT,A1,A2,A3)
0021 #define HAUTO(A1)  CCALLSFSUB1(HAUTO,hauto,FLOAT,A1)
0022 #define HBALLOC(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)  CCALLSFSUB10(HBALLOC,hballoc,INT,STRING,STRING,STRING,INT,INT,INT,INTV,PINT,INT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)
0023 #define HBANDX(A1,A2,A3,A4)  CCALLSFSUB4(HBANDX,hbandx,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4)
0024 #define HBANDY(A1,A2,A3,A4)  CCALLSFSUB4(HBANDY,hbandy,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4)
0025 #define HBARX(A1)  CCALLSFSUB1(HBARX,hbarx,INT,A1)
0026 #define HBARY(A1)  CCALLSFSUB1(HBARY,hbary,INT,A1)
0027  PROTOCCALLSFFUN2(DOUBLE,HBASFT,hbasft,INT,FLOATV)
0028 #define HBASFT(A2,A3)  CCALLSFFUN2(HBASFT,hbasft,INT,FLOATV,A2,A3)
0029 #define HBCD(A1,A2,A3)  CCALLSFSUB3(HBCD,hbcd,FLOAT,INT,INTV,A1,A2,A3)
0030 #define HBCDF(A1,A2,A3)  CCALLSFSUB3(HBCDF,hbcdf,FLOAT,INT,PINT,A1,A2,A3)
0031 #define HBCDI(A1,A2,A3)  CCALLSFSUB3(HBCDI,hbcdi,INT,INT,PINT,A1,A2,A3)
0032 #define HBFUN1(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HBFUN1,hbfun1,INT,STRING,INT,FLOAT,FLOAT,ROUTINE,A1,A2,A3,A4,A5,A6)
0033 #define HBFUN2(A1,A2,A3,A4,A5,A6,A7,A8,A9)  CCALLSFSUB9(HBFUN2,hbfun2,INT,STRING,INT,FLOAT,FLOAT,INT,FLOAT,FLOAT,ROUTINE,A1,A2,A3,A4,A5,A6,A7,A8,A9)
0034 #define HBIGBI(A1,A2)  CCALLSFSUB2(HBIGBI,hbigbi,INT,INT,A1,A2)
0035 #define HBIN(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HBIN,hbin,FLOAT,FLOAT,INT,PFLOAT,PFLOAT,PINT,PFLOAT,A1,A2,A3,A4,A5,A6,A7)
0036 #define HBINSZ(A1)  CCALLSFSUB1(HBINSZ,hbinsz,STRING,A1)
0037 #define HBLACK(A1)  CCALLSFSUB1(HBLACK,hblack,INT,A1)
0038 #define HBNAM(A1,A2,A3,A4,A5)  CCALLSFSUB5(HBNAM,hbnam,INT,STRING,INT,STRING,LOGICAL,A1,A2,A3,A4,A5)
0039 #define HBNAMC(A1,A2,A3,A4)  CCALLSFSUB4(HBNAMC,hbnamc,INT,STRING,STRINGV,STRING,A1,A2,A3,A4)
0040 #define HBNAME(A1,A2,A3,A4)  CCALLSFSUB4(HBNAME,hbname,INT,STRING,INTV,STRING,A1,A2,A3,A4)
0041  PROTOCCALLSFFUN6(DOUBLE,HBNSUM,hbnsum,INT,INT,INT,DOUBLE,DOUBLE,FLOAT)
0042 #define HBNSUM(A2,A3,A4,A5,A6,A7)  CCALLSFFUN6(HBNSUM,hbnsum,INT,INT,INT,DOUBLE,DOUBLE,FLOAT,A2,A3,A4,A5,A6,A7)
0043 #define HBNT(A1,A2,A3)  CCALLSFSUB3(HBNT,hbnt,INT,STRING,STRING,A1,A2,A3)
0044 #define HBONT(A1,A2,A3,A4)  CCALLSFSUB4(HBONT,hbont,INT,STRING,STRING,STRING,A1,A2,A3,A4)
0045 #define HBOOK1(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HBOOK1,hbook1,INT,STRING,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5,A6)
0046 #define HBOOK2(A1,A2,A3,A4,A5,A6,A7,A8,A9)  CCALLSFSUB9(HBOOK2,hbook2,INT,STRING,INT,FLOAT,FLOAT,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9)
0047 #define HBOOKB(A1,A2,A3,A4,A5)  CCALLSFSUB5(HBOOKB,hbookb,INT,STRING,INT,FLOATV,FLOAT,A1,A2,A3,A4,A5)
0048 #define HBOOKN(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HBOOKN,hbookn,INT,STRING,INT,STRING,INT,STRINGV,A1,A2,A3,A4,A5,A6)
0049 #define HBOOKNC(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HBOOKNC,hbooknc,INT,STRING,INT,STRING,FLOATV,STRINGV,A1,A2,A3,A4,A5,A6)
0050 #define HBOOKT(A1)  CCALLSFSUB1(HBOOKT,hbookt,INT,A1)
0051 #define HBPRO(A1,A2)  CCALLSFSUB2(HBPRO,hbpro,INT,FLOAT,A1,A2)
0052 #define HBPROF(A1,A2,A3,A4,A5,A6,A7,A8)  CCALLSFSUB8(HBPROF,hbprof,INT,STRING,INT,FLOAT,FLOAT,FLOAT,FLOAT,STRING,A1,A2,A3,A4,A5,A6,A7,A8)
0053 #define HBPROX(A1,A2)  CCALLSFSUB2(HBPROX,hbprox,INT,FLOAT,A1,A2)
0054 #define HBPROY(A1,A2)  CCALLSFSUB2(HBPROY,hbproy,INT,FLOAT,A1,A2)
0055 #define HBSET(A1,A2,A3)  CCALLSFSUB3(HBSET,hbset,STRING,INT,PINT,A1,A2,A3)
0056 #define HBSLIX(A1,A2,A3)  CCALLSFSUB3(HBSLIX,hbslix,INT,INT,FLOAT,A1,A2,A3)
0057 #define HBSLIY(A1,A2,A3)  CCALLSFSUB3(HBSLIY,hbsliy,INT,INT,FLOAT,A1,A2,A3)
0058 #define HBSTAT(A1)  CCALLSFSUB1(HBSTAT,hbstat,INT,A1)
0059 #define HBTIT(A1,A2,A3)  CCALLSFSUB3(HBTIT,hbtit,STRING,PINT,PINT,A1,A2,A3)
0060 #define HBUFF(A1,A2,A3)  CCALLSFSUB3(HBUFF,hbuff,INT,INTV,INT,A1,A2,A3)
0061 #define HBUG(A1,A2,A3)  CCALLSFSUB3(HBUG,hbug,STRING,STRING,INT,A1,A2,A3)
0062 #define HCDIR(A1,A2)  CCALLSFSUB2(HCDIR,hcdir,PSTRING,STRING,A1,A2)
0063 #define HCHNAM(A1,A2,A3)  CCALLSFSUB3(HCHNAM,hchnam,STRING,INT,PSTRING,A1,A2,A3)
0064 #define HCLEFT(A1,A2,A3)  CCALLSFSUB3(HCLEFT,hcleft,PSTRING,INT,INT,A1,A2,A3)
0065 #define HCMOM(A1,A2)  CCALLSFSUB2(HCMOM,hcmom,INT,PFLOAT,A1,A2)
0066 #define HCOMPA(A1,A2)  CCALLSFSUB2(HCOMPA,hcompa,INTV,INT,A1,A2)
0067 #define HCOMPR(A1,A2)  CCALLSFSUB2(HCOMPR,hcompr,PSTRING,PINT,A1,A2)
0068 #define HCOPY(A1,A2,A3)  CCALLSFSUB3(HCOPY,hcopy,INT,INT,STRING,A1,A2,A3)
0069 #define HCOPYM(A1,A2,A3)  CCALLSFSUB3(HCOPYM,hcopym,INT,INTV,INT,A1,A2,A3)
0070 #define HCOPYN(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HCOPYN,hcopyn,INTV,INTV,INT,INT,INT,INT,A1,A2,A3,A4,A5,A6)
0071 #define HCOPYT(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HCOPYT,hcopyt,INTV,INTV,INT,INT,INT,INT,A1,A2,A3,A4,A5,A6)
0072 #define HCOPYU(A1,A2,A3)  CCALLSFSUB3(HCOPYU,hcopyu,INT,INTV,INT,A1,A2,A3)
0073 #define HCORE(A1,A2)  CCALLSFSUB2(HCORE,hcore,INT,INT,A1,A2)
0074 #define HCORRL(A1,A2)  CCALLSFSUB2(HCORRL,hcorrl,PFLOAT,FLOATV,A1,A2)
0075 #define HCOVW(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)  CCALLSFSUB10(HCOVW,hcovw,PFLOAT,FLOATV,PDOUBLE,PDOUBLE,PDOUBLE,PDOUBLE,PDOUBLE,PDOUBLE,PINT,INT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)
0076  PROTOCCALLSFFUN2(FLOAT,HCX,hcx,INT,INT)
0077 #define HCX(A2,A3)  CCALLSFFUN2(HCX,hcx,INT,INT,A2,A3)
0078  PROTOCCALLSFFUN2(FLOAT,HCXY,hcxy,INT,INT)
0079 #define HCXY(A2,A3)  CCALLSFFUN2(HCXY,hcxy,INT,INT,A2,A3)
0080 #define HDBAOP(A1,A2,A3,A4)  CCALLSFSUB4(HDBAOP,hdbaop,FLOAT,INT,PINT,PFLOAT,A1,A2,A3,A4)
0081 #define HDBCOP(A1,A2,A3,A4)  CCALLSFSUB4(HDBCOP,hdbcop,FLOAT,INT,PINT,PFLOAT,A1,A2,A3,A4)
0082 #define HDBINI(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HDBINI,hdbini,INT,INT,FLOAT,INT,STRING,PLOGICAL,A1,A2,A3,A4,A5,A6)
0083 #define HDBPRF(A1,A2,A3,A4)  CCALLSFSUB4(HDBPRF,hdbprf,FLOAT,INT,PINT,PFLOAT,A1,A2,A3,A4)
0084 #define HDBSOP(A1,A2,A3,A4)  CCALLSFSUB4(HDBSOP,hdbsop,FLOAT,INT,PINT,PFLOAT,A1,A2,A3,A4)
0085 #define HDCOFL() CCALLSFSUB0(HDCOFL,hdcofl)
0086 #define HDDIR(A1)  CCALLSFSUB1(HDDIR,hddir,STRING,A1)
0087 #define HDELET(A1)  CCALLSFSUB1(HDELET,hdelet,INT,A1)
0088 #define HDERI1(A1,A2,A3,A4)  CCALLSFSUB4(HDERI1,hderi1,INT,FLOATV,DOUBLEV,DOUBLEV,A1,A2,A3,A4)
0089 #define HDERI2(A1,A2,A3,A4,A5)  CCALLSFSUB5(HDERI2,hderi2,INT,FLOAT,FLOAT,DOUBLEV,DOUBLEV,A1,A2,A3,A4,A5)
0090 #define HDERIN(A1,A2,A3)  CCALLSFSUB3(HDERIN,hderin,FLOATV,DOUBLEV,DOUBLEV,A1,A2,A3)
0091 #define HDERIV(A1)  CCALLSFSUB1(HDERIV,hderiv,FLOATV,A1)
0092  PROTOCCALLSFFUN1(FLOAT,HDEXPO,hdexpo,FLOAT)
0093 #define HDEXPO(A2)  CCALLSFFUN1(HDEXPO,hdexpo,FLOAT,A2)
0094 #define HDIFF(A1,A2,A3,A4)  CCALLSFSUB4(HDIFF,hdiff,INT,INT,PFLOAT,STRING,A1,A2,A3,A4)
0095 #define HDIFFB(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HDIFFB,hdiffb,INT,INT,FLOAT,INT,STRING,INT,FLOATV,A1,A2,A3,A4,A5,A6,A7)
0096  PROTOCCALLSFFUN1(FLOAT,HDIPKL,hdipkl,FLOAT)
0097 #define HDIPKL(A2)  CCALLSFFUN1(HDIPKL,hdipkl,FLOAT,A2)
0098 #define HDISKF(A1,A2)  CCALLSFSUB2(HDISKF,hdiskf,INT,INT,A1,A2)
0099 #define HDUMMY(A1)  CCALLSFSUB1(HDUMMY,hdummy,STRING,A1)
0100 #define HDUMP(A1)  CCALLSFSUB1(HDUMP,hdump,INT,A1)
0101  PROTOCCALLSFFUN2(DOUBLE,HELEFT,heleft,INT,FLOAT)
0102 #define HELEFT(A2,A3)  CCALLSFFUN2(HELEFT,heleft,INT,FLOAT,A2,A3)
0103 #define HERMES(A1)  CCALLSFSUB1(HERMES,hermes,INT,A1)
0104 #define HERROR(A1)  CCALLSFSUB1(HERROR,herror,INT,A1)
0105 #define HEXDA1(A1,A2,A3)  CCALLSFSUB3(HEXDA1,hexda1,PFLOAT,INT,PINT,A1,A2,A3)
0106 #define HEXDAT(A1,A2)  CCALLSFSUB2(HEXDAT,hexdat,INT,PINT,A1,A2)
0107  PROTOCCALLSFFUN1(LOGICAL,HEXIST,hexist,INT)
0108 #define HEXIST(A2)  CCALLSFFUN1(HEXIST,hexist,INT,A2)
0109  PROTOCCALLSFFUN1(FLOAT,HEXP,hexp,FLOAT)
0110 #define HEXP(A2)  CCALLSFFUN1(HEXP,hexp,FLOAT,A2)
0111 #define HF1(A1,A2,A3)  CCALLSFSUB3(HF1,hf1,INT,FLOAT,FLOAT,A1,A2,A3)
0112 #define HF1AUT(A1,A2)  CCALLSFSUB2(HF1AUT,hf1aut,FLOAT,FLOAT,A1,A2)
0113 #define HF1E(A1,A2,A3,A4)  CCALLSFSUB4(HF1E,hf1e,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4)
0114 #define HF1N(A1,A2,A3,A4)  CCALLSFSUB4(HF1N,hf1n,INT,FLOATV,FLOATV,INT,A1,A2,A3,A4)
0115 #define HF2(A1,A2,A3,A4)  CCALLSFSUB4(HF2,hf2,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4)
0116 #define HFACT(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HFACT,hfact,PFLOAT,INT,PINT,PINT,PINT,PFLOAT,A1,A2,A3,A4,A5,A6)
0117 #define HFC1(A1,A2,A3,A4,A5)  CCALLSFSUB5(HFC1,hfc1,INT,INT,STRING,FLOAT,STRING,A1,A2,A3,A4,A5)
0118 #define HFC2(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HFC2,hfc2,INT,INT,STRING,INT,STRING,FLOAT,STRING,A1,A2,A3,A4,A5,A6,A7)
0119 #define HFCN(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HFCN,hfcn,INT,PDOUBLE,PDOUBLE,DOUBLEV,INT,ROUTINE,A1,A2,A3,A4,A5,A6)
0120 #define HFCNH(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HFCNH,hfcnh,INT,PDOUBLE,PDOUBLE,DOUBLEV,INT,ROUTINE,A1,A2,A3,A4,A5,A6)
0121 #define HFCNMIN(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HFCNMIN,hfcnmin,INT,DOUBLEV,PDOUBLE,DOUBLEV,INT,DOUBLE,A1,A2,A3,A4,A5,A6)
0122 #define HFCNV(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HFCNV,hfcnv,INT,PDOUBLE,PDOUBLE,DOUBLEV,INT,ROUTINE,A1,A2,A3,A4,A5,A6)
0123 #define HFCNV1(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HFCNV1,hfcnv1,INT,FLOATV,FLOATV,FLOATV,INT,INT,ROUTINE,A1,A2,A3,A4,A5,A6,A7)
0124 #define HFCX(A1,A2)  CCALLSFSUB2(HFCX,hfcx,INT,FLOAT,A1,A2)
0125 #define HFCXY(A1,A2,A3)  CCALLSFSUB3(HFCXY,hfcxy,INT,INT,FLOAT,A1,A2,A3)
0126 #define HFETC1(A1,A2)  CCALLSFSUB2(HFETC1,hfetc1,INT,INT,A1,A2)
0127 #define HFETCH(A1,A2)  CCALLSFSUB2(HFETCH,hfetch,INT,INT,A1,A2)
0128 #define HFF1(A1,A2,A3,A4)  CCALLSFSUB4(HFF1,hff1,INT,PINT,FLOAT,FLOAT,A1,A2,A3,A4)
0129 #define HFF2(A1,A2,A3,A4,A5)  CCALLSFSUB5(HFF2,hff2,INT,PINT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5)
0130 #define HFIDP(A1,A2,A3,A4)  CCALLSFSUB4(HFIDP,hfidp,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4)
0131 #define HFILL(A1,A2,A3,A4)  CCALLSFSUB4(HFILL,hfill,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4)
0132 #define HFILPF(A1,A2,A3,A4)  CCALLSFSUB4(HFILPF,hfilpf,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4)
0133 #define HFILPR(A1)  CCALLSFSUB1(HFILPR,hfilpr,INT,A1)
0134 #define HFINAM(A1,A2,A3)  CCALLSFSUB3(HFINAM,hfinam,INT,STRINGV,INT,A1,A2,A3)
0135 #define HFIND(A1,A2)  CCALLSFSUB2(HFIND,hfind,INT,STRING,A1,A2)
0136 #define HFINOP(A1,A2,A3,A4,A5,A6,A7,A8)  CCALLSFSUB8(HFINOP,hfinop,INT,STRING,PINT,PINT,PINT,PINT,INT,INT,A1,A2,A3,A4,A5,A6,A7,A8)
0137 /*
0138 #define HFIT(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)  CCALLSFSUB11(HFIT,hfit,INT,ROUTINE,INT,FLOATV,PFLOAT,INT,PFLOAT,FLOATV,PFLOAT,FLOATV,FLOATV,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)
0139 */
0140 #define HFIT1(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)  CCALLSFSUB10(HFIT1,hfit1,FLOATV,FLOATV,FLOATV,INT,ROUTINE,INT,DOUBLEV,PFLOAT,INT,PFLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)
0141 #define HFITEX(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HFITEX,hfitex,INT,PFLOAT,PFLOAT,FLOAT,INT,FLOATV,A1,A2,A3,A4,A5,A6)
0142 #define HFITF(A1,A2)  CCALLSFSUB2(HFITF,hfitf,STRING,PINT,A1,A2)
0143 #define HFITGA(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HFITGA,hfitga,INT,PFLOAT,PFLOAT,PFLOAT,FLOAT,INT,FLOATV,A1,A2,A3,A4,A5,A6,A7)
0144 #define HFITH(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)  CCALLSFSUB10(HFITH,hfith,INT,ROUTINE,STRING,INT,FLOATV,FLOATV,FLOATV,FLOATV,PFLOAT,PFLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)
0145 #define HFITH1(A1,A2)  CCALLSFSUB2(HFITH1,hfith1,PFLOAT,INT,A1,A2)
0146  PROTOCCALLSFFUN1(FLOAT,HFITHC,hfithc,FLOAT)
0147 #define HFITHC(A2)  CCALLSFFUN1(HFITHC,hfithc,FLOAT,A2)
0148 #define HFITHN(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)  CCALLSFSUB10(HFITHN,hfithn,INT,STRING,STRING,INT,PFLOAT,FLOATV,FLOATV,FLOATV,FLOATV,FLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)
0149 /*
0150 #define HFITL(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)  CCALLSFSUB11(HFITL,hfitl,INT,ROUTINE,INT,DOUBLEV,PFLOAT,INT,PFLOAT,PFLOAT,FLOATV,FLOATV,FLOATV,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)
0151 */
0152 /*
0153 #define HFITN(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16)  CCALLSFSUB16(HFITN,hfitn,PFLOAT,FLOATV,FLOATV,INT,INT,INT,ROUTINE,INT,DOUBLEV,PFLOAT,INT,PFLOAT,PFLOAT,FLOATV,FLOATV,FLOATV,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16)
0154 */
0155 #define HFITPO(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HFITPO,hfitpo,INT,INT,PFLOAT,FLOAT,INT,FLOATV,A1,A2,A3,A4,A5,A6)
0156 #define HFITS(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HFITS,hfits,INT,ROUTINE,INT,DOUBLEV,PFLOAT,INT,PFLOAT,A1,A2,A3,A4,A5,A6,A7)
0157 /*
0158 #define HFITV(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15)  CCALLSFSUB15(HFITV,hfitv,INT,INT,INT,PFLOAT,FLOATV,FLOATV,ROUTINE,STRING,INT,FLOATV,FLOATV,FLOATV,FLOATV,PFLOAT,PFLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15)
0159 */
0160 #define HFN(A1,A2)  CCALLSFSUB2(HFN,hfn,INT,FLOATV,A1,A2)
0161 #define HFNEXT(A1,A2)  CCALLSFSUB2(HFNEXT,hfnext,INT,INT,A1,A2)
0162 #define HFNOV(A1,A2)  CCALLSFSUB2(HFNOV,hfnov,INT,FLOATV,A1,A2)
0163 #define HFNT(A1)  CCALLSFSUB1(HFNT,hfnt,INT,A1)
0164 #define HFNT1(A1,A2)  CCALLSFSUB2(HFNT1,hfnt1,INT,STRING,A1,A2)
0165 #define HFNT2() CCALLSFSUB0(HFNT2,hfnt2)
0166 #define HFNTB(A1,A2)  CCALLSFSUB2(HFNTB,hfntb,INT,STRING,A1,A2)
0167 #define HFONT(A1,A2)  CCALLSFSUB2(HFONT,hfont,INT,INT,A1,A2)
0168 #define HFONTC(A1,A2,A3,A4)  CCALLSFSUB4(HFONTC,hfontc,INT,PINT,PSTRINGV,STRING,A1,A2,A3,A4)
0169 #define HFONTR(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HFONTR,hfontr,INT,PINT,FLOATV,FLOATV,FLOATV,FLOATV,STRING,A1,A2,A3,A4,A5,A6,A7)
0170 #define HFORMA(A1)  CCALLSFSUB1(HFORMA,hforma,INT,A1)
0171 #define HFPAK1(A1,A2,A3,A4)  CCALLSFSUB4(HFPAK1,hfpak1,INT,PINT,FLOATV,INT,A1,A2,A3,A4)
0172 #define HFRAME(A1,A2,A3,A4)  CCALLSFSUB4(HFRAME,hframe,INT,FLOAT,FLOAT,PFLOAT,A1,A2,A3,A4)
0173 /*
0174 #define HFUMIL(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17,A18)\
0175   CCALLSFSUB18(HFUMIL,hfumil,ROUTINE,PFLOAT,INT,INT,PINT,PFLOAT,PFLOAT,PFLOAT,PFLOAT,FLOATV,PFLOAT,PFLOAT,PFLOAT,PFLOAT,PFLOAT,FLOATV,FLOATV,FLOATV,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17,A18)
0176 */
0177 #define HFUNC(A1,A2)  CCALLSFSUB2(HFUNC,hfunc,INT,ROUTINE,A1,A2)
0178  PROTOCCALLSFFUN1(FLOAT,HGAUS,hgaus,FLOAT)
0179 #define HGAUS(A2)  CCALLSFFUN1(HGAUS,hgaus,FLOAT,A2)
0180  PROTOCCALLSFFUN1(FLOAT,HGAUSS,hgauss,FLOAT)
0181 #define HGAUSS(A2)  CCALLSFFUN1(HGAUSS,hgauss,FLOAT,A2)
0182  PROTOCCALLSFFUN4(FLOAT,HGCONT,hgcont,INT,INT,INT,INT)
0183 #define HGCONT(A2,A3,A4,A5)  CCALLSFFUN4(HGCONT,hgcont,INT,INT,INT,INT,A2,A3,A4,A5)
0184 #define HGDIRE(A1,A2)  CCALLSFSUB2(HGDIRE,hgdire,INT,PSTRING,A1,A2)
0185 #define HGETFF(A1,A2,A3)  CCALLSFSUB3(HGETFF,hgetff,INT,INT,PSTRING,A1,A2,A3)
0186 #define HGETFL(A1)  CCALLSFSUB1(HGETFL,hgetfl,INT,A1)
0187 #define HGFIT(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HGFIT,hgfit,INT,PINT,PINT,PFLOAT,PFLOAT,PFLOAT,PSTRINGV,A1,A2,A3,A4,A5,A6,A7)
0188 /*
0189 #define HGIVE(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)  CCALLSFSUB10(HGIVE,hgive,INT,STRING,PINT,PFLOAT,PFLOAT,INT,FLOAT,FLOAT,PINT,INT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)
0190 */
0191 #define HGIVE(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)  CCALLSFSUB10(HGIVE,hgive,INT,STRING,PINT,PFLOAT,PFLOAT,PINT,PFLOAT,PFLOAT,PINT,PINT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)
0192 /*
0193 #define HGIVEN(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HGIVEN,hgiven,INT,STRING,PINT,PSTRINGV,PFLOAT,PFLOAT,A1,A2,A3,A4,A5,A6)
0194 */
0195 #define HGIVEN(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HGIVEN,hgiven,INT,PSTRING,PINT,PSTRINGV,PFLOAT,PFLOAT,A1,A2,A3,A4,A5,A6)
0196 #define HGN(A1,A2,A3,A4,A5)  CCALLSFSUB5(HGN,hgn,INT,PINT,INT,PFLOAT,PINT,A1,A2,A3,A4,A5)
0197 #define HGNF(A1,A2,A3,A4)  CCALLSFSUB4(HGNF,hgnf,INT,INT,PFLOAT,PINT,A1,A2,A3,A4)
0198 #define HGNPAR(A1,A2)  CCALLSFSUB2(HGNPAR,hgnpar,INT,STRING,A1,A2)
0199 #define HGNT(A1,A2,A3)  CCALLSFSUB3(HGNT,hgnt,INT,INT,INT,A1,A2,A3)
0200 #define HGNT1(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HGNT1,hgnt1,INT,STRING,STRINGV,INT,INT,PINT,A1,A2,A3,A4,A5,A6)
0201 #define HGNT2(A1,A2,A3,A4,A5)  CCALLSFSUB5(HGNT2,hgnt2,STRINGV,INTV,INT,INT,PINT,A1,A2,A3,A4,A5)
0202 #define HGNTB(A1,A2,A3,A4)  CCALLSFSUB4(HGNTB,hgntb,INT,STRING,INT,INT,A1,A2,A3,A4)
0203 #define HGNTBF(A1,A2,A3,A4,A5)  CCALLSFSUB5(HGNTBF,hgntbf,INT,STRINGV,INT,PINT,PINT,A1,A2,A3,A4,A5)
0204 #define HGNTF(A1,A2,A3)  CCALLSFSUB3(HGNTF,hgntf,INT,INT,PINT,A1,A2,A3)
0205 #define HGNTV(A1,A2,A3,A4,A5)  CCALLSFSUB5(HGNTV,hgntv,INT,STRINGV,INT,INT,INT,A1,A2,A3,A4,A5)
0206 #define HGSTAT(A1,A2)  CCALLSFSUB2(HGSTAT,hgstat,INT,PFLOAT,A1,A2)
0207 #define HGTDIR(A1)  CCALLSFSUB1(HGTDIR,hgtdir,PSTRING,A1)
0208 #define HHIPAR(A1)  CCALLSFSUB1(HHIPAR,hhipar,PINT,A1)
0209 #define HHXYE(A1,A2,A3)  CCALLSFSUB3(HHXYE,hhxye,PFLOAT,PFLOAT,PFLOAT,A1,A2,A3)
0210  PROTOCCALLSFFUN2(FLOAT,HI,hi,INT,INT)
0211 #define HI(A2,A3)  CCALLSFFUN2(HI,hi,INT,INT,A2,A3)
0212 #define HICTOI(A1,A2)  CCALLSFSUB2(HICTOI,hictoi,STRING,INT,A1,A2)
0213 #define HICTON(A1,A2,A3)  CCALLSFSUB3(HICTON,hicton,STRING,PINT,PFLOAT,A1,A2,A3)
0214 #define HID1(A1,A2)  CCALLSFSUB2(HID1,hid1,PINT,PINT,A1,A2)
0215 #define HID2(A1,A2)  CCALLSFSUB2(HID2,hid2,PINT,PINT,A1,A2)
0216 /*  
0217 #define HIDALL(A1,A2)  CCALLSFSUB2(HIDALL,hidall,PINT,PINT,A1,A2)
0218  */
0219 #define HIDALL(A1,A2)  CCALLSFSUB2(HIDALL,hidall,INTV,PINT,A1,A2)
0220 #define HIDOPT(A1,A2)  CCALLSFSUB2(HIDOPT,hidopt,INT,STRING,A1,A2)
0221 #define HIDPOS(A1,A2)  CCALLSFSUB2(HIDPOS,hidpos,INT,PINT,A1,A2)
0222  PROTOCCALLSFFUN2(FLOAT,HIE,hie,INT,INT)
0223 #define HIE(A2,A3)  CCALLSFFUN2(HIE,hie,INT,INT,A2,A3)
0224  PROTOCCALLSFFUN2(FLOAT,HIF,hif,INT,INT)
0225 #define HIF(A2,A3)  CCALLSFFUN2(HIF,hif,INT,INT,A2,A3)
0226  PROTOCCALLSFFUN3(FLOAT,HIJ,hij,INT,INT,INT)
0227 #define HIJ(A2,A3,A4)  CCALLSFFUN3(HIJ,hij,INT,INT,INT,A2,A3,A4)
0228 #define HIJXY(A1,A2,A3,A4,A5)  CCALLSFSUB5(HIJXY,hijxy,INT,INT,INT,PFLOAT,PFLOAT,A1,A2,A3,A4,A5)
0229 #define HINDEX() CCALLSFSUB0(HINDEX,hindex)
0230 #define HINPF(A1,A2)  CCALLSFSUB2(HINPF,hinpf,INT,INT,A1,A2)
0231 #define HINPRX(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HINPRX,hinprx,STRING,INT,INT,INT,FLOAT,FLOAT,INT,A1,A2,A3,A4,A5,A6,A7)
0232 #define HINTEG(A1)  CCALLSFSUB1(HINTEG,hinteg,INT,A1)
0233 #define HIPAK1(A1,A2,A3,A4)  CCALLSFSUB4(HIPAK1,hipak1,INT,PINT,INTV,INT,A1,A2,A3,A4)
0234 #define HISTDO() CCALLSFSUB0(HISTDO,histdo)
0235 #define HISTGO(A1)  CCALLSFSUB1(HISTGO,histgo,INT,A1)
0236 #define HITOC(A1,A2,A3,A4)  CCALLSFSUB4(HITOC,hitoc,INT,PSTRING,PINT,PINT,A1,A2,A3,A4)
0237 #define HIX(A1,A2,A3)  CCALLSFSUB3(HIX,hix,INT,INT,PFLOAT,A1,A2,A3)
0238 #define HKF1(A1,A2,A3,A4)  CCALLSFSUB4(HKF1,hkf1,INT,INT,FLOAT,FLOAT,A1,A2,A3,A4)
0239 #define HKF1Q(A1,A2,A3,A4)  CCALLSFSUB4(HKF1Q,hkf1q,INT,INT,FLOAT,FLOAT,A1,A2,A3,A4)
0240 #define HKF2(A1,A2,A3,A4,A5)  CCALLSFSUB5(HKF2,hkf2,INT,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5)
0241 #define HKFF1(A1,A2,A3,A4)  CCALLSFSUB4(HKFF1,hkff1,INT,INT,FLOAT,FLOAT,A1,A2,A3,A4)
0242 #define HKFF2(A1,A2,A3,A4,A5)  CCALLSFSUB5(HKFF2,hkff2,INT,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5)
0243 #define HKFFI1(A1,A2,A3,A4,A5)  CCALLSFSUB5(HKFFI1,hkffi1,INT,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5)
0244 #define HKFI1(A1,A2,A3,A4,A5)  CCALLSFSUB5(HKFI1,hkfi1,INT,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5)
0245 #define HKFILL(A1,A2,A3,A4,A5)  CCALLSFSUB5(HKFILL,hkfill,INT,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5)
0246 #define HKNULI(A1,A2,A3,A4,A5)  CCALLSFSUB5(HKNULI,hknuli,INT,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5)
0247 #define HKNUL1(A1,A2,A3,A4)  CCALLSFSUB4(HKNUL1,hknul1,INT,INT,FLOAT,FLOAT,A1,A2,A3,A4)
0248 #define HKFIL2(A1,A2,A3,A4,A5)  CCALLSFSUB5(HKFIL2,hkfil2,INT,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5)
0249 #define HKFILPF(A1,A2,A3,A4,A5)  CCALLSFSUB5(HKFILPF,hkfilpf,INT,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5)
0250 #define HKIND(A1,A2,A3)  CCALLSFSUB3(HKIND,hkind,INT,PINT,STRING,A1,A2,A3)
0251 #define HLABEL(A1,A2,A3,A4)  CCALLSFSUB4(HLABEL,hlabel,INT,INT,STRINGV,STRING,A1,A2,A3,A4)
0252  PROTOCCALLSFFUN2(LOGICAL,HLABEQ,hlabeq,INT,STRING)
0253 #define HLABEQ(A2,A3)  CCALLSFFUN2(HLABEQ,hlabeq,INT,STRING,A2,A3)
0254  PROTOCCALLSFFUN2(INT,HLABNB,hlabnb,INT,STRING)
0255 #define HLABNB(A2,A3)  CCALLSFFUN2(HLABNB,hlabnb,INT,STRING,A2,A3)
0256 /*
0257 #define HLATTR(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)  CCALLSFSUB11(HLATTR,hlattr,INT,PSTRING,PSTRING,PINT,PFLOAT,PFLOAT,PINT,PFLOAT,PFLOAT,PINT,PINT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)
0258 */
0259  PROTOCCALLSFFUN2(DOUBLE,HLBINO,hlbino,INT,INT)
0260 #define HLBINO(A2,A3)  CCALLSFFUN2(HLBINO,hlbino,INT,INT,A2,A3)
0261  PROTOCCALLSFFUN3(INT,HLCCMP,hlccmp,INTV,BYTE,INT)
0262 #define HLCCMP(A2,A3,A4)  CCALLSFFUN3(HLCCMP,hlccmp,INTV,BYTE,INT,A2,A3,A4)
0263 #define HLCM() CCALLSFSUB0(HLCM,hlcm)
0264 #define HLCM3(A1)  CCALLSFSUB1(HLCM3,hlcm3,INT,A1)
0265 #define HLDIR(A1,A2)  CCALLSFSUB2(HLDIR,hldir,STRING,STRING,A1,A2)
0266 #define HLDIR1(A1,A2,A3)  CCALLSFSUB3(HLDIR1,hldir1,INT,INT,INT,A1,A2,A3)
0267 #define HLDIR2() CCALLSFSUB0(HLDIR2,hldir2)
0268 #define HLDIRT(A1)  CCALLSFSUB1(HLDIRT,hldirt,STRING,A1)
0269 #define HLGNXT(A1,A2,A3,A4)  CCALLSFSUB4(HLGNXT,hlgnxt,INT,INT,PSTRING,STRING,A1,A2,A3,A4)
0270  PROTOCCALLSFFUN3(INT,HLHCMP,hlhcmp,INTV,INTV,INT)
0271 #define HLHCMP(A2,A3,A4)  CCALLSFFUN3(HLHCMP,hlhcmp,INTV,INTV,INT,A2,A3,A4)
0272 #define HLIMIT(A1)  CCALLSFSUB1(HLIMIT,hlimit,INT,A1)
0273 #define HLLSQ(A1,A2,A3,A4)  CCALLSFSUB4(HLLSQ,hllsq,INT,PFLOAT,PFLOAT,PINT,A1,A2,A3,A4)
0274 #define HLNEXT(A1,A2,A3,A4)  CCALLSFSUB4(HLNEXT,hlnext,PINT,PSTRING,PSTRING,STRING,A1,A2,A3,A4)
0275  PROTOCCALLSFFUN1(DOUBLE,HLNFCT,hlnfct,INT)
0276 #define HLNFCT(A2)  CCALLSFFUN1(HLNFCT,hlnfct,INT,A2)
0277 #define HLNXTM(A1,A2,A3,A4,A5)  CCALLSFSUB5(HLNXTM,hlnxtm,INTV,PINT,STRING,STRING,STRING,A1,A2,A3,A4,A5)
0278 #define HLNXTM1(A1,A2,A3,A4,A5,A6,A7,A8)  CCALLSFSUB8(HLNXTM1,hlnxtm1,INTV,INTV,INT,INT,PINT,PSTRING,PSTRING,STRING,A1,A2,A3,A4,A5,A6,A7,A8)
0279 #define HLOCAT(A1,A2)  CCALLSFSUB2(HLOCAT,hlocat,INT,PINT,A1,A2)
0280 #define HLOGAR(A1)  CCALLSFSUB1(HLOGAR,hlogar,INT,A1)
0281 #define HLOGPF(A1,A2)  CCALLSFSUB2(HLOGPF,hlogpf,STRING,PINT,A1,A2)
0282 #define HLOK(A1)  CCALLSFSUB1(HLOK,hlok,INT,A1)
0283 #define HLOOP(A1,A2,A3)  CCALLSFSUB3(HLOOP,hloop,INT,STRING,PINT,A1,A2,A3)
0284 #define HLPOS(A1,A2,A3,A4)  CCALLSFSUB4(HLPOS,hlpos,INT,STRING,PINT,STRING,A1,A2,A3,A4)
0285 #define HLSHFT(A1,A2,A3,A4,A5)  CCALLSFSUB5(HLSHFT,hlshft,INTV,PINT,INT,INT,INT,A1,A2,A3,A4,A5)
0286 #define HLSORT(A1,A2,A3,A4)  CCALLSFSUB4(HLSORT,hlsort,INTV,PINT,INT,INT,A1,A2,A3,A4)
0287 #define HLSQ(A1,A2,A3)  CCALLSFSUB3(HLSQ,hlsq,INT,INT,PFLOAT,A1,A2,A3)
0288 #define HLSWAP(A1,A2,A3,A4)  CCALLSFSUB4(HLSWAP,hlswap,PINT,INTV,INT,INT,A1,A2,A3,A4)
0289 #define HMACHI() CCALLSFSUB0(HMACHI,hmachi)
0290 
0291 #if defined(vms) || defined(__vms)
0292 
0293  PROTOCCALLSFFUN3(INT,HCREATEG,hcreateg,STRING,INT,INT)
0294 #define HCREATEG(A2,A3,A4)  CCALLSFFUN3(HCREATEG,hcreateg,STRING,INT,INT,A2,A3,A4)
0295  PROTOCCALLSFFUN3(INT,HMAPG,hmapg,STRING,INT,PINT)
0296 #define HMAPG(A2,A3,A4)  CCALLSFFUN3(HMAPG,hmapg,STRING,INT,PINT,A2,A3,A4)
0297  PROTOCCALLSFFUN3(INT,HFREEG,hfreeg,INT,INTV,INT)
0298 #define HFREEG(A2,A3,A4)  CCALLSFFUN3(HFREEG,hfreeg,INT,INTV,INT,A2,A3,A4)
0299 #define HRESETG(A1,A2)  CCALLSFSUB2(HRESETG,hresetg,INT,INTV,A1,A2)
0300 #define HRESETG1(A1,A2,A3,A4)  CCALLSFSUB4(HRESETG1,hresetg1,INTV,INTV,INT,INT,A1,A2,A3,A4)
0301 #define HREZ0G(A1,A2,A3)  CCALLSFSUB3(HREZ0G,hrez0g,INTV,INTV,INT,A1,A2,A3)
0302 #define HPLISG(A1)  CCALLSFSUB1(HPLISG,hplisg,INTV,A1)
0303 #define HPLISG1(A1,A2,A3,A4)  CCALLSFSUB4(HPLISG1,hplisg1,INTV,INTV,INT,INT,A1,A2,A3,A4)
0304 #define HLNXTG(A1,A2,A3,A4,A5)  CCALLSFSUB5(HLNXTG,hlnxtg,INTV,PINT,STRING,STRING,STRING,A1,A2,A3,A4,A5)
0305 #define HLNXTG1(A1,A2,A3,A4,A5,A6,A7,A8)  CCALLSFSUB8(HLNXTG1,hlnxtg1,INTV,INTV,INT,INT,PINT,PSTRING,PSTRING,STRING,A1,A2,A3,A4,A5,A6,A7,A8)
0306 #define HRZING(A1,A2,A3)  CCALLSFSUB3(HRZING,hrzing,INTV,INT,PINT,A1,A2,A3)
0307 
0308 #else
0309 
0310  PROTOCCALLSFFUN3(INT,HMAPM,hmapm,STRING,INTV,PINT)
0311 #define HMAPM(A2,A3,A4)  CCALLSFFUN3(HMAPM,hmapm,STRING,INTV,PINT,A2,A3,A4)
0312  PROTOCCALLSFFUN4(INT,HCREATEM,hcreatem,STRING,INTV,INT,PINT)
0313 #define HCREATEM(A2,A3,A4,A5)  CCALLSFFUN4(HCREATEM,hcreatem,STRING,INTV,INT,PINT,A2,A3,A4,A5)
0314 #define HLIMAP(A1,A2)  CCALLSFSUB2(HLIMAP,hlimap,INT,STRING,A1,A2)
0315 
0316 #endif
0317 
0318  PROTOCCALLSFFUN1(FLOAT,HMAX,hmax,INT)
0319 #define HMAX(A2)  CCALLSFFUN1(HMAX,hmax,INT,A2)
0320 #define HMAXIM(A1,A2)  CCALLSFSUB2(HMAXIM,hmaxim,INT,FLOAT,A1,A2)
0321 #define HMCINI(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HMCINI,hmcini,INT,INTV,INTV,INT,STRING,PINT,A1,A2,A3,A4,A5,A6)
0322  PROTOCCALLSFFUN1(DOUBLE,HMCLNL,hmclnl,DOUBLEV)
0323 #define HMCLNL(A2)  CCALLSFFUN1(HMCLNL,hmclnl,DOUBLEV,A2)
0324 /*
0325 #define HMCMLL(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13)  CCALLSFSUB13(HMCMLL,hmcmll,INT,INTV,INTV,INT,STRING,INTV,DOUBLEV,PDOUBLE,DOUBLEV,DOUBLEV,DOUBLE,PDOUBLE,PDOUBLE,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13)
0326 */
0327 #define HMCONV(A1,A2,A3,A4)  CCALLSFSUB4(HMCONV,hmconv,INT,PFLOAT,PFLOAT,PFLOAT,A1,A2,A3,A4)
0328 #define HMDIR(A1,A2)  CCALLSFSUB2(HMDIR,hmdir,STRING,STRING,A1,A2)
0329  PROTOCCALLSFFUN2(FLOAT,HMEDIA,hmedia,PFLOAT,INT)
0330 #define HMEDIA(A2,A3)  CCALLSFFUN2(HMEDIA,hmedia,PFLOAT,INT,A2,A3)
0331  PROTOCCALLSFFUN1(FLOAT,HMIN,hmin,INT)
0332 #define HMIN(A2)  CCALLSFFUN1(HMIN,hmin,INT,A2)
0333 #define HMINIM(A1,A2)  CCALLSFSUB2(HMINIM,hminim,INT,FLOAT,A1,A2)
0334 #define HMINUI(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HMINUI,hminui,ROUTINE,DOUBLEV,DOUBLEV,DOUBLEV,PDOUBLE,PDOUBLE,INTV,A1,A2,A3,A4,A5,A6,A7)
0335 #define HMINUT(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HMINUT,hminut,ROUTINE,ROUTINE,PFLOAT,PFLOAT,PFLOAT,PFLOAT,STRING,A1,A2,A3,A4,A5,A6,A7)
0336 /*
0337 #define HMONIT(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12)  CCALLSFSUB12(HMONIT,hmonit,FLOAT,INT,INT,INT,FLOAT,FLOAT,FLOAT,FLOATV,FLOATV,FLOATV,FLOATV,FLOATV,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12)
0338 */
0339 /*
0340 #define HMUFIT(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17,A18)\
0341   CCALLSFSUB18(HMUFIT,hmufit,PFLOAT,FLOATV,FLOATV,PINT,PDOUBLE,DOUBLEV,PDOUBLE,PDOUBLE,PDOUBLE,PDOUBLE,PDOUBLE,DOUBLEV,PDOUBLE,PDOUBLE,PINT,PINT,FLOAT,FLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13,A14,A15,A16,A17,A18)
0342 */
0343 #define HNBENT(A1,A2,A3)  CCALLSFSUB3(HNBENT,hnbent,INT,STRING,PINT,A1,A2,A3)
0344 #define HNBFWR(A1)  CCALLSFSUB1(HNBFWR,hnbfwr,INT,A1)
0345   PROTOCCALLSFFUN0(INT,HNBMIN,hnbmin)
0346 #define HNBMIN() CCALLSFFUN0(HNBMIN,hnbmin)
0347  PROTOCCALLSFFUN1(INT,HNBPTR,hnbptr,STRING)
0348 #define HNBPTR(A2)  CCALLSFFUN1(HNBPTR,hnbptr,STRING,A2)
0349 #define HNBUF(A1)  CCALLSFSUB1(HNBUF,hnbuf,INT,A1)
0350 #define HNBUFD(A1)  CCALLSFSUB1(HNBUFD,hnbufd,INT,A1)
0351 #define HNBUFF(A1,A2)  CCALLSFSUB2(HNBUFF,hnbuff,INT,LOGICAL,A1,A2)
0352 #define HNBUFR(A1)  CCALLSFSUB1(HNBUFR,hnbufr,INT,A1)
0353 #define HNDESC(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HNDESC,hndesc,INT,PINT,PINT,PINT,PINT,PLOGICAL,A1,A2,A3,A4,A5,A6)
0354 #define HNHDWR(A1)  CCALLSFSUB1(HNHDWR,hnhdwr,INT,A1)
0355 #define HNMADR(A1,A2,A3)  CCALLSFSUB3(HNMADR,hnmadr,STRING,PINT,LOGICAL,A1,A2,A3)
0356  PROTOCCALLSFFUN1(INT,HNMPTR,hnmptr,STRING)
0357 #define HNMPTR(A2)  CCALLSFFUN1(HNMPTR,hnmptr,STRING,A2)
0358 #define HNMSET(A1,A2,A3)  CCALLSFSUB3(HNMSET,hnmset,INT,INT,INT,A1,A2,A3)
0359 #define HNOENT(A1,A2)  CCALLSFSUB2(HNOENT,hnoent,INT,PINT,A1,A2)
0360 #define HNORMA(A1,A2)  CCALLSFSUB2(HNORMA,hnorma,INT,FLOAT,A1,A2)
0361 #define HNPART(A1,A2,A3,A4,A5)  CCALLSFSUB5(HNPART,hnpart,STRING,PSTRINGV,PINT,INT,PINT,A1,A2,A3,A4,A5)
0362 #define HNSIZE(A1,A2,A3)  CCALLSFSUB3(HNSIZE,hnsize,PINT,PINT,PINT,A1,A2,A3)
0363 #define HNTDEL(A1)  CCALLSFSUB1(HNTDEL,hntdel,STRING,A1)
0364 #define HNTDIM(A1,A2,A3,A4)  CCALLSFSUB4(HNTDIM,hntdim,STRING,PINT,PINT,INT,A1,A2,A3,A4)
0365 #define HNTGET(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HNTGET,hntget,INT,STRING,PINT,INT,INT,INT,PINT,A1,A2,A3,A4,A5,A6,A7)
0366 #define HNTGETI(A1,A2,A3,A4,A5,A6,A7,A8)  CCALLSFSUB8(HNTGETI,hntgeti,INT,INT,INT,PSTRING,INT,INT,INT,PINT,A1,A2,A3,A4,A5,A6,A7,A8)
0367 #define HNTMP(A1)  CCALLSFSUB1(HNTMP,hntmp,INT,A1)
0368 #define HNTMPD(A1)  CCALLSFSUB1(HNTMPD,hntmpd,INT,A1)
0369 #define HNTMPF(A1,A2)  CCALLSFSUB2(HNTMPF,hntmpf,INT,LOGICAL,A1,A2)
0370 #define HNTNAM(A1,A2)  CCALLSFSUB2(HNTNAM,hntnam,STRING,PINT,A1,A2)
0371  PROTOCCALLSFFUN1(LOGICAL,HNTNEW,hntnew,INT)
0372 #define HNTNEW(A2)  CCALLSFFUN1(HNTNEW,hntnew,INT,A2)
0373 #define HNTRD(A1,A2,A3,A4)  CCALLSFSUB4(HNTRD,hntrd,INT,INT,INT,PINT,A1,A2,A3,A4)
0374 #define HNTSAV() CCALLSFSUB0(HNTSAV,hntsav)
0375 #define HNTTOK(A1,A2,A3,A4,A5)  CCALLSFSUB5(HNTTOK,hnttok,STRING,PSTRINGV,PINT,INT,PINT,A1,A2,A3,A4,A5)
0376 #define HNTVAR(A1,A2,A3,A4,A5,A6,A7,A8)  CCALLSFSUB8(HNTVAR,hntvar,INT,INT,PSTRING,PSTRING,PINT,PINT,PINT,PINT,A1,A2,A3,A4,A5,A6,A7,A8)
0377 #define HNTWRT(A1,A2,A3)  CCALLSFSUB3(HNTWRT,hntwrt,INT,INT,PINT,A1,A2,A3)
0378 #define HOBSOL(A1,A2,A3)  CCALLSFSUB3(HOBSOL,hobsol,STRING,STRING,STRING,A1,A2,A3)
0379 #define HOPER1(A1,A2,A3,A4,A5,A6,A7,A8)  CCALLSFSUB8(HOPER1,hoper1,INT,INT,INT,INT,INT,FLOAT,FLOAT,INT,A1,A2,A3,A4,A5,A6,A7,A8)
0380 #define HOPER1A(A1,A2,A3,A4)  CCALLSFSUB4(HOPER1A,hoper1a,INT,INT,INT,FLOAT,A1,A2,A3,A4)
0381 #define HOPERA(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HOPERA,hopera,INT,STRING,INT,INT,FLOAT,FLOAT,A1,A2,A3,A4,A5,A6)
0382 #define HOPTPF() CCALLSFSUB0(HOPTPF,hoptpf)
0383 #define HOUTPF(A1)  CCALLSFSUB1(HOUTPF,houtpf,INT,A1)
0384 #define HOUTPU(A1)  CCALLSFSUB1(HOUTPU,houtpu,INT,A1)
0385 #define HP1DIM(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HP1DIM,hp1dim,FLOATV,FLOATV,FLOATV,INT,PFLOAT,PFLOAT,INT,A1,A2,A3,A4,A5,A6,A7)
0386 /*
0387 #define HP1ROT(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13)  CCALLSFSUB13(HP1ROT,hp1rot,FLOAT,FLOAT,FLOAT,INT,PFLOAT,PFLOAT,FLOAT,FLOAT,INT,INT,INT,FLOATV,FLOATV,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12,A13)
0388 */
0389 #define HPAFF(A1,A2,A3)  CCALLSFSUB3(HPAFF,hpaff,STRINGV,INT,PSTRING,A1,A2,A3)
0390 #define HPAGSZ(A1)  CCALLSFSUB1(HPAGSZ,hpagsz,INT,A1)
0391 #define HPAK(A1,A2)  CCALLSFSUB2(HPAK,hpak,INT,FLOATV,A1,A2)
0392 #define HPAKAD(A1,A2)  CCALLSFSUB2(HPAKAD,hpakad,INT,FLOATV,A1,A2)
0393 #define HPAKE(A1,A2)  CCALLSFSUB2(HPAKE,hpake,INT,FLOATV,A1,A2)
0394 #define HPARAM(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HPARAM,hparam,INT,INT,FLOAT,INTV,PDOUBLE,PINT,PINT,A1,A2,A3,A4,A5,A6,A7)
0395 /*
0396 #define HPARMN(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)  CCALLSFSUB11(HPARMN,hparmn,PFLOAT,FLOATV,FLOATV,INT,INT,INT,FLOAT,INTV,PDOUBLE,PINT,PINT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)
0397 */
0398 #define HPARNT(A1,A2)  CCALLSFSUB2(HPARNT,hparnt,PINT,STRING,A1,A2)
0399 #define HPATH(A1)  CCALLSFSUB1(HPATH,hpath,STRING,A1)
0400 #define HPCHAN(A1,A2,A3,A4,A5)  CCALLSFSUB5(HPCHAN,hpchan,INT,INT,INT,INT,INTV,A1,A2,A3,A4,A5)
0401 #define HPCHAR(A1,A2)  CCALLSFSUB2(HPCHAR,hpchar,INTV,INTV,A1,A2)
0402 /*
0403 #define HPCONT(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)  CCALLSFSUB11(HPCONT,hpcont,STRING,FLOATV,INT,INT,FLOAT,PINT,INT,INTV,INT,INT,INT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)
0404 */
0405 #define HPDIR(A1,A2)  CCALLSFSUB2(HPDIR,hpdir,STRING,STRING,A1,A2)
0406 #define HPHIST(A1,A2,A3)  CCALLSFSUB3(HPHIST,hphist,INT,STRING,INT,A1,A2,A3)
0407 #define HPHS(A1)  CCALLSFSUB1(HPHS,hphs,INT,A1)
0408 #define HPHST(A1)  CCALLSFSUB1(HPHST,hphst,INT,A1)
0409  PROTOCCALLSFFUN1(FLOAT,HPKR32,hpkr32,INT)
0410 #define HPKR32(A2)  CCALLSFFUN1(HPKR32,hpkr32,INT,A2)
0411 #define HPLISM(A1)  CCALLSFSUB1(HPLISM,hplism,INTV,A1)
0412 #define HPLISM1(A1,A2,A3,A4,A5)  CCALLSFSUB5(HPLISM1,hplism1,INTV,INTV,INT,INT,INT,A1,A2,A3,A4,A5)
0413  PROTOCCALLSFFUN1(FLOAT,HPOLY,hpoly,FLOAT)
0414 #define HPOLY(A2)  CCALLSFFUN1(HPOLY,hpoly,FLOAT,A2)
0415  PROTOCCALLSFFUN1(FLOAT,HPOLYN,hpolyn,FLOAT)
0416 #define HPOLYN(A2)  CCALLSFFUN1(HPOLYN,hpolyn,FLOAT,A2)
0417 #define HPONCE() CCALLSFSUB0(HPONCE,hponce)
0418 #define HPR1H(A1,A2,A3,A4,A5,A6,A7,A8,A9)  CCALLSFSUB9(HPR1H,hpr1h,INT,INT,INT,FLOAT,FLOAT,FLOAT,FLOAT,FLOATV,FLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9)
0419 /*
0420 #define HPR1V(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12)  CCALLSFSUB12(HPR1V,hpr1v,PFLOAT,PFLOAT,PFLOAT,PFLOAT,FLOATV,INT,INT,INT,FLOAT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11,A12)
0421 */
0422 #define HPR2(A1,A2,A3)  CCALLSFSUB3(HPR2,hpr2,PFLOAT,INTV,INTV,A1,A2,A3)
0423 #define HPRCHA(A1,A2)  CCALLSFSUB2(HPRCHA,hprcha,INT,STRING,A1,A2)
0424 #define HPRCON(A1,A2)  CCALLSFSUB2(HPRCON,hprcon,INT,STRING,A1,A2)
0425 #define HPRERR(A1,A2)  CCALLSFSUB2(HPRERR,hprerr,INT,STRING,A1,A2)
0426 #define HPRFUN(A1,A2)  CCALLSFSUB2(HPRFUN,hprfun,INT,STRING,A1,A2)
0427 #define HPRHIS(A1,A2)  CCALLSFSUB2(HPRHIS,hprhis,INT,STRING,A1,A2)
0428 #define HPRINT(A1)  CCALLSFSUB1(HPRINT,hprint,INT,A1)
0429 #define HPRLOW(A1,A2)  CCALLSFSUB2(HPRLOW,hprlow,INT,STRING,A1,A2)
0430 #define HPRNT(A1)  CCALLSFSUB1(HPRNT,hprnt,INT,A1)
0431 #define HPRNTS() CCALLSFSUB0(HPRNTS,hprnts)
0432 #define HPRNTU(A1)  CCALLSFSUB1(HPRNTU,hprntu,INT,A1)
0433 #define HPROF2(A1,A2,A3)  CCALLSFSUB3(HPROF2,hprof2,INT,INT,STRING,A1,A2,A3)
0434 #define HPROJ1(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HPROJ1,hproj1,INT,INT,INT,ROUTINE,INT,INT,INT,A1,A2,A3,A4,A5,A6,A7)
0435 #define HPROJ2(A1,A2,A3,A4,A5,A6,A7,A8)  CCALLSFSUB8(HPROJ2,hproj2,INT,INT,INT,ROUTINE,INT,INT,INT,INT,A1,A2,A3,A4,A5,A6,A7,A8)
0436 #define HPROT(A1,A2,A3)  CCALLSFSUB3(HPROT,hprot,INT,STRING,INT,A1,A2,A3)
0437 #define HPRST(A1,A2,A3,A4,A5,A6,A7,A8)  CCALLSFSUB8(HPRST,hprst,FLOAT,INT,INT,INT,INT,INT,INT,FLOAT,A1,A2,A3,A4,A5,A6,A7,A8)
0438 #define HPRSTA(A1,A2)  CCALLSFSUB2(HPRSTA,hprsta,INT,STRING,A1,A2)
0439 #define HPSCA(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HPSCA,hpsca,FLOATV,INT,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5,A6)
0440 #define HPSCAT(A1)  CCALLSFSUB1(HPSCAT,hpscat,INT,A1)
0441 #define HPSTAT(A1)  CCALLSFSUB1(HPSTAT,hpstat,INT,A1)
0442 #define HPTA(A1,A2,A3,A4)  CCALLSFSUB4(HPTA,hpta,FLOATV,INT,INT,FLOAT,A1,A2,A3,A4)
0443 #define HPTAB(A1)  CCALLSFSUB1(HPTAB,hptab,INT,A1)
0444 #define HPTIT(A1,A2,A3,A4)  CCALLSFSUB4(HPTIT,hptit,INT,INT,FLOAT,FLOAT,A1,A2,A3,A4)
0445  PROTOCCALLSFFUN1(DOUBLE,HQD,hqd,FLOATV)
0446 #define HQD(A2)  CCALLSFFUN1(HQD,hqd,FLOATV,A2)
0447  PROTOCCALLSFFUN1(DOUBLE,HQDD,hqdd,DOUBLEV)
0448 #define HQDD(A2)  CCALLSFFUN1(HQDD,hqdd,DOUBLEV,A2)
0449  PROTOCCALLSFFUN2(DOUBLE,HQDDJ,hqddj,DOUBLEV,INT)
0450 #define HQDDJ(A2,A3)  CCALLSFFUN2(HQDDJ,hqddj,DOUBLEV,INT,A2,A3)
0451  PROTOCCALLSFFUN2(DOUBLE,HQDDJN,hqddjn,DOUBLEV,INT)
0452 #define HQDDJN(A2,A3)  CCALLSFFUN2(HQDDJN,hqddjn,DOUBLEV,INT,A2,A3)
0453  PROTOCCALLSFFUN2(DOUBLE,HQDJ,hqdj,FLOATV,INT)
0454 #define HQDJ(A2,A3)  CCALLSFFUN2(HQDJ,hqdj,FLOATV,INT,A2,A3)
0455  PROTOCCALLSFFUN2(DOUBLE,HQDJN,hqdjn,FLOATV,INT)
0456 #define HQDJN(A2,A3)  CCALLSFFUN2(HQDJN,hqdjn,FLOATV,INT,A2,A3)
0457  PROTOCCALLSFFUN1(DOUBLE,HQDN,hqdn,FLOATV)
0458 #define HQDN(A2)  CCALLSFFUN1(HQDN,hqdn,FLOATV,A2)
0459 #define HQEND() CCALLSFSUB0(HQEND,hqend)
0460  PROTOCCALLSFFUN1(FLOAT,HQF,hqf,FLOATV)
0461 #define HQF(A2)  CCALLSFFUN1(HQF,hqf,FLOATV,A2)
0462  PROTOCCALLSFFUN1(FLOAT,HQFER,hqfer,FLOATV)
0463 #define HQFER(A2)  CCALLSFFUN1(HQFER,hqfer,FLOATV,A2)
0464  PROTOCCALLSFFUN1(FLOAT,HQFNL,hqfnl,FLOATV)
0465 #define HQFNL(A2)  CCALLSFFUN1(HQFNL,hqfnl,FLOATV,A2)
0466  PROTOCCALLSFFUN1(FLOAT,HQFPL,hqfpl,FLOATV)
0467 #define HQFPL(A2)  CCALLSFFUN1(HQFPL,hqfpl,FLOATV,A2)
0468 #define HQGETF(A1)  CCALLSFSUB1(HQGETF,hqgetf,INT,A1)
0469 #define HQGIV(A1,A2,A3,A4)  CCALLSFSUB4(HQGIV,hqgiv,PINT,PINT,PFLOAT,PFLOAT,A1,A2,A3,A4)
0470 #define HQIN(A1)  CCALLSFSUB1(HQIN,hqin,INT,A1)
0471 #define HQINIT(A1,A2,A3,A4)  CCALLSFSUB4(HQINIT,hqinit,INT,INT,INTV,PINT,A1,A2,A3,A4)
0472 #define HQLIF1(A1)  CCALLSFSUB1(HQLIF1,hqlif1,PINT,A1)
0473 #define HQLIF2(A1)  CCALLSFSUB1(HQLIF2,hqlif2,PINT,A1)
0474 #define HQLIF3() CCALLSFSUB0(HQLIF3,hqlif3)
0475 #define HQLSQC(A1,A2,A3,A4,A5)  CCALLSFSUB5(HQLSQC,hqlsqc,PDOUBLE,DOUBLEV,INT,PFLOAT,PINT,A1,A2,A3,A4,A5)
0476 #define HQMNU(A1,A2,A3,A4,A5)  CCALLSFSUB5(HQMNU,hqmnu,INT,DOUBLEV,PDOUBLE,DOUBLEV,INT,A1,A2,A3,A4,A5)
0477 #define HQLSQU(A1,A2,A3,A4,A5)  CCALLSFSUB5(HQLSQU,hqlsqu,PDOUBLE,PDOUBLE,INT,PFLOAT,PINT,A1,A2,A3,A4,A5)
0478 #define HQMXA1(A1,A2,A3,A4)  CCALLSFSUB4(HQMXA1,hqmxa1,INT,DOUBLEV,PDOUBLE,PDOUBLE,A1,A2,A3,A4)
0479 #define HQMXA2(A1,A2,A3,A4)  CCALLSFSUB4(HQMXA2,hqmxa2,INT,DOUBLEV,PDOUBLE,PDOUBLE,A1,A2,A3,A4)
0480 #define HQMXA3(A1,A2,A3,A4)  CCALLSFSUB4(HQMXA3,hqmxa3,INT,DOUBLEV,PDOUBLE,PDOUBLE,A1,A2,A3,A4)
0481 #define HQMXB1(A1,A2,A3,A4)  CCALLSFSUB4(HQMXB1,hqmxb1,INT,DOUBLEV,PDOUBLE,PDOUBLE,A1,A2,A3,A4)
0482 #define HQMXB2(A1,A2,A3,A4)  CCALLSFSUB4(HQMXB2,hqmxb2,INT,DOUBLEV,PDOUBLE,PDOUBLE,A1,A2,A3,A4)
0483 #define HQMXB3(A1,A2,A3,A4)  CCALLSFSUB4(HQMXB3,hqmxb3,INT,DOUBLEV,PDOUBLE,PDOUBLE,A1,A2,A3,A4)
0484 #define HQMXC1(A1,A2,A3,A4)  CCALLSFSUB4(HQMXC1,hqmxc1,INT,DOUBLEV,PDOUBLE,PDOUBLE,A1,A2,A3,A4)
0485 #define HQMXC2(A1,A2,A3,A4)  CCALLSFSUB4(HQMXC2,hqmxc2,INT,DOUBLEV,PDOUBLE,PDOUBLE,A1,A2,A3,A4)
0486 #define HQMXC3(A1,A2,A3,A4)  CCALLSFSUB4(HQMXC3,hqmxc3,INT,DOUBLEV,PDOUBLE,PDOUBLE,A1,A2,A3,A4)
0487 #define HQMXLI(A1,A2,A3,A4,A5,A6,A7)  CCALLSFSUB7(HQMXLI,hqmxli,PDOUBLE,DOUBLEV,PDOUBLE,INT,PFLOAT,PFLOAT,PINT,A1,A2,A3,A4,A5,A6,A7)
0488 #define HQOUT(A1,A2)  CCALLSFSUB2(HQOUT,hqout,INT,INT,A1,A2)
0489 #define HQPOIS(A1,A2,A3,A4,A5,A6,A7,A8,A9)  CCALLSFSUB9(HQPOIS,hqpois,PDOUBLE,PDOUBLE,PDOUBLE,DOUBLEV,PDOUBLE,INT,PFLOAT,PFLOAT,PINT,A1,A2,A3,A4,A5,A6,A7,A8,A9)
0490 #define HQPUTF(A1)  CCALLSFSUB1(HQPUTF,hqputf,INT,A1)
0491 #define HQSIG(A1,A2)  CCALLSFSUB2(HQSIG,hqsig,INT,PINT,A1,A2)
0492 #define HQSIG1(A1,A2,A3,A4)  CCALLSFSUB4(HQSIG1,hqsig1,INT,FLOAT,PINT,PINT,A1,A2,A3,A4)
0493 #define HQSIG2(A1,A2,A3,A4,A5)  CCALLSFSUB5(HQSIG2,hqsig2,INT,INT,FLOAT,PINT,PINT,A1,A2,A3,A4,A5)
0494 #define HQSIG3(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HQSIG3,hqsig3,INT,INT,INT,FLOAT,PINT,PINT,A1,A2,A3,A4,A5,A6)
0495 #define HQSIGA(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HQSIGA,hqsiga,FLOATV,FLOAT,FLOAT,FLOAT,FLOAT,PINT,A1,A2,A3,A4,A5,A6)
0496 #define HQSOLV(A1,A2,A3,A4,A5)  CCALLSFSUB5(HQSOLV,hqsolv,PDOUBLE,DOUBLEV,INT,PFLOAT,PINT,A1,A2,A3,A4,A5)
0497 #define HQSSV() CCALLSFSUB0(HQSSV,hqssv)
0498 /*
0499 #define HQUAD(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)  CCALLSFSUB11(HQUAD,hquad,INT,STRING,INT,FLOAT,FLOAT,PINT,PFLOAT,PINT,PFLOAT,PFLOAT,PINT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)
0500 */
0501 #define HQWAVE(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)  CCALLSFSUB10(HQWAVE,hqwave,STRING,STRINGV,FLOAT,FLOAT,INT,INT,INT,INT,FLOAT,INT,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10)
0502 #define HQWRIF(A1)  CCALLSFSUB1(HQWRIF,hqwrif,INT,A1)
0503  PROTOCCALLSFFUN1(FLOAT,HQXI,hqxi,INTV)
0504 #define HQXI(A2)  CCALLSFFUN1(HQXI,hqxi,INTV,A2)
0505 #define HRDIR(A1,A2,A3)  CCALLSFSUB3(HRDIR,hrdir,INT,PSTRINGV,PINT,A1,A2,A3)
0506 #define HRDIRM(A1,A2,A3,A4)  CCALLSFSUB4(HRDIRM,hrdirm,INTV,INT,PSTRINGV,PINT,A1,A2,A3,A4)
0507 #define HREAD(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HREAD,hread,INT,INT,INT,INT,INT,INT,A1,A2,A3,A4,A5,A6)
0508 #define HREBIN(A1,A2,A3,A4,A5,A6,A7,A8)  CCALLSFSUB8(HREBIN,hrebin,INT,PFLOAT,PFLOAT,PFLOAT,PFLOAT,INT,INT,INT,A1,A2,A3,A4,A5,A6,A7,A8)
0509 #define HRECO1(A1)  CCALLSFSUB1(HRECO1,hreco1,INT,A1)
0510 #define HRECO2() CCALLSFSUB0(HRECO2,hreco2)
0511 #define HRECOV(A1,A2)  CCALLSFSUB2(HRECOV,hrecov,INT,STRING,A1,A2)
0512 #define HREND(A1)  CCALLSFSUB1(HREND,hrend,STRING,A1)
0513 #define HRENID(A1,A2,A3)  CCALLSFSUB3(HRENID,hrenid,INT,INT,STRING,A1,A2,A3)
0514 #define HREP1(A1,A2,A3)  CCALLSFSUB3(HREP1,hrep1,INT,INT,FLOAT,A1,A2,A3)
0515 #define HRESET(A1,A2)  CCALLSFSUB2(HRESET,hreset,INT,STRING,A1,A2)
0516 #define HRESETM(A1,A2)  CCALLSFSUB2(HRESETM,hresetm,INT,INTV,A1,A2)
0517 #define HRESETM1(A1,A2,A3,A4,A5)  CCALLSFSUB5(HRESETM1,hresetm1,INTV,INTV,INT,INT,INT,A1,A2,A3,A4,A5)
0518 #define HREZ0(A1)  CCALLSFSUB1(HREZ0,hrez0,INT,A1)
0519 #define HREZ0M(A1,A2,A3)  CCALLSFSUB3(HREZ0M,hrez0m,INTV,INTV,INT,A1,A2,A3)
0520 #define HRFILE(A1,A2,A3)  CCALLSFSUB3(HRFILE,hrfile,INT,STRING,STRING,A1,A2,A3)
0521 #define HRGET(A1,A2,A3)  CCALLSFSUB3(HRGET,hrget,INT,STRING,STRING,A1,A2,A3)
0522 #define HRIN(A1,A2,A3)  CCALLSFSUB3(HRIN,hrin,INT,INT,INT,A1,A2,A3)
0523 #define HRMAKE(A1,A2,A3,A4)  CCALLSFSUB4(HRMAKE,hrmake,INT,STRING,INT,STRING,A1,A2,A3,A4)
0524 #define HRMDIR(A1,A2)  CCALLSFSUB2(HRMDIR,hrmdir,STRING,FLOAT,A1,A2)
0525  PROTOCCALLSFFUN1(FLOAT,HRNDM,hrndm,INT)
0526 #define HRNDM(A2)  CCALLSFFUN1(HRNDM,hrndm,INT,A2)
0527  PROTOCCALLSFFUN1(FLOAT,HRNDM1,hrndm1,INT)
0528 #define HRNDM1(A2)  CCALLSFFUN1(HRNDM1,hrndm1,INT,A2)
0529 #define HRNDM2(A1,A2,A3)  CCALLSFSUB3(HRNDM2,hrndm2,INT,PFLOAT,PFLOAT,A1,A2,A3)
0530 #define HRNGPF(A1,A2,A3,A4)  CCALLSFSUB4(HRNGPF,hrngpf,INT,INT,PINT,PINT,A1,A2,A3,A4)
0531 #define HROPEN(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HROPEN,hropen,INT,STRING,STRING,STRING,PINT,PINT,A1,A2,A3,A4,A5,A6)
0532 #define HROTAT(A1)  CCALLSFSUB1(HROTAT,hrotat,INT,A1)
0533 #define HROUT(A1,A2,A3)  CCALLSFSUB3(HROUT,hrout,INT,PINT,STRING,A1,A2,A3)
0534 #define HRPUT(A1,A2,A3)  CCALLSFSUB3(HRPUT,hrput,INT,STRING,STRING,A1,A2,A3)
0535 #define HRSORT(A1)  CCALLSFSUB1(HRSORT,hrsort,STRING,A1)
0536  PROTOCCALLSFFUN1(DOUBLE,HRVAL,hrval,FLOATV)
0537 #define HRVAL(A2)  CCALLSFFUN1(HRVAL,hrval,FLOATV,A2)
0538 #define HRZCD(A1,A2)  CCALLSFSUB2(HRZCD,hrzcd,STRING,STRING,A1,A2)
0539 #define HRZFRA(A1,A2,A3)  CCALLSFSUB3(HRZFRA,hrzfra,INT,INT,INT,A1,A2,A3)
0540 #define HRZIN(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HRZIN,hrzin,INT,INTV,INTV,INTV,INT,STRING,A1,A2,A3,A4,A5,A6)
0541 #define HRZINM(A1,A2,A3)  CCALLSFSUB3(HRZINM,hrzinm,INTV,INT,PINT,A1,A2,A3)
0542 #define HRZKEY(A1)  CCALLSFSUB1(HRZKEY,hrzkey,INT,A1)
0543 #define HRZLD(A1,A2)  CCALLSFSUB2(HRZLD,hrzld,STRING,STRING,A1,A2)
0544 #define HRZOUT(A1,A2,A3,A4,A5)  CCALLSFSUB5(HRZOUT,hrzout,INT,INT,INTV,INT,STRING,A1,A2,A3,A4,A5)
0545 #define HRZTOA(A1,A2)  CCALLSFSUB2(HRZTOA,hrztoa,INT,INT,A1,A2)
0546 #define HSCALE(A1,A2)  CCALLSFSUB2(HSCALE,hscale,INT,FLOAT,A1,A2)
0547 #define HSCR(A1,A2,A3)  CCALLSFSUB3(HSCR,hscr,INT,INT,STRING,A1,A2,A3)
0548  PROTOCCALLSFFUN1(LOGICAL,HSELBF,hselbf,INTV)
0549 #define HSELBF(A2)  CCALLSFFUN1(HSELBF,hselbf,INTV,A2)
0550 #define HSEQND(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HSEQND,hseqnd,INT,PDOUBLE,INT,PINT,INT,PDOUBLE,A1,A2,A3,A4,A5,A6)
0551 #define HSETBF(A1,A2,A3)  CCALLSFSUB3(HSETBF,hsetbf,PINT,INTV,FLOAT,A1,A2,A3)
0552 #define HSETPR(A1,A2)  CCALLSFSUB2(HSETPR,hsetpr,STRING,FLOAT,A1,A2)
0553 /*
0554 #define HSGZ(A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)  CCALLSFSUB11(HSGZ,hsgz,ROUTINE,INT,PFLOAT,PFLOAT,PFLOAT,FLOATV,PFLOAT,FLOATV,FLOATV,FLOATV,FLOATV,A1,A2,A3,A4,A5,A6,A7,A8,A9,A10,A11)
0555 */
0556 #define HSIFLA(A1,A2)  CCALLSFSUB2(HSIFLA,hsifla,INT,INT,A1,A2)
0557 #define HSMOOF(A1,A2,A3)  CCALLSFSUB3(HSMOOF,hsmoof,INT,INT,FLOAT,A1,A2,A3)
0558 #define HSPACE(A1,A2,A3)  CCALLSFSUB3(HSPACE,hspace,INT,STRING,INT,A1,A2,A3)
0559  PROTOCCALLSFFUN4(FLOAT,HSPFUN,hspfun,INT,FLOAT,INT,INT)
0560 #define HSPFUN(A2,A3,A4,A5)  CCALLSFFUN4(HSPFUN,hspfun,INT,FLOAT,INT,INT,A2,A3,A4,A5)
0561 #define HSPLI1(A1,A2,A3,A4,A5)  CCALLSFSUB5(HSPLI1,hspli1,INT,INT,INT,INT,PFLOAT,A1,A2,A3,A4,A5)
0562 #define HSPLI2(A1,A2,A3,A4,A5)  CCALLSFSUB5(HSPLI2,hspli2,INT,INT,INT,INT,INT,A1,A2,A3,A4,A5)
0563 #define HSQUEZ(A1)  CCALLSFSUB1(HSQUEZ,hsquez,STRING,A1)
0564 #define HSTAF(A1)  CCALLSFSUB1(HSTAF,hstaf,STRING,A1)
0565 #define HSTAR(A1)  CCALLSFSUB1(HSTAR,hstar,INT,A1)
0566  PROTOCCALLSFFUN4(FLOAT,HSTATI,hstati,INT,INT,STRING,INT)
0567 #define HSTATI(A2,A3,A4,A5)  CCALLSFFUN4(HSTATI,hstati,INT,INT,STRING,INT,A2,A3,A4,A5)
0568  PROTOCCALLSFFUN3(DOUBLE,HSTELF,hstelf,INT,INT,FLOAT)
0569 #define HSTELF(A2,A3,A4)  CCALLSFFUN3(HSTELF,hstelf,INT,INT,FLOAT,A2,A3,A4)
0570 #define HSTORE(A1,A2)  CCALLSFSUB2(HSTORE,hstore,INT,INT,A1,A2)
0571  PROTOCCALLSFFUN1(FLOAT,HSUM,hsum,INT)
0572 #define HSUM(A2)  CCALLSFFUN1(HSUM,hsum,INT,A2)
0573 #define HSUPIM(A1)  CCALLSFSUB1(HSUPIM,hsupim,ROUTINE,A1)
0574 #define HSUPIN(A1)  CCALLSFSUB1(HSUPIN,hsupin,INT,A1)
0575 #define HSUPIS(A1,A2,A3,A4)  CCALLSFSUB4(HSUPIS,hsupis,ROUTINE,INT,INT,INT,A1,A2,A3,A4)
0576 #define HTABLE(A1,A2,A3,A4,A5,A6,A7,A8,A9)  CCALLSFSUB9(HTABLE,htable,INT,STRING,INT,FLOAT,FLOAT,INT,FLOAT,FLOAT,FLOAT,A1,A2,A3,A4,A5,A6,A7,A8,A9)
0577 #define HTFUNC(A1,A2,A3,A4)  CCALLSFSUB4(HTFUNC,htfunc,ROUTINE,FLOAT,FLOAT,PFLOAT,A1,A2,A3,A4)
0578 #define HTITLE(A1)  CCALLSFSUB1(HTITLE,htitle,STRING,A1)
0579 #define HUNLOK(A1)  CCALLSFSUB1(HUNLOK,hunlok,INT,A1)
0580 #define HUNPAK(A1,A2,A3,A4)  CCALLSFSUB4(HUNPAK,hunpak,INT,PFLOAT,STRING,INT,A1,A2,A3,A4)
0581 #define HUNPKE(A1,A2,A3,A4)  CCALLSFSUB4(HUNPKE,hunpke,INT,PFLOAT,STRING,INT,A1,A2,A3,A4)
0582 #define HUOPTC(A1,A2,A3)  CCALLSFSUB3(HUOPTC,huoptc,STRING,STRING,INTV,A1,A2,A3)
0583 #define HUPKRD(A1,A2,A3)  CCALLSFSUB3(HUPKRD,hupkrd,INT,PINT,INT,A1,A2,A3)
0584 #define HUWFUN(A1,A2,A3,A4,A5)  CCALLSFSUB5(HUWFUN,huwfun,INT,INT,STRING,INT,STRING,A1,A2,A3,A4,A5)
0585 #define HVXIST(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HVXIST,hvxist,STRING,PSTRING,PSTRING,PINT,PINT,PINT,A1,A2,A3,A4,A5,A6)
0586 #define HWBNAM(A1,A2)  CCALLSFSUB2(HWBNAM,hwbnam,INT,INT,A1,A2)
0587 #define HWDECL(A1,A2)  CCALLSFSUB2(HWDECL,hwdecl,INT,INT,A1,A2)
0588 #define HWORK(A1,A2,A3)  CCALLSFSUB3(HWORK,hwork,INT,PINT,STRING,A1,A2,A3)
0589 #define HWPDCL(A1,A2)  CCALLSFSUB2(HWPDCL,hwpdcl,INT,INT,A1,A2)
0590 #define HWRITE(A1,A2,A3,A4,A5,A6)  CCALLSFSUB6(HWRITE,hwrite,INT,INT,INT,INT,INT,INT,A1,A2,A3,A4,A5,A6)
0591 #define HWRITF(A1)  CCALLSFSUB1(HWRITF,hwritf,INT,A1)
0592  PROTOCCALLSFFUN2(FLOAT,HX,hx,INT,FLOAT)
0593 #define HX(A2,A3)  CCALLSFFUN2(HX,hx,INT,FLOAT,A2,A3)
0594  PROTOCCALLSFFUN2(FLOAT,HXE,hxe,INT,FLOAT)
0595 #define HXE(A2,A3)  CCALLSFFUN2(HXE,hxe,INT,FLOAT,A2,A3)
0596 #define HXI(A1,A2,A3)  CCALLSFSUB3(HXI,hxi,INT,FLOAT,PINT,A1,A2,A3)
0597 #define HXNORM(A1)  CCALLSFSUB1(HXNORM,hxnorm,PFLOAT,A1)
0598  PROTOCCALLSFFUN3(FLOAT,HXY,hxy,INT,FLOAT,FLOAT)
0599 #define HXY(A2,A3,A4)  CCALLSFFUN3(HXY,hxy,INT,FLOAT,FLOAT,A2,A3,A4)
0600 #define HXYIJ(A1,A2,A3,A4,A5)  CCALLSFSUB5(HXYIJ,hxyij,INT,FLOAT,FLOAT,PINT,PINT,A1,A2,A3,A4,A5)
[ Source navigation ] [ Diff markup ] [ Identifier search ] [ general search ]

This page was automatically generated by the 2.3.5 LXR engine.

The LXR team
Valid CSS 2.1! Valid HTML 4.01!