RosettaCodeData/Task/Identity-matrix/Fermat/identity-matrix.fermat
2023-07-01 13:44:08 -04:00

4 lines
60 B
Text

Func Identity(n)=Array id[n,n];[id]:=[1].
Identity(7)
[id]