$title Test correctness of exp intrinsic (FNEXP,SEQ=151) * define some sets, etc. $include fnset_x.inc $gdxin fnexp $load aeps reps relToInput T data $gdxin loop {T, data(T, 'f') = exp.value (data(T,'x')); data(T, 'fx') = exp.grad (data(T,'x')); data(T,'fxx') = exp.hess (data(T,'x')); data(T, 'rc') = mathlastrc; data(T, 'ec') = mathlastec; }; abort$(execerror lt 3) 'Should get execution errors taking exp(x), x large'; execerror = 0; $include fntest_x.inc