View/Edit #132:tofloat

Switch to edit mode.

Name(s): tofloat
1:  {bignum} = args
2:  r = 0.0
3:  typeof(bignum) == $STR && (bignum = decode_binary(bignum, 1))
4:  for x in [1..length(bignum)]
5:    r = r * 256.0
6:    r = r + tofloat(bignum[x])
7:  endfor
8:  return r
9:  "Last modified by manta (#7165) on Sat Apr 15 16:31:12 2000 EDT."
10: "This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:05 2002 MDT)."
11: "Last modified by Dax (#789) on Tue May  3 14:03:26 2005 MDT."

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

You are not logged in.

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