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

minor tweak to an example

Browse Source 
svn: r16543
This commit is contained in:
Robby Findler 2009-11-04 17:22:48 +00:00
parent 71ca247b8e
commit eedffbca23
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
collects/scribblings/reference/numbers.scrbl
View File

@ -1,6 +1,7 @@
#lang scribble/doc #lang scribble/doc
@(require "mz.ss" @(require "mz.ss"
scheme/math) scheme/math
(for-label scheme/math))
@(define math-eval (make-base-eval)) @(define math-eval (make-base-eval))
@(interaction-eval #:eval math-eval (require scheme/math)) @(interaction-eval #:eval math-eval (require scheme/math))
@ -508,7 +509,9 @@ produces @scheme[+nan.0] in the case that neither @scheme[y] nor
@defproc[(make-polar [magnitude real?] [angle real?]) number?]{ Returns @defproc[(make-polar [magnitude real?] [angle real?]) number?]{ Returns
@scheme[(+ (* magnitude (cos angle)) (* magnitude (sin angle) 0+1i))]. @scheme[(+ (* magnitude (cos angle)) (* magnitude (sin angle) 0+1i))].
@mz-examples[(make-polar 2 3.14159)]} @mz-examples[#:eval math-eval
(make-polar 10 (* pi 1/2))
(make-polar 10 (* pi 1/4))]}
@defproc[(real-part [z number?]) real?]{ Returns the real part of @defproc[(real-part [z number?]) real?]{ Returns the real part of