load2.gms : test filtered $load

Description

AB00747, the gdx filter could overflow AND may
have been wrong when using $onMulti in declarations or $load
sequences.


Small Model of Type : GAMS


Category : GAMS Test library


Main file : load2.gms

$title 'Test filtered $load' (LOAD2,SEQ=221)

$onText
AB00747, the gdx filter could overflow AND may
have been wrong when using $onMulti in declarations or $load
sequences.

$load dom sub(dom) more_uels param(dom)
$offText

$onEcho > xx.gms
set i /i1*i2/
    ii /i1*i100/;
parameter A(i) /i1=1, i2=2/;
parameter B(ii);
B(ii)= Ord(ii);
$offEcho

$call =gams xx.gms gdx=data lo=%GAMS.lo%

set i,ii;
parameter A(i), AA(i);
$gdxIn data
$load I A
* expand the domain
$load ii
* the filter should be able to handle this
$load AA=B
$gdxIn

display i,a,aa;
Abort$(Card(a) <> Card(AA)) "GDX loading filter does not work";