$title 'Test different GMO Q extraction algorithms' (QCP12,SEQ=862)
$if not set solver        $set solver cplex
$onText
Test different GMO Q extraction algorithms: ThreePass, DoubleForward

Contributor: Renke Kuhlmann, May 2021
$offText

$call gamslib -q qcp1

$call.checkErrorLevel =gams qcp1 lo=%GAMS.lo% solver=%solver% gdx=q_extract_auto.gdx

$echo "qextractalg 1" > %solver%.opt
$call.checkErrorLevel =gams qcp1 lo=%GAMS.lo% solver=%solver% gdx=q_extract_threepass.gdx optfile=1
$call.checkErrorLevel gdxdiff q_extract_auto.gdx q_extract_threepass.gdx > %system.nullfile%

$echo "qextractalg 2" > %solver%.opt
$call.checkErrorLevel =gams qcp1 lo=%GAMS.lo% solver=%solver% gdx=q_extract_doubleforward.gdx optfile=1
$call.checkErrorLevel gdxdiff q_extract_auto.gdx q_extract_doubleforward.gdx > %system.nullfile%