#!/usr/bin/gnuplot # JFC.plt # Drahy komet Jupiterovy rodiny. # Miroslav Broz (miroslav.broz@email.cz), Apr 18th 2008 a_J = 5.20 # AU; velka poloosa Jupitera a_S = 9.55 set xl "{/Helvetica-Oblique x} / AU" set yl "{/Helvetica-Oblique y} / AU" set xr [-6:14] y2=9; y1=-y2 set yr [y1:y2] set xtics 5 set ytics 5 set mxtics 5 set mytics 5 set size ratio -1 set style line 1 lt 9 # JFC set style line 2 lt 7 lw 6 # rozptyl na Jupiteru set style line 3 lt 8 lw 4 # Encke set style line 4 lt 6 pt 7 ps 2 # Slunce set style line 5 lt 3 lw 2 pt 7 ps 1 # Jupiter set style line 6 lt 7 lw 0.5 set label " S" at 0,0 front set label " J" at a_J,0 front #set label " S" at -a_S,0 front set label "perihelia" at -0.79*a_J,0 center front font "Helvetica,12" set label "afelia" at 1.5 *a_J,0 center front font "Helvetica,12" p "vline.dat" u (0):(y1+$2*(y2-y1)) not w l ls 6,\ "