diff --git a/tests/parser/t_normcdf.mod b/tests/parser/t_normcdf.mod index 27a91ef4f..11c2dc218 100644 --- a/tests/parser/t_normcdf.mod +++ b/tests/parser/t_normcdf.mod @@ -6,7 +6,7 @@ x2 = 1; x3 = 0.5; y1 = normcdf(x1(-1),0,1); y2 = normcdf(-x1,-x2,1); -y3 = normcdf(x1/2,0,x3); +y3 = normcdf(x1/2,0,x3(+1)); end; initval; @@ -30,7 +30,7 @@ if abs(oo_.steady_state(3) - pnorm(1.96/2,0,1/2)) > 1e-12; error('Error 3 in t_normcdf') end; -z = [oo_.steady_state(4); oo_.steady_state]; +z = [oo_.steady_state(4); oo_.steady_state; oo_.steady_state(6)]; [junk,JJ] = t_normcdf_dynamic(z,[]); if abs(JJ(4,1) + dnorm(1.96,0,1)) > 1e-12; @@ -45,7 +45,7 @@ end; if abs(JJ(6,5) + dnorm(1.96/2,0,1/2)/2) > 1e-12; error('Error 7 in t_normcdf') end; -if abs(JJ(6,7) - (1/2)*((1.96/2)/(1/2)^2)*dnorm(1.96/2,0,1/2)) > 1e-12; +if abs(JJ(6,8) - (1/2)*((1.96/2)/(1/2)^2)*dnorm(1.96/2,0,1/2)) > 1e-12; error('Error 8 in t_normcdf') end;