card02.gms : Tests miniparser card() function

Description

Contributor: Alex Meeraus, October 2013


Small Model of Type : GAMS


Category : GAMS Test library


Main file : card02.gms

$title 'Tests miniparser card() function' (CARD02,SEQ=621)

$ontext
Contributor: Alex Meeraus, October 2013
$offtext


$ondollar
alias (i,*);
$ife card(i)<>0 $abort should be 0
$eval c1 card(i)
set j / 1*10 /;
$ife card(i)<>10 $abort should be 10
$eval c2 card(i)
set dummy / a,b/;
alias (k,i),(l,j),(l,m)
$ife card(j)<>10 $abort should be 10
$eval c3 card(j)
$ife card(k)<>12 $abort should be 12
$eval c4 card(k)
$ife card(l)<>10 $abort should be 10
$eval c5 card(l)
$ife card(m)<>10 $abort should be 10
$eval c6 card(m)
$show