Add tasks for all the new languages
This commit is contained in:
parent
9dc3c2bb62
commit
bba7bfd280
13208 changed files with 134745 additions and 0 deletions
|
|
@ -0,0 +1,16 @@
|
|||
;; By decreasing order of performance
|
||||
;; 1) user definition : lambda and closure
|
||||
|
||||
(define (ucompose f g ) (lambda (x) ( f ( g x))))
|
||||
(ucompose sin cos)
|
||||
→ (🔒 λ (_x) (f (g _x)))
|
||||
|
||||
;; 2) built-in compose : lambda
|
||||
|
||||
(compose sin cos)
|
||||
→ (λ (_#:g1002) (#apply-compose (#list #cos #sin) _#:g1002))
|
||||
|
||||
;; 3) compiled composition
|
||||
|
||||
(define (sincos x) (sin (cos x)))
|
||||
sincos → (λ (_x) (⭕️ #sin (#cos _x)))
|
||||
Loading…
Add table
Add a link
Reference in a new issue