6 lines
76 B
Mathematica
6 lines
76 B
Mathematica
|
|
function f = deadhub(p,lambda)
|
||
|
|
|
||
|
|
f = -(invsathub(p,lambda)-lambda*abs(p));
|
||
|
|
|
||
|
|
|