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

tweak the spacing in the bernoulli sequence

Browse Source
This commit is contained in:
Robby Findler 2013-12-10 12:11:11 -06:00
parent 70a86aac84
commit 19d9d9a8ae
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pkgs/drracket-pkgs/drracket/drracket/private/ada.rkt
View File

@ -70,7 +70,7 @@ bernoulli sequence
(define abs-frac (vc-append 2 n line d)) (define abs-frac (vc-append 2 n line d))
(cond (cond
[(negative? num) [(negative? num)
(hc-append (tt "-") abs-frac)] (hc-append 4 (tt "-") abs-frac)]
[else [else
abs-frac])])) abs-frac])]))