static/highlight/languages/gauss.js

   1 /*! `gauss` grammar compiled for Highlight.js 11.11.1 */
   2   (function(){
   3     var hljsGrammar = (function () {
   4   'use strict';
   5
   6   /*
   7   Language: GAUSS
   8   Author: Matt Evans <matt@aptech.com>
   9   Description: GAUSS Mathematical and Statistical language
  10   Website: https://www.aptech.com
  11   Category: scientific
  12   */
  13   function gauss(hljs) {
  14     const KEYWORDS = {
  15       keyword: 'bool break call callexe checkinterrupt clear clearg closeall cls comlog compile '
  16                 + 'continue create debug declare delete disable dlibrary dllcall do dos ed edit else '
  17                 + 'elseif enable end endfor endif endp endo errorlog errorlogat expr external fn '
  18                 + 'for format goto gosub graph if keyword let lib library line load loadarray loadexe '
  19                 + 'loadf loadk loadm loadp loads loadx local locate loopnextindex lprint lpwidth lshow '
  20                 + 'matrix msym ndpclex new open output outwidth plot plotsym pop prcsn print '
  21                 + 'printdos proc push retp return rndcon rndmod rndmult rndseed run save saveall screen '
  22                 + 'scroll setarray show sparse stop string struct system trace trap threadfor '
  23                 + 'threadendfor threadbegin threadjoin threadstat threadend until use while winprint '
  24                 + 'ne ge le gt lt and xor or not eq eqv',
  25       built_in: 'abs acf aconcat aeye amax amean AmericanBinomCall AmericanBinomCall_Greeks AmericanBinomCall_ImpVol '
  26                 + 'AmericanBinomPut AmericanBinomPut_Greeks AmericanBinomPut_ImpVol AmericanBSCall AmericanBSCall_Greeks '
  27                 + 'AmericanBSCall_ImpVol AmericanBSPut AmericanBSPut_Greeks AmericanBSPut_ImpVol amin amult annotationGetDefaults '
  28                 + 'annotationSetBkd annotationSetFont annotationSetLineColor annotationSetLineStyle annotationSetLineThickness '
  29                 + 'annualTradingDays arccos arcsin areshape arrayalloc arrayindex arrayinit arraytomat asciiload asclabel astd '
  30                 + 'astds asum atan atan2 atranspose axmargin balance band bandchol bandcholsol bandltsol bandrv bandsolpd bar '
  31                 + 'base10 begwind besselj bessely beta box boxcox cdfBeta cdfBetaInv cdfBinomial cdfBinomialInv cdfBvn cdfBvn2 '
  32                 + 'cdfBvn2e cdfCauchy cdfCauchyInv cdfChic cdfChii cdfChinc cdfChincInv cdfExp cdfExpInv cdfFc cdfFnc cdfFncInv '
  33                 + 'cdfGam cdfGenPareto cdfHyperGeo cdfLaplace cdfLaplaceInv cdfLogistic cdfLogisticInv cdfmControlCreate cdfMvn '
  34                 + 'cdfMvn2e cdfMvnce cdfMvne cdfMvt2e cdfMvtce cdfMvte cdfN cdfN2 cdfNc cdfNegBinomial cdfNegBinomialInv cdfNi '
  35                 + 'cdfPoisson cdfPoissonInv cdfRayleigh cdfRayleighInv cdfTc cdfTci cdfTnc cdfTvn cdfWeibull cdfWeibullInv cdir '
  36                 + 'ceil ChangeDir chdir chiBarSquare chol choldn cholsol cholup chrs close code cols colsf combinate combinated '
  37                 + 'complex con cond conj cons ConScore contour conv convertsatostr convertstrtosa corrm corrms corrvc corrx corrxs '
  38                 + 'cos cosh counts countwts crossprd crout croutp csrcol csrlin csvReadM csvReadSA cumprodc cumsumc curve cvtos '
  39                 + 'datacreate datacreatecomplex datalist dataload dataloop dataopen datasave date datestr datestring datestrymd '
  40                 + 'dayinyr dayofweek dbAddDatabase dbClose dbCommit dbCreateQuery dbExecQuery dbGetConnectOptions dbGetDatabaseName '
  41                 + 'dbGetDriverName dbGetDrivers dbGetHostName dbGetLastErrorNum dbGetLastErrorText dbGetNumericalPrecPolicy '
  42                 + 'dbGetPassword dbGetPort dbGetTableHeaders dbGetTables dbGetUserName dbHasFeature dbIsDriverAvailable dbIsOpen '
  43                 + 'dbIsOpenError dbOpen dbQueryBindValue dbQueryClear dbQueryCols dbQueryExecPrepared dbQueryFetchAllM dbQueryFetchAllSA '
  44                 + 'dbQueryFetchOneM dbQueryFetchOneSA dbQueryFinish dbQueryGetBoundValue dbQueryGetBoundValues dbQueryGetField '
  45                 + 'dbQueryGetLastErrorNum dbQueryGetLastErrorText dbQueryGetLastInsertID dbQueryGetLastQuery dbQueryGetPosition '
  46                 + 'dbQueryIsActive dbQueryIsForwardOnly dbQueryIsNull dbQueryIsSelect dbQueryIsValid dbQueryPrepare dbQueryRows '
  47                 + 'dbQuerySeek dbQuerySeekFirst dbQuerySeekLast dbQuerySeekNext dbQuerySeekPrevious dbQuerySetForwardOnly '
  48                 + 'dbRemoveDatabase dbRollback dbSetConnectOptions dbSetDatabaseName dbSetHostName dbSetNumericalPrecPolicy '
  49                 + 'dbSetPort dbSetUserName dbTransaction DeleteFile delif delrows denseToSp denseToSpRE denToZero design det detl '
  50                 + 'dfft dffti diag diagrv digamma doswin DOSWinCloseall DOSWinOpen dotfeq dotfeqmt dotfge dotfgemt dotfgt dotfgtmt '
  51                 + 'dotfle dotflemt dotflt dotfltmt dotfne dotfnemt draw drop dsCreate dstat dstatmt dstatmtControlCreate dtdate dtday '
  52                 + 'dttime dttodtv dttostr dttoutc dtvnormal dtvtodt dtvtoutc dummy dummybr dummydn eig eigh eighv eigv elapsedTradingDays '
  53                 + 'endwind envget eof eqSolve eqSolvemt eqSolvemtControlCreate eqSolvemtOutCreate eqSolveset erf erfc erfccplx erfcplx error '
  54                 + 'etdays ethsec etstr EuropeanBinomCall EuropeanBinomCall_Greeks EuropeanBinomCall_ImpVol EuropeanBinomPut '
  55                 + 'EuropeanBinomPut_Greeks EuropeanBinomPut_ImpVol EuropeanBSCall EuropeanBSCall_Greeks EuropeanBSCall_ImpVol '
  56                 + 'EuropeanBSPut EuropeanBSPut_Greeks EuropeanBSPut_ImpVol exctsmpl exec execbg exp extern eye fcheckerr fclearerr feq '
  57                 + 'feqmt fflush fft ffti fftm fftmi fftn fge fgemt fgets fgetsa fgetsat fgetst fgt fgtmt fileinfo filesa fle flemt '
  58                 + 'floor flt fltmt fmod fne fnemt fonts fopen formatcv formatnv fputs fputst fseek fstrerror ftell ftocv ftos ftostrC '
  59                 + 'gamma gammacplx gammaii gausset gdaAppend gdaCreate gdaDStat gdaDStatMat gdaGetIndex gdaGetName gdaGetNames gdaGetOrders '
  60                 + 'gdaGetType gdaGetTypes gdaGetVarInfo gdaIsCplx gdaLoad gdaPack gdaRead gdaReadByIndex gdaReadSome gdaReadSparse '
  61                 + 'gdaReadStruct gdaReportVarInfo gdaSave gdaUpdate gdaUpdateAndPack gdaVars gdaWrite gdaWrite32 gdaWriteSome getarray '
  62                 + 'getdims getf getGAUSShome getmatrix getmatrix4D getname getnamef getNextTradingDay getNextWeekDay getnr getorders '
  63                 + 'getpath getPreviousTradingDay getPreviousWeekDay getRow getscalar3D getscalar4D getTrRow getwind glm gradcplx gradMT '
  64                 + 'gradMTm gradMTT gradMTTm gradp graphprt graphset hasimag header headermt hess hessMT hessMTg hessMTgw hessMTm '
  65                 + 'hessMTmw hessMTT hessMTTg hessMTTgw hessMTTm hessMTw hessp hist histf histp hsec imag indcv indexcat indices indices2 '
  66                 + 'indicesf indicesfn indnv indsav integrate1d integrateControlCreate intgrat2 intgrat3 inthp1 inthp2 inthp3 inthp4 '
  67                 + 'inthpControlCreate intquad1 intquad2 intquad3 intrleav intrleavsa intrsect intsimp inv invpd invswp iscplx iscplxf '
  68                 + 'isden isinfnanmiss ismiss key keyav keyw lag lag1 lagn lapEighb lapEighi lapEighvb lapEighvi lapgEig lapgEigh lapgEighv '
  69                 + 'lapgEigv lapgSchur lapgSvdcst lapgSvds lapgSvdst lapSvdcusv lapSvds lapSvdusv ldlp ldlsol linSolve listwise ln lncdfbvn '
  70                 + 'lncdfbvn2 lncdfmvn lncdfn lncdfn2 lncdfnc lnfact lngammacplx lnpdfmvn lnpdfmvt lnpdfn lnpdft loadd loadstruct loadwind '
  71                 + 'loess loessmt loessmtControlCreate log loglog logx logy lower lowmat lowmat1 ltrisol lu lusol machEpsilon make makevars '
  72                 + 'makewind margin matalloc matinit mattoarray maxbytes maxc maxindc maxv maxvec mbesselei mbesselei0 mbesselei1 mbesseli '
  73                 + 'mbesseli0 mbesseli1 meanc median mergeby mergevar minc minindc minv miss missex missrv moment momentd movingave '
  74                 + 'movingaveExpwgt movingaveWgt nextindex nextn nextnevn nextwind ntos null null1 numCombinations ols olsmt olsmtControlCreate '
  75                 + 'olsqr olsqr2 olsqrmt ones optn optnevn orth outtyp pacf packedToSp packr parse pause pdfCauchy pdfChi pdfExp pdfGenPareto '
  76                 + 'pdfHyperGeo pdfLaplace pdfLogistic pdfn pdfPoisson pdfRayleigh pdfWeibull pi pinv pinvmt plotAddArrow plotAddBar plotAddBox '
  77                 + 'plotAddHist plotAddHistF plotAddHistP plotAddPolar plotAddScatter plotAddShape plotAddTextbox plotAddTS plotAddXY plotArea '
  78                 + 'plotBar plotBox plotClearLayout plotContour plotCustomLayout plotGetDefaults plotHist plotHistF plotHistP plotLayout '
  79                 + 'plotLogLog plotLogX plotLogY plotOpenWindow plotPolar plotSave plotScatter plotSetAxesPen plotSetBar plotSetBarFill '
  80                 + 'plotSetBarStacked plotSetBkdColor plotSetFill plotSetGrid plotSetLegend plotSetLineColor plotSetLineStyle plotSetLineSymbol '
  81                 + 'plotSetLineThickness plotSetNewWindow plotSetTitle plotSetWhichYAxis plotSetXAxisShow plotSetXLabel plotSetXRange '
  82                 + 'plotSetXTicInterval plotSetXTicLabel plotSetYAxisShow plotSetYLabel plotSetYRange plotSetZAxisShow plotSetZLabel '
  83                 + 'plotSurface plotTS plotXY polar polychar polyeval polygamma polyint polymake polymat polymroot polymult polyroot '
  84                 + 'pqgwin previousindex princomp printfm printfmt prodc psi putarray putf putvals pvCreate pvGetIndex pvGetParNames '
  85                 + 'pvGetParVector pvLength pvList pvPack pvPacki pvPackm pvPackmi pvPacks pvPacksi pvPacksm pvPacksmi pvPutParVector '
  86                 + 'pvTest pvUnpack QNewton QNewtonmt QNewtonmtControlCreate QNewtonmtOutCreate QNewtonSet QProg QProgmt QProgmtInCreate '
  87                 + 'qqr qqre qqrep qr qre qrep qrsol qrtsol qtyr qtyre qtyrep quantile quantiled qyr qyre qyrep qz rank rankindx readr '
  88                 + 'real reclassify reclassifyCuts recode recserar recsercp recserrc rerun rescale reshape rets rev rfft rffti rfftip rfftn '
  89                 + 'rfftnp rfftp rndBernoulli rndBeta rndBinomial rndCauchy rndChiSquare rndCon rndCreateState rndExp rndGamma rndGeo rndGumbel '
  90                 + 'rndHyperGeo rndi rndKMbeta rndKMgam rndKMi rndKMn rndKMnb rndKMp rndKMu rndKMvm rndLaplace rndLCbeta rndLCgam rndLCi rndLCn '
  91                 + 'rndLCnb rndLCp rndLCu rndLCvm rndLogNorm rndMTu rndMVn rndMVt rndn rndnb rndNegBinomial rndp rndPoisson rndRayleigh '
  92                 + 'rndStateSkip rndu rndvm rndWeibull rndWishart rotater round rows rowsf rref sampleData satostrC saved saveStruct savewind '
  93                 + 'scale scale3d scalerr scalinfnanmiss scalmiss schtoc schur searchsourcepath seekr select selif seqa seqm setdif setdifsa '
  94                 + 'setvars setvwrmode setwind shell shiftr sin singleindex sinh sleep solpd sortc sortcc sortd sorthc sorthcc sortind '
  95                 + 'sortindc sortmc sortr sortrc spBiconjGradSol spChol spConjGradSol spCreate spDenseSubmat spDiagRvMat spEigv spEye spLDL '
  96                 + 'spline spLU spNumNZE spOnes spreadSheetReadM spreadSheetReadSA spreadSheetWrite spScale spSubmat spToDense spTrTDense '
  97                 + 'spTScalar spZeros sqpSolve sqpSolveMT sqpSolveMTControlCreate sqpSolveMTlagrangeCreate sqpSolveMToutCreate sqpSolveSet '
  98                 + 'sqrt statements stdc stdsc stocv stof strcombine strindx strlen strput strrindx strsect strsplit strsplitPad strtodt '
  99                 + 'strtof strtofcplx strtriml strtrimr strtrunc strtruncl strtruncpad strtruncr submat subscat substute subvec sumc sumr '
 100                 + 'surface svd svd1 svd2 svdcusv svds svdusv sysstate tab tan tanh tempname '
 101                 + 'time timedt timestr timeutc title tkf2eps tkf2ps tocart todaydt toeplitz token topolar trapchk '
 102                 + 'trigamma trimr trunc type typecv typef union unionsa uniqindx uniqindxsa unique uniquesa upmat upmat1 upper utctodt '
 103                 + 'utctodtv utrisol vals varCovMS varCovXS varget vargetl varmall varmares varput varputl vartypef vcm vcms vcx vcxs '
 104                 + 'vec vech vecr vector vget view viewxyz vlist vnamecv volume vput vread vtypecv wait waitc walkindex where window '
 105                 + 'writer xlabel xlsGetSheetCount xlsGetSheetSize xlsGetSheetTypes xlsMakeRange xlsReadM xlsReadSA xlsWrite xlsWriteM '
 106                 + 'xlsWriteSA xpnd xtics xy xyz ylabel ytics zeros zeta zlabel ztics cdfEmpirical dot h5create h5open h5read h5readAttribute '
 107                 + 'h5write h5writeAttribute ldl plotAddErrorBar plotAddSurface plotCDFEmpirical plotSetColormap plotSetContourLabels '
 108                 + 'plotSetLegendFont plotSetTextInterpreter plotSetXTicCount plotSetYTicCount plotSetZLevels powerm strjoin sylvester '
 109                 + 'strtrim',
 110       literal: 'DB_AFTER_LAST_ROW DB_ALL_TABLES DB_BATCH_OPERATIONS DB_BEFORE_FIRST_ROW DB_BLOB DB_EVENT_NOTIFICATIONS '
 111                + 'DB_FINISH_QUERY DB_HIGH_PRECISION DB_LAST_INSERT_ID DB_LOW_PRECISION_DOUBLE DB_LOW_PRECISION_INT32 '
 112                + 'DB_LOW_PRECISION_INT64 DB_LOW_PRECISION_NUMBERS DB_MULTIPLE_RESULT_SETS DB_NAMED_PLACEHOLDERS '
 113                + 'DB_POSITIONAL_PLACEHOLDERS DB_PREPARED_QUERIES DB_QUERY_SIZE DB_SIMPLE_LOCKING DB_SYSTEM_TABLES DB_TABLES '
 114                + 'DB_TRANSACTIONS DB_UNICODE DB_VIEWS __STDIN __STDOUT __STDERR __FILE_DIR'
 115     };
 116
 117     const AT_COMMENT_MODE = hljs.COMMENT('@', '@');
 118
 119     const PREPROCESSOR =
 120     {
 121       className: 'meta',
 122       begin: '#',
 123       end: '$',
 124       keywords: { keyword: 'define definecs|10 undef ifdef ifndef iflight ifdllcall ifmac ifos2win ifunix else endif lineson linesoff srcfile srcline' },
 125       contains: [
 126         {
 127           begin: /\\\n/,
 128           relevance: 0
 129         },
 130         {
 131           beginKeywords: 'include',
 132           end: '$',
 133           keywords: { keyword: 'include' },
 134           contains: [
 135             {
 136               className: 'string',
 137               begin: '"',
 138               end: '"',
 139               illegal: '\\n'
 140             }
 141           ]
 142         },
 143         hljs.C_LINE_COMMENT_MODE,
 144         hljs.C_BLOCK_COMMENT_MODE,
 145         AT_COMMENT_MODE
 146       ]
 147     };
 148
 149     const STRUCT_TYPE =
 150     {
 151       begin: /\bstruct\s+/,
 152       end: /\s/,
 153       keywords: "struct",
 154       contains: [
 155         {
 156           className: "type",
 157           begin: hljs.UNDERSCORE_IDENT_RE,
 158           relevance: 0
 159         }
 160       ]
 161     };
 162
 163     // only for definitions
 164     const PARSE_PARAMS = [
 165       {
 166         className: 'params',
 167         begin: /\(/,
 168         end: /\)/,
 169         excludeBegin: true,
 170         excludeEnd: true,
 171         endsWithParent: true,
 172         relevance: 0,
 173         contains: [
 174           { // dots
 175             className: 'literal',
 176             begin: /\.\.\./
 177           },
 178           hljs.C_NUMBER_MODE,
 179           hljs.C_BLOCK_COMMENT_MODE,
 180           AT_COMMENT_MODE,
 181           STRUCT_TYPE
 182         ]
 183       }
 184     ];
 185
 186     const FUNCTION_DEF =
 187     {
 188       className: "title",
 189       begin: hljs.UNDERSCORE_IDENT_RE,
 190       relevance: 0
 191     };
 192
 193     const DEFINITION = function(beginKeywords, end, inherits) {
 194       const mode = hljs.inherit(
 195         {
 196           className: "function",
 197           beginKeywords: beginKeywords,
 198           end: end,
 199           excludeEnd: true,
 200           contains: [].concat(PARSE_PARAMS)
 201         },
 202         {}
 203       );
 204       mode.contains.push(FUNCTION_DEF);
 205       mode.contains.push(hljs.C_NUMBER_MODE);
 206       mode.contains.push(hljs.C_BLOCK_COMMENT_MODE);
 207       mode.contains.push(AT_COMMENT_MODE);
 208       return mode;
 209     };
 210
 211     const BUILT_IN_REF =
 212     { // these are explicitly named internal function calls
 213       className: 'built_in',
 214       begin: '\\b(' + KEYWORDS.built_in.split(' ').join('|') + ')\\b'
 215     };
 216
 217     const STRING_REF =
 218     {
 219       className: 'string',
 220       begin: '"',
 221       end: '"',
 222       contains: [ hljs.BACKSLASH_ESCAPE ],
 223       relevance: 0
 224     };
 225
 226     const FUNCTION_REF =
 227     {
 228       // className: "fn_ref",
 229       begin: hljs.UNDERSCORE_IDENT_RE + '\\s*\\(',
 230       returnBegin: true,
 231       keywords: KEYWORDS,
 232       relevance: 0,
 233       contains: [
 234         { beginKeywords: KEYWORDS.keyword },
 235         BUILT_IN_REF,
 236         { // ambiguously named function calls get a relevance of 0
 237           className: 'built_in',
 238           begin: hljs.UNDERSCORE_IDENT_RE,
 239           relevance: 0
 240         }
 241       ]
 242     };
 243
 244     const FUNCTION_REF_PARAMS =
 245     {
 246       // className: "fn_ref_params",
 247       begin: /\(/,
 248       end: /\)/,
 249       relevance: 0,
 250       keywords: {
 251         built_in: KEYWORDS.built_in,
 252         literal: KEYWORDS.literal
 253       },
 254       contains: [
 255         hljs.C_NUMBER_MODE,
 256         hljs.C_BLOCK_COMMENT_MODE,
 257         AT_COMMENT_MODE,
 258         BUILT_IN_REF,
 259         FUNCTION_REF,
 260         STRING_REF,
 261         'self'
 262       ]
 263     };
 264
 265     FUNCTION_REF.contains.push(FUNCTION_REF_PARAMS);
 266
 267     return {
 268       name: 'GAUSS',
 269       aliases: [ 'gss' ],
 270       case_insensitive: true, // language is case-insensitive
 271       keywords: KEYWORDS,
 272       illegal: /(\{[%#]|[%#]\}| <- )/,
 273       contains: [
 274         hljs.C_NUMBER_MODE,
 275         hljs.C_LINE_COMMENT_MODE,
 276         hljs.C_BLOCK_COMMENT_MODE,
 277         AT_COMMENT_MODE,
 278         STRING_REF,
 279         PREPROCESSOR,
 280         {
 281           className: 'keyword',
 282           begin: /\bexternal (matrix|string|array|sparse matrix|struct|proc|keyword|fn)/
 283         },
 284         DEFINITION('proc keyword', ';'),
 285         DEFINITION('fn', '='),
 286         {
 287           beginKeywords: 'for threadfor',
 288           end: /;/,
 289           // end: /\(/,
 290           relevance: 0,
 291           contains: [
 292             hljs.C_BLOCK_COMMENT_MODE,
 293             AT_COMMENT_MODE,
 294             FUNCTION_REF_PARAMS
 295           ]
 296         },
 297         { // custom method guard
 298           // excludes method names from keyword processing
 299           variants: [
 300             { begin: hljs.UNDERSCORE_IDENT_RE + '\\.' + hljs.UNDERSCORE_IDENT_RE },
 301             { begin: hljs.UNDERSCORE_IDENT_RE + '\\s*=' }
 302           ],
 303           relevance: 0
 304         },
 305         FUNCTION_REF,
 306         STRUCT_TYPE
 307       ]
 308     };
 309   }
 310
 311   return gauss;
 312
 313 })();
 314
 315     hljs.registerLanguage('gauss', hljsGrammar);
 316   })();