RosettaCodeData/Task/Runtime-evaluation-In-an-environment/J/runtime-evaluation-in-an-environment-1.j
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

7 lines
129 B
Text

EvalWithX=. monad : 0
'CODE V0 V1'=. y
(". CODE [ x=. V1) - (". CODE [ x=. V0)
)
EvalWithX '^x';0;1
1.71828183