α-wwwiki

α-wwwiki :: history/curry/20130605-094559.txt

editor : alpha [82.251.53.204] 2013/06/05 09:46:00
_h3 derivee with curryfication 
_ul [[curry-cooking-up-tastier-functions|http://javascriptweblog.wordpress.com/2010/04/05/curry-cooking-up-tastier-functions/]]
_ul [[top_ten|http://javascriptweblog.wordpress.com/2010/04/02/my-top-10-javascript-blogs/]]
_ul [[www.svendtofte.com/code/curried_javascript|http://www.svendtofte.com/code/curried_javascript/]]
_ul [[slid.es/gsklee/functional-programming-in-5-minutes|http://slid.es/gsklee/functional-programming-in-5-minutes#]]

_p Grace to curryfication, the derivee of a function for a given value can be done in two "partial" steps, first creating the function, then applying it at a given value. And so, it is possible to define next derivees {u before} applying then at a given value.

{pre 
Instead of : derivee( func, x), we use : derivee(func)(x)
}

{p Enter a value : {input {@ type="text" value="2" onchange="°°

var derivee = function (f) {
  return function (x) {
    return (f(x+0.01)-f(x-0.01))/(2*0.01)
  }
}

var f0 = function (x) { 
  return x*x*x; }       // f0 = x^3 = 1

var f1 = derivee(f0);   // f1 = 3*x^2 = 3
var f2 = derivee(f1);   // f2 = 6*x = 6
var f3 = derivee(f2);   // f3 = 6
var f4 = derivee(f3);   // f4 = 0

var x = parseFloat( this.value );

getId('console').innerHTML = 
   f0(x)+'\n'+f3(x)+'\n'+f2(x)+'\n'+f3(x)+'\n'+f4(x);

°°"}}, then click outside or type [return].}

{pre {@ id="console"}}

_h3 code

{pre °°

var derivee = function (f) {
  return function (x) {
    return (f(x+0.01)-f(x-0.01))/(2*0.01)
  }
}

var f0 = function (x) { 
  return x*x*x; }       // f0 = x^3 = 1

var f1 = derivee(f0);   // f1 = 3*x^2 = 3
var f2 = derivee(f1);   // f2 = 6*x = 6
var f3 = derivee(f2);   // f3 = 6
var f4 = derivee(f3);   // f4 = 0

var x = parseFloat( this.value );

getId('console').innerHTML = 
   f0(x)+'\n'+f3(x)+'\n'+f2(x)+'\n'+f3(x)+'\n'+f4(x);

°°}

_h6 The 4th derivee can be rewritten as :
{pre
var f4 = derivee(f3) 
       = derivee(derivee(f2))
       = derivee(derivee(derivee(f1)))
       = derivee(derivee(derivee(derivee(f0))))

var y  = derivee(derivee(derivee(derivee(f0))))(x)
       = (derivee (derivee (derivee (derivee (f0)))) (x))
}
_h6 a javascript code which  looks like pure LISP code (see [[diff_int|../lambdaway_2.0/?view=diff_int]] in lambdaway) 
{pre °°
  function cubic at x=1
{define cubic (:x) (* :x :x :x)} -> cubic 
{cubic 1} -> 1
{{D cubic} 1} -> 3.0000009999997523 (≠ 3)
{{D {D cubic}} 1} -> 5.999999999894978 (≠ -6)
{{D {D {D cubic}}} 1} -> 6.0000000245974405 (≠ 6)
{{D {D {D {D cubic}}}} 1} -> 0.00004163336342344337 (≠ 0)

°°}

_h3 todo
_p Transpose the javascript curryfication in lambdatalk(lite).