RosettaCodeData/Task/Identity-matrix/REXX/identity-matrix-3.rexx

4 lines
57 B
Rexx

m.=0
m.0=1000 /* the matrix' size */
m.4.17.333='Walter'