declare x(m+n) fixed; declare b(m) fixed defined x; declare c(n) fixed defined x(1sub+hbound(b,1));