sl4qcp03.gms : Test case for cancellation in quadratic terms, with solvelink=1,2,4,5

Description

Run qcp03 with solvelink=%solveLink.callScript%,%solveLink.callModule%,%solveLink.asyncSimulate%,%solveLink.loadLibrary%,%solveLink.threadsSimulate%

Contributor: Lutz Westermann


Small Model of Type : QCP


Category : GAMS Test library


Main file : sl4qcp03.gms

$title 'Test case for cancellation in quadratic terms, with solvelink=1,2,4,5,7' (SL4QCP03,SEQ=539)

$onText
Run qcp03 with solvelink=%solveLink.callScript%,%solveLink.callModule%,%solveLink.asyncSimulate%,%solveLink.loadLibrary%,%solveLink.threadsSimulate%

Contributor: Lutz Westermann
$offText

$set XX NT
$if %system.filesys% == UNIX $set XX un
$set q '"'
$if %system.filesys% == UNIX $set q "'"

$call grep -iv scrdir "%gams.scrdir%gmsprm%XX%.%gams.scrext%" | grep -iv scriptnext | grep -iv sysdir | grep -iv JobTrace > "%gams.scrdir%mypf.%gams.scrext%"

$call gams qcp03.gms pf="%gams.scrdir%mypf.%gams.scrext%" i=qcp03.gms solvelink=%solveLink.callScript%
$if errorlevel 1 $abort problems with sl=%solveLink.callScript%

$call gams qcp03.gms pf="%gams.scrdir%mypf.%gams.scrext%" i=qcp03.gms solvelink=%solveLink.callModule%
$if errorlevel 1 $abort problems with sl=%solveLink.callModule%

$call cat "%GAMS.sysdir%gmscmp%XX%.txt" | grep -v "^\*" | awk %q%NF>4 {if ($7>1) print $0 }%q% | grep -vi guss | cut -d" " -f1 | grep -iwq %system.QCP%
$if errorlevel 1 $goTo skipsl5

$call gams qcp03.gms pf="%gams.scrdir%mypf.%gams.scrext%" i=qcp03.gms solvelink=%solveLink.loadLibrary%
$if errorlevel 1 $abort problems with sl=%solveLink.loadLibrary%

$call gams qcp03.gms pf="%gams.scrdir%mypf.%gams.scrext%" i=qcp03.gms solvelink=%solveLink.threadsSimulate%
$if errorlevel 1 $abort problems with sl=%solveLink.threadsSimulate%

$label skipsl5
$call gams qcp03.gms pf="%gams.scrdir%mypf.%gams.scrext%" i=qcp03.gms solvelink=%solveLink.asyncSimulate%
$if errorlevel 1 $abort problems with sl=%solveLink.asyncSimulate%