tasks a-s
This commit is contained in:
parent
47bf37c096
commit
b83f433714
12433 changed files with 156208 additions and 123 deletions
|
|
@ -0,0 +1,7 @@
|
|||
EvalWithX=. monad : 0
|
||||
'CODE V0 V1'=. y
|
||||
(". CODE [ x=. V1) - (". CODE [ x=. V0)
|
||||
)
|
||||
|
||||
EvalWithX '^x';0;1
|
||||
1.71828183
|
||||
|
|
@ -0,0 +1,2 @@
|
|||
(0&({::) -~&>/@:(128!:2&.>) 1 2&{) '^';0;1
|
||||
1.71828183
|
||||
|
|
@ -0,0 +1,3 @@
|
|||
EvalDiffWithY=: dyad define
|
||||
-~/verb def x"_1 y
|
||||
)
|
||||
|
|
@ -0,0 +1,2 @@
|
|||
'^y' EvalDiffWithY 0 1
|
||||
1.71828
|
||||
|
|
@ -0,0 +1,4 @@
|
|||
EvalDiffWithName=: adverb define
|
||||
:
|
||||
-~/m adverb def ('(m)=.y';x)"_1 y
|
||||
)
|
||||
|
|
@ -0,0 +1,4 @@
|
|||
'^George' 'George' EvalDiffWithName 0 1
|
||||
1.71828
|
||||
'Z + 2^Z' 'Z' EvalDiffWithName 2 3
|
||||
5
|
||||
Loading…
Add table
Add a link
Reference in a new issue