$title 'Test that an MCP with scales is rejected when appropriate' (SCALE02,SEQ=699)

$onText
Start with the simplest MCP model one can imagine:
   f(x) := x-c, x >= 0

If it is scaled, it should be rejected by some solvers:
those withoutscaleDigit = 3

Contributor: Steve Dirkse, Dec 2016
$offText

scalar c / 2 /;

positive variable x;
equation f;
f.. x =G= c;
model m / f.x /;

maxExecerror = 1;
m.scaleopt = 1;
* we assume guss is not OK for scaled MCP models
option mcp = guss;
solve m using mcp;

abort$[execerror = 0] 'We should get an error for this solver on scaled MCP models';
execerror = 0;