time-to-botec/squiggle/node_modules/@rescript/std/lib/es6/curry.js

527 lines
12 KiB
JavaScript
Raw Normal View History

import * as Caml_array from "./caml_array.js";
function app(_f, _args) {
while(true) {
var args = _args;
var f = _f;
var init_arity = f.length;
var arity = init_arity === 0 ? 1 : init_arity;
var len = args.length;
var d = arity - len | 0;
if (d === 0) {
return f.apply(null, args);
}
if (d >= 0) {
return (function(f,args){
return function (x) {
return app(f, args.concat([x]));
}
}(f,args));
}
_args = Caml_array.sub(args, arity, -d | 0);
_f = f.apply(null, Caml_array.sub(args, 0, arity));
continue ;
};
}
function _1(o, a0) {
var arity = o.length;
if (arity === 1) {
return o(a0);
} else {
switch (arity) {
case 1 :
return o(a0);
case 2 :
return function (param) {
return o(a0, param);
};
case 3 :
return function (param, param$1) {
return o(a0, param, param$1);
};
case 4 :
return function (param, param$1, param$2) {
return o(a0, param, param$1, param$2);
};
case 5 :
return function (param, param$1, param$2, param$3) {
return o(a0, param, param$1, param$2, param$3);
};
case 6 :
return function (param, param$1, param$2, param$3, param$4) {
return o(a0, param, param$1, param$2, param$3, param$4);
};
case 7 :
return function (param, param$1, param$2, param$3, param$4, param$5) {
return o(a0, param, param$1, param$2, param$3, param$4, param$5);
};
default:
return app(o, [a0]);
}
}
}
function __1(o) {
var arity = o.length;
if (arity === 1) {
return o;
} else {
return function (a0) {
return _1(o, a0);
};
}
}
function _2(o, a0, a1) {
var arity = o.length;
if (arity === 2) {
return o(a0, a1);
} else {
switch (arity) {
case 1 :
return app(o(a0), [a1]);
case 2 :
return o(a0, a1);
case 3 :
return function (param) {
return o(a0, a1, param);
};
case 4 :
return function (param, param$1) {
return o(a0, a1, param, param$1);
};
case 5 :
return function (param, param$1, param$2) {
return o(a0, a1, param, param$1, param$2);
};
case 6 :
return function (param, param$1, param$2, param$3) {
return o(a0, a1, param, param$1, param$2, param$3);
};
case 7 :
return function (param, param$1, param$2, param$3, param$4) {
return o(a0, a1, param, param$1, param$2, param$3, param$4);
};
default:
return app(o, [
a0,
a1
]);
}
}
}
function __2(o) {
var arity = o.length;
if (arity === 2) {
return o;
} else {
return function (a0, a1) {
return _2(o, a0, a1);
};
}
}
function _3(o, a0, a1, a2) {
var arity = o.length;
if (arity === 3) {
return o(a0, a1, a2);
} else {
switch (arity) {
case 1 :
return app(o(a0), [
a1,
a2
]);
case 2 :
return app(o(a0, a1), [a2]);
case 3 :
return o(a0, a1, a2);
case 4 :
return function (param) {
return o(a0, a1, a2, param);
};
case 5 :
return function (param, param$1) {
return o(a0, a1, a2, param, param$1);
};
case 6 :
return function (param, param$1, param$2) {
return o(a0, a1, a2, param, param$1, param$2);
};
case 7 :
return function (param, param$1, param$2, param$3) {
return o(a0, a1, a2, param, param$1, param$2, param$3);
};
default:
return app(o, [
a0,
a1,
a2
]);
}
}
}
function __3(o) {
var arity = o.length;
if (arity === 3) {
return o;
} else {
return function (a0, a1, a2) {
return _3(o, a0, a1, a2);
};
}
}
function _4(o, a0, a1, a2, a3) {
var arity = o.length;
if (arity === 4) {
return o(a0, a1, a2, a3);
} else {
switch (arity) {
case 1 :
return app(o(a0), [
a1,
a2,
a3
]);
case 2 :
return app(o(a0, a1), [
a2,
a3
]);
case 3 :
return app(o(a0, a1, a2), [a3]);
case 4 :
return o(a0, a1, a2, a3);
case 5 :
return function (param) {
return o(a0, a1, a2, a3, param);
};
case 6 :
return function (param, param$1) {
return o(a0, a1, a2, a3, param, param$1);
};
case 7 :
return function (param, param$1, param$2) {
return o(a0, a1, a2, a3, param, param$1, param$2);
};
default:
return app(o, [
a0,
a1,
a2,
a3
]);
}
}
}
function __4(o) {
var arity = o.length;
if (arity === 4) {
return o;
} else {
return function (a0, a1, a2, a3) {
return _4(o, a0, a1, a2, a3);
};
}
}
function _5(o, a0, a1, a2, a3, a4) {
var arity = o.length;
if (arity === 5) {
return o(a0, a1, a2, a3, a4);
} else {
switch (arity) {
case 1 :
return app(o(a0), [
a1,
a2,
a3,
a4
]);
case 2 :
return app(o(a0, a1), [
a2,
a3,
a4
]);
case 3 :
return app(o(a0, a1, a2), [
a3,
a4
]);
case 4 :
return app(o(a0, a1, a2, a3), [a4]);
case 5 :
return o(a0, a1, a2, a3, a4);
case 6 :
return function (param) {
return o(a0, a1, a2, a3, a4, param);
};
case 7 :
return function (param, param$1) {
return o(a0, a1, a2, a3, a4, param, param$1);
};
default:
return app(o, [
a0,
a1,
a2,
a3,
a4
]);
}
}
}
function __5(o) {
var arity = o.length;
if (arity === 5) {
return o;
} else {
return function (a0, a1, a2, a3, a4) {
return _5(o, a0, a1, a2, a3, a4);
};
}
}
function _6(o, a0, a1, a2, a3, a4, a5) {
var arity = o.length;
if (arity === 6) {
return o(a0, a1, a2, a3, a4, a5);
} else {
switch (arity) {
case 1 :
return app(o(a0), [
a1,
a2,
a3,
a4,
a5
]);
case 2 :
return app(o(a0, a1), [
a2,
a3,
a4,
a5
]);
case 3 :
return app(o(a0, a1, a2), [
a3,
a4,
a5
]);
case 4 :
return app(o(a0, a1, a2, a3), [
a4,
a5
]);
case 5 :
return app(o(a0, a1, a2, a3, a4), [a5]);
case 6 :
return o(a0, a1, a2, a3, a4, a5);
case 7 :
return function (param) {
return o(a0, a1, a2, a3, a4, a5, param);
};
default:
return app(o, [
a0,
a1,
a2,
a3,
a4,
a5
]);
}
}
}
function __6(o) {
var arity = o.length;
if (arity === 6) {
return o;
} else {
return function (a0, a1, a2, a3, a4, a5) {
return _6(o, a0, a1, a2, a3, a4, a5);
};
}
}
function _7(o, a0, a1, a2, a3, a4, a5, a6) {
var arity = o.length;
if (arity === 7) {
return o(a0, a1, a2, a3, a4, a5, a6);
} else {
switch (arity) {
case 1 :
return app(o(a0), [
a1,
a2,
a3,
a4,
a5,
a6
]);
case 2 :
return app(o(a0, a1), [
a2,
a3,
a4,
a5,
a6
]);
case 3 :
return app(o(a0, a1, a2), [
a3,
a4,
a5,
a6
]);
case 4 :
return app(o(a0, a1, a2, a3), [
a4,
a5,
a6
]);
case 5 :
return app(o(a0, a1, a2, a3, a4), [
a5,
a6
]);
case 6 :
return app(o(a0, a1, a2, a3, a4, a5), [a6]);
case 7 :
return o(a0, a1, a2, a3, a4, a5, a6);
default:
return app(o, [
a0,
a1,
a2,
a3,
a4,
a5,
a6
]);
}
}
}
function __7(o) {
var arity = o.length;
if (arity === 7) {
return o;
} else {
return function (a0, a1, a2, a3, a4, a5, a6) {
return _7(o, a0, a1, a2, a3, a4, a5, a6);
};
}
}
function _8(o, a0, a1, a2, a3, a4, a5, a6, a7) {
var arity = o.length;
if (arity === 8) {
return o(a0, a1, a2, a3, a4, a5, a6, a7);
} else {
switch (arity) {
case 1 :
return app(o(a0), [
a1,
a2,
a3,
a4,
a5,
a6,
a7
]);
case 2 :
return app(o(a0, a1), [
a2,
a3,
a4,
a5,
a6,
a7
]);
case 3 :
return app(o(a0, a1, a2), [
a3,
a4,
a5,
a6,
a7
]);
case 4 :
return app(o(a0, a1, a2, a3), [
a4,
a5,
a6,
a7
]);
case 5 :
return app(o(a0, a1, a2, a3, a4), [
a5,
a6,
a7
]);
case 6 :
return app(o(a0, a1, a2, a3, a4, a5), [
a6,
a7
]);
case 7 :
return app(o(a0, a1, a2, a3, a4, a5, a6), [a7]);
default:
return app(o, [
a0,
a1,
a2,
a3,
a4,
a5,
a6,
a7
]);
}
}
}
function __8(o) {
var arity = o.length;
if (arity === 8) {
return o;
} else {
return function (a0, a1, a2, a3, a4, a5, a6, a7) {
return _8(o, a0, a1, a2, a3, a4, a5, a6, a7);
};
}
}
export {
app ,
_1 ,
__1 ,
_2 ,
__2 ,
_3 ,
__3 ,
_4 ,
__4 ,
_5 ,
__5 ,
_6 ,
__6 ,
_7 ,
__7 ,
_8 ,
__8 ,
}
/* No side effect */