$userfunction

$remark

Give a differentiable real function $f(x)$ that has a $text at $x=$location$.
$f(x)=$ y(x):=RESPONSE[1]; hasextreme:is(at(diff(y(x),x,1),x=LONCAPALIST[1])=0); isrightkind:false; k:0; s:0; if hasextreme then for i:2 while s=0 and not is(diff(y(x),x,i)=0) do (s:at(diff(y(x),x,i),x=LONCAPALIST[1]),k:i); if evenp(k) and is(LONCAPALIST[2]*s>0) then isrightkind:true; hasextreme and isrightkind;
What is the value of your function at this $text?