View/Edit #3450:identity

Switch to edit mode.

Name(s): identity
1: {size} = args
2: m = this:new(size, size)
3: for i in [1..size]
4:   m[i][i] = 1.0
5: endfor
6: return m
7: "Last modified by Cecil (#7407) on Sat Aug 10 08:58:52 2002 MDT."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: manta (#7165)

You are not logged in.

[home | help | who | search | setup | code]