MaplePrimes - answers and comments on Question, why "index/fill" should exist?

2D-input

Preben Alsholm — Wed, 27 Oct 2010 20:22:57 Z

It seems to turn up when using 2d-input. When using 1d-input ("Maple Notation") it doesn't show up.

Related to tables

pchin — Wed, 27 Oct 2010 22:04:46 Z

This behaviour doesn't seem to be directly related to 2-d input. If you enter table([]) in 1-d mode, you'll get the same behaviour. The 2-d math parser calls the table constructor, and that's why you see this unexpected output after entering a command in 2-d math. In any case, we'll look into this issue.

Paulina

meaning

Alejandro Jakubi — Wed, 27 Oct 2010 21:51:18 Z

It is a procedure. In the Standard GUI, after using 2D-input:

showstat(`index/fill`);

`index/fill` := proc(T, iniv)
local low, high, indices, ranges, i, n, nvals;
   1   ranges := [op(2,eval(T))];
   2   if nops(ranges) = nargs-2 then
   3     T[args[3 .. nargs]] := iniv;
   4     return
       end if;
   5   if not type(iniv,list) then
   6     error "initialization of arrays must be done with lists"
       end if;
   7   nvals := nops(iniv);
   8   low := op(1,ranges[nargs-1]);
   9   high := op(2,ranges[nargs-1]);
  10   n := high-low+1;
  11   if n < nvals then
  12     error "a list with %1 entries cannot be used to initialize the range %2", nvals, ranges[nargs-1]
       end if;
  13   indices := args[3 .. nargs];
  14   if nops(ranges) = nargs-1 then
  15     low := low-1;
  16     for i to nvals do
  17       T[indices,low+i] := iniv[i]
         end do
       else
  18     for i to nvals do
  19       procname(T,iniv[i],indices,i-1+op(1,ranges[nargs-1]))
         end do
       end if
end proc

Thanks

Wang Gaoteng — Thu, 28 Oct 2010 06:25:47 Z

Thank you for your attention.

Best regards!

Thanks

Wang Gaoteng — Thu, 28 Oct 2010 06:20:48 Z

When I change 2-D input to 1-D input, it works very well.

Thank you very much!