| TUbesselFN | TCL UTILITIES USER MANUAL | TUbesselFN |
|---|
| set |
[TUbesselFN  |
|
| fN | - | Bessel Function to compute which must be one of: J0, J1, I0, I1, K0, K1. |
| X | - | Bessel Function argument. |
| rV | - | Result of Bessel Function computation |
# COMPUTE the Bessel Functions J0, J1, I0, I1 and
# K0, K1 at 2.0
set J0 [TUbesselFN J0 2.0]
set J1 [TUbesselFN J1 2.0]
set I0 [TUbesselFN I0 2.0]
set I1 [TUbesselFN I1 2.0]
set K0 [TUbesselFN K0 2.0]
set K1 [TUbesselFN K1 2.0]
# PRINT out results
puts stderr "Bessel Function J0(2.0) = [format %.5f $J0]"
puts stderr "Bessel Function J1(2.0) = [format %.5f $J1]"
puts stderr "Bessel Function I0(2.0) = [format %.5f $I0]"
puts stderr "Bessel Function I1(2.0) = [format %.5f $I1]"
puts stderr "Bessel Function K0(2.0) = [format %.5f $K0]"
puts stderr "Bessel Function K1(2.0) = [format %.5f $K1]"
> Bessel Function J0(2.0) = 0.22389
> Bessel Function J1(2.0) = 0.57672
> Bessel Function I0(2.0) = 2.27959
> Bessel Function I1(2.0) = 1.59064
> Bessel Function K0(2.0) = 0.11389
> Bessel Function K1(2.0) = 0.13987
| Sept 14, 2006 |
|---|