steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

fix pdiff

cvs
Slava Pestov 2005-11-01 00:54:03 +00:00
parent 730f39ee23
commit 37ad0a4ed2
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
contrib/math/TODO.txt
View File

@ -3,7 +3,7 @@ Nice to have:
- Permutations -- composition and inverse (trivial; use sort and map-with) - Permutations -- composition and inverse (trivial; use sort and map-with)
- Analysis: - Analysis:
- error function, cosine integral, sine integral, fresnel functions - error function, cosine integral, sine integral, fresnel functions
- exponential integral, logarithm integral, zeta function - logarithm integral, zeta function
- airy wave function - airy wave function
- hypergeometric functions - hypergeometric functions
- elliptic functions - elliptic functions

2
contrib/math/polynomials.factor
View File

@ -98,4 +98,4 @@ IN: math-contrib
: pdiff ( p -- p' ) : pdiff ( p -- p' )
#! Polynomial derivative. #! Polynomial derivative.
[ length reverse-slice ] keep [ 1+ * ] 2map 1 swap head* ; dup empty? [ [ length ] keep v* 1 swap tail ] unless ;