View/Edit #3450:transpose

Name(s): transpose

1: {m} = args
2: nm = {}
3: for x in [1..length(m[1])]
4:   nm = {@nm, $list_utils:stripe(m, x)}
5: endfor
6: return nm
7: "Last modified by manta (#7165) on Thu Sep 17 06:06:50 1998 EDT."

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

You are not logged in.