update inbox list
This commit is contained in:
28
vendor/scrivo/highlight.php/test/detect/gauss/default.txt
vendored
Normal file
28
vendor/scrivo/highlight.php/test/detect/gauss/default.txt
vendored
Normal file
@@ -0,0 +1,28 @@
|
||||
// This is a test
|
||||
#include pv.sdf
|
||||
|
||||
proc (1) = calc(local__row, fin);
|
||||
if local__row;
|
||||
nr = local__row;
|
||||
else;
|
||||
k = colsf(fin);
|
||||
nr = floor(minc(maxbytes/(k*8*3.5)|maxvec/(k+1)));
|
||||
endif;
|
||||
retp(nr);
|
||||
endp;
|
||||
|
||||
s = "{% test string %}";
|
||||
|
||||
fn twopi=pi*2;
|
||||
|
||||
/* Takes in multiple numbers.
|
||||
Output sum */
|
||||
keyword add(str);
|
||||
local tok,sum;
|
||||
sum = 0;
|
||||
do until str $== "";
|
||||
{ tok, str } = token(str);
|
||||
sum = sum + stof(tok);
|
||||
endo;
|
||||
print "Sum is: " sum;
|
||||
endp;
|
||||
Reference in New Issue
Block a user