Shell one-liner: Difference between revisions
Content added Content deleted
Line 161: | Line 161: | ||
$ gawk 'BEGIN{print"write(6,\"(2(g12.3,x))\")(i/10.0,besj1(i/10.0), i=0,1000)\nend";exit(0)}'|gfortran -x f95 - && gnuplot -p -e 'plot "<./a.out" t "Bessel function of 1st kind" w l' |
$ gawk 'BEGIN{print"write(6,\"(2(g12.3,x))\")(i/10.0,besj1(i/10.0), i=0,1000)\nend";exit(0)}'|gfortran -x f95 - && gnuplot -p -e 'plot "<./a.out" t "Bessel function of 1st kind" w l' |
||
</lang> |
</lang> |
||
Sorry, I don't know how to upload my jpeg file for the Image tag. Let's use the dumb display instead. |
|||
[[Image:Bessel1.jpg]] |
|||
<pre> |
|||
0.6 +*------------+-------------+------------+-------------+------------++ |
|||
+** + + Bessel function of 1st kind ****** + |
|||
0.5 +** ++ |
|||
|** | |
|||
0.4 +** ++ |
|||
* * | |
|||
0.3 *+* * ++ |
|||
* * ** * | |
|||
0.2 *+* *** ** ** ++ |
|||
0.1 *+* * * ** ** *** ** ** * ** * ++ |
|||
* ** * * *** ** * * *** ** *** ** ** *** ** ** *** ** ** | |
|||
0 *+ * * * * * * * * * * * *** * * * * *** * * *** *** * * *** ***+ |
|||
| * * * * *** * * * * *** * * * * *** *** * * **** *** *** *** *| |
|||
-0.1 ++ * * * * ** *** *** ** ** *** ** ** ** ** ** ** ** ** |
|||
| *** *** ** ** ** ** * * | |
|||
-0.2 ++ ** ** ** ++ |
|||
| ** * | |
|||
-0.3 ++ ** ++ |
|||
+ ** + + + + + |
|||
-0.4 ++------------+-------------+------------+-------------+------------++ |
|||
0 20 40 60 80 100 |
|||
</pre> |
|||
=={{header|Gema}}== |
=={{header|Gema}}== |