eval01.gms : constant evaluation with non-stop arithmetic

**Description**

Contributor: Alex

**Small Model of Type : ** GAMS

**Category :** GAMS Test library

**Main file : ** eval01.gms

```
$title constant evaluation with non-stop arithmetic (EVAL01,SEQ=455)
$ontext
Contributor: Alex
$offtext
$ondollar
$eval a log(-1)
$eval b %a%$0
$eval c round(ifthen(1,log(10),UNDF),3)
$eval d ifthen(0,log(10),log(-1))
$eval e 2^3
$eval f sqrt(-1)
$eval g (-1)**2.5
$eval h log(-1)+log(log(-1))
$eval i undf + 10
$eval j log(-1)$0
$eval k 1e-300*1e-300
$eval l exp(1e-200)
$eval r 10-inf
$eval s -(1/0) + 100
$eval t -(1e200*1e200-1e200*1e200)
$eval u 1e200*1e200-1e200*1e200
$eval v -1e200*1e200
$eval w 10/0
$eval x -1/0
$eval y -inf + inf
$eval z 1e200*1e200
$show
$clearerrors
$if not "%a%" == "UNDF" $error a=%a% is wrong
$if not "%b%" == "0" $error b=%b% is wrong
$if not "%c%" == "2.303" $error c=%c% is wrong
$if not "%d%" == "UNDF" $error d=%d% is wrong
$if not "%e%" == "8" $error e=%e% is wrong
$if not "%f%" == "UNDF" $error f=%f% is wrong
$if not "%g%" == "UNDF" $error g=%g% is wrong
$if not "%h%" == "UNDF" $error h=%h% is wrong
$if not "%i%" == "UNDF" $error i=%i% is wrong
$if not "%j%" == "0" $error j=%j% is wrong
$if not "%k%" == "0" $error k=%k% is wrong
$if not "%l%" == "1" $error l=%l% is wrong
$if not "%r%" == "-INF" $error r=%r% is wrong
$if not "%s%" == "-INF" $error s=%s% is wrong
$if not "%t%" == "UNDF" $error t=%t% is wrong
$if not "%u%" == "UNDF" $error u=%u% is wrong
$if not "%v%" == "-INF" $error v=%v% is wrong
$if not "%w%" == "+INF" $error w=%w% is wrong
$if not "%x%" == "-INF" $error x=%x% is wrong
$if not "%y%" == "UNDF" $error y=%y% is wrong
$if not "%z%" == "+INF" $error z=%z% is wrong
```