diff options
author | Karl Berry <karl@freefriends.org> | 2017-03-07 18:10:02 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2017-03-07 18:10:02 +0000 |
commit | a6dc131e8a2ff8ce660543a262d771380fdf1b4e (patch) | |
tree | 33ab70fd89ae0842cedcfce676aaa6d64a9eb7dc /Build/source/utils/asymptote/runarray.cc | |
parent | 78cc0e8d7d1977f9cf5c8c9ba3d9de81ed6e03a3 (diff) |
asy 2.40 sources
git-svn-id: svn://tug.org/texlive/trunk@43422 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/utils/asymptote/runarray.cc')
-rw-r--r-- | Build/source/utils/asymptote/runarray.cc | 61 |
1 files changed, 31 insertions, 30 deletions
diff --git a/Build/source/utils/asymptote/runarray.cc b/Build/source/utils/asymptote/runarray.cc index 779047c9b6f..734143d262d 100644 --- a/Build/source/utils/asymptote/runarray.cc +++ b/Build/source/utils/asymptote/runarray.cc @@ -2135,6 +2135,7 @@ void gen_runarray66(stack *Stack) utils::deleteAlign(f); } #else + unused(a); unused(&sign); array *c=new array(0); error("Please install fftw3, run ./configure, and recompile"); @@ -2142,12 +2143,12 @@ void gen_runarray66(stack *Stack) {Stack->push<pairarray*>(c); return;} } -#line 1800 "runarray.in" +#line 1801 "runarray.in" // Intarray2* triangulate(pairarray *z); void gen_runarray67(stack *Stack) { pairarray * z=vm::pop<pairarray *>(Stack); -#line 1801 "runarray.in" +#line 1802 "runarray.in" size_t nv=checkArray(z); // Call robust version of Gilles Dumoulin's port of Paul Bourke's // triangulation code. @@ -2181,12 +2182,12 @@ void gen_runarray67(stack *Stack) {Stack->push<Intarray2*>(t); return;} } -#line 1835 "runarray.in" +#line 1836 "runarray.in" // real norm(realarray *a); void gen_runarray68(stack *Stack) { realarray * a=vm::pop<realarray *>(Stack); -#line 1836 "runarray.in" +#line 1837 "runarray.in" size_t n=checkArray(a); real M=0.0; for(size_t i=0; i < n; ++i) { @@ -2196,12 +2197,12 @@ void gen_runarray68(stack *Stack) {Stack->push<real>(M); return;} } -#line 1846 "runarray.in" +#line 1847 "runarray.in" // real norm(realarray2 *a); void gen_runarray69(stack *Stack) { realarray2 * a=vm::pop<realarray2 *>(Stack); -#line 1847 "runarray.in" +#line 1848 "runarray.in" size_t n=checkArray(a); real M=0.0; for(size_t i=0; i < n; ++i) { @@ -2215,12 +2216,12 @@ void gen_runarray69(stack *Stack) {Stack->push<real>(M); return;} } -#line 1861 "runarray.in" +#line 1862 "runarray.in" // real norm(triplearray2 *a); void gen_runarray70(stack *Stack) { triplearray2 * a=vm::pop<triplearray2 *>(Stack); -#line 1862 "runarray.in" +#line 1863 "runarray.in" size_t n=checkArray(a); real M=0.0; for(size_t i=0; i < n; ++i) { @@ -2234,12 +2235,12 @@ void gen_runarray70(stack *Stack) {Stack->push<real>(sqrt(M)); return;} } -#line 1876 "runarray.in" +#line 1877 "runarray.in" // real change2(triplearray2 *a); void gen_runarray71(stack *Stack) { triplearray2 * a=vm::pop<triplearray2 *>(Stack); -#line 1877 "runarray.in" +#line 1878 "runarray.in" size_t n=checkArray(a); if(n == 0) {Stack->push<real>(0.0); return;} @@ -2260,13 +2261,13 @@ void gen_runarray71(stack *Stack) {Stack->push<real>(M); return;} } -#line 1898 "runarray.in" +#line 1899 "runarray.in" // triple minbezier(triplearray2 *P, triple b); void gen_runarray72(stack *Stack) { triple b=vm::pop<triple>(Stack); triplearray2 * P=vm::pop<triplearray2 *>(Stack); -#line 1899 "runarray.in" +#line 1900 "runarray.in" size_t N; real *A=copyTripleArray2Components(P,N); bound_double *B=bounddouble(N); @@ -2277,13 +2278,13 @@ void gen_runarray72(stack *Stack) {Stack->push<triple>(b); return;} } -#line 1910 "runarray.in" +#line 1911 "runarray.in" // triple maxbezier(triplearray2 *P, triple b); void gen_runarray73(stack *Stack) { triple b=vm::pop<triple>(Stack); triplearray2 * P=vm::pop<triplearray2 *>(Stack); -#line 1911 "runarray.in" +#line 1912 "runarray.in" size_t N; real *A=copyTripleArray2Components(P,N); bound_double *B=bounddouble(N); @@ -2294,13 +2295,13 @@ void gen_runarray73(stack *Stack) {Stack->push<triple>(b); return;} } -#line 1922 "runarray.in" +#line 1923 "runarray.in" // pair minratio(triplearray2 *P, pair b); void gen_runarray74(stack *Stack) { pair b=vm::pop<pair>(Stack); triplearray2 * P=vm::pop<triplearray2 *>(Stack); -#line 1923 "runarray.in" +#line 1924 "runarray.in" size_t N; triple *A=copyTripleArray2C(P,N); real fuzz=sqrtFuzz*norm(A,N); @@ -2311,13 +2312,13 @@ void gen_runarray74(stack *Stack) {Stack->push<pair>(b); return;} } -#line 1934 "runarray.in" +#line 1935 "runarray.in" // pair maxratio(triplearray2 *P, pair b); void gen_runarray75(stack *Stack) { pair b=vm::pop<pair>(Stack); triplearray2 * P=vm::pop<triplearray2 *>(Stack); -#line 1935 "runarray.in" +#line 1936 "runarray.in" size_t N; triple *A=copyTripleArray2C(P,N); bound_triple *B=boundtriple(N); @@ -2328,11 +2329,11 @@ void gen_runarray75(stack *Stack) {Stack->push<pair>(b); return;} } -#line 1946 "runarray.in" +#line 1947 "runarray.in" // realarray* _projection(); void gen_runarray76(stack *Stack) { -#line 1947 "runarray.in" +#line 1948 "runarray.in" #ifdef HAVE_GL array *a=new array(14); gl::projection P=gl::camera(); @@ -2503,25 +2504,25 @@ void gen_runarray_venv(venv &ve) addFunc(ve, run::gen_runarray65, primReal(), SYM(simpson), formal(realRealFunction(), SYM(f), false, false), formal(primReal(), SYM(a), false, false), formal(primReal(), SYM(b), false, false), formal(primReal(), SYM(acc), true, false), formal(primReal(), SYM(dxmax), true, false)); #line 1770 "runarray.in" addFunc(ve, run::gen_runarray66, pairArray(), SYM(fft), formal(pairArray(), SYM(a), false, false), formal(primInt(), SYM(sign), true, false)); -#line 1800 "runarray.in" +#line 1801 "runarray.in" addFunc(ve, run::gen_runarray67, IntArray2(), SYM(triangulate), formal(pairArray(), SYM(z), false, false)); -#line 1835 "runarray.in" +#line 1836 "runarray.in" addFunc(ve, run::gen_runarray68, primReal(), SYM(norm), formal(realArray(), SYM(a), false, false)); -#line 1846 "runarray.in" +#line 1847 "runarray.in" addFunc(ve, run::gen_runarray69, primReal(), SYM(norm), formal(realArray2(), SYM(a), false, false)); -#line 1861 "runarray.in" +#line 1862 "runarray.in" addFunc(ve, run::gen_runarray70, primReal(), SYM(norm), formal(tripleArray2(), SYM(a), false, false)); -#line 1876 "runarray.in" +#line 1877 "runarray.in" addFunc(ve, run::gen_runarray71, primReal(), SYM(change2), formal(tripleArray2(), SYM(a), false, false)); -#line 1898 "runarray.in" +#line 1899 "runarray.in" addFunc(ve, run::gen_runarray72, primTriple(), SYM(minbezier), formal(tripleArray2(), SYM(p), false, false), formal(primTriple(), SYM(b), false, false)); -#line 1910 "runarray.in" +#line 1911 "runarray.in" addFunc(ve, run::gen_runarray73, primTriple(), SYM(maxbezier), formal(tripleArray2(), SYM(p), false, false), formal(primTriple(), SYM(b), false, false)); -#line 1922 "runarray.in" +#line 1923 "runarray.in" addFunc(ve, run::gen_runarray74, primPair(), SYM(minratio), formal(tripleArray2(), SYM(p), false, false), formal(primPair(), SYM(b), false, false)); -#line 1934 "runarray.in" +#line 1935 "runarray.in" addFunc(ve, run::gen_runarray75, primPair(), SYM(maxratio), formal(tripleArray2(), SYM(p), false, false), formal(primPair(), SYM(b), false, false)); -#line 1946 "runarray.in" +#line 1947 "runarray.in" addFunc(ve, run::gen_runarray76, realArray(), SYM(_projection)); } |