for !r=1 to 999
copy dummy eq_{!r}_{iterationnumber}
scalar bic = eq_{!r}_{iterationnumber}.@sc
delete eq_{!r}_{iterationnumber}
next