fnloggamma.gms : Test correctness of loggamma intrinsic


define some sets, etc.

Small Model of Type : GAMS

Category : GAMS Test library

Main file : fnloggamma.gms   includes :   fnset_x.inc [htmlfntest_x.inc [html]

$title Test correctness of loggamma intrinsic (FNLOGGAMMA,SEQ=729)

* define some sets, etc.
$include fnset_x.inc

$gdxin fnloggamma
$load aeps reps reps1 reps2 relToInput T data

loop {T,
  data(T,  'f')    = loggamma.value (data(T,'x'));
  data(T, 'fx')    = loggamma.grad  (data(T,'x'));
  data(T,'fxx')    = loggamma.hess  (data(T,'x'));
  data(T, 'rc')    = mathlastrc;
  data(T, 'ec')    = mathlastec;

* the data set contains some large values that cause overflow
abort$[execerror < 10] 'Should get execution errors with this test';
execerror = 0;

$include fntest_x.inc