suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix type of sqrt

Browse Source 
svn: r17273
This commit is contained in:
Sam Tobin-Hochstadt 2009-12-11 23:08:48 +00:00
parent d0c8a19ce8
commit a1f647121d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/typed-scheme/private/base-env-numeric.ss
View File

@ -107,7 +107,7 @@
[rationalize (N N . -> . N)] [rationalize (N N . -> . N)]
[expt (cl->* (-Integer -Integer . -> . -Integer) (N N . -> . N))] [expt (cl->* (-Integer -Integer . -> . -Integer) (N N . -> . N))]
[sqrt (cl->* [sqrt (cl->*
(-Real . -> . -Real) (-Nat . -> . -Real)
(N . -> . N))] (N . -> . N))]
[log (cl->* [log (cl->*
(-Pos . -> . -Real) (-Pos . -> . -Real)