(double x)
| 405 | } |
| 406 | |
| 407 | double rodbard(double x) { |
| 408 | // y = c*((a-x/(x-d))^(1/b) |
| 409 | // a=3.9, b=.88, c=712, d=44 |
| 410 | double ex; |
| 411 | if (x == 0.0) |
| 412 | ex = 5.0; |
| 413 | else |
| 414 | ex = Math.exp(Math.log(x/700.0)*0.88); |
| 415 | double y = 3.9-44.0; |
| 416 | y = y/(1.0+ex); |
| 417 | return y+44.0; |
| 418 | } |
| 419 | |
| 420 | /** |
| 421 | Smooth the specified line, preserving the end points.<br> |
no test coverage detected