
octave -q 

load SEC001_l.short.rail
clf
hold on
lh= line([   0   0], [ 5 -35 ], 'color', [   0/255   0/255   0/255 ], 'clipping', 'off');
lh= line([-100 100], [ 0 0 ],   'color', [   0/255   0/255   0/255 ], 'clipping', 'off');
lh= plot(SEC001_l_short(:,1), -SEC001_l_short(:,2), 'b;001;')
set(gca, 'XTick', -100:20:100)
grid

load SEC017_l.short.rail
load SEC018_l.short.rail
load SEC019_l.short.rail
load SEC020_l.short.rail
load SEC021_l.short.rail

clf
hold on
lh= line([   0   0], [ 5 -35 ], 'color', [   0/255   0/255   0/255 ], 'clipping', 'off');
lh= line([-100 100], [ 0 0 ],   'color', [   0/255   0/255   0/255 ], 'clipping', 'off');
# plot([0 0], [ 5 -35 ], 'k')
# plot([-100 100], [ 0 0 ], 'k')
plot(SEC017_l_short(:,1), -SEC017_l_short(:,2), 'k;017;')
plot(SEC018_l_short(:,1), -SEC018_l_short(:,2), 'r;018;')
plot(SEC019_l_short(:,1), -SEC019_l_short(:,2), 'g;019;')
plot(SEC020_l_short(:,1), -SEC020_l_short(:,2), 'b;020;')
plot(SEC021_l_short(:,1), -SEC021_l_short(:,2), 'm;021;')
set(gca, 'XTick', -120:20:120)
grid



legend("location", "west");
lh= line(SEC017_l_short(:,1), -SEC017_l_short(:,2), 'color', [ 255/255   0/255   0/255 ], 'displayname', '017', 'clipping', 'off');
lh= line(SEC017_l_short(:,1), -SEC017_l_short(:,2), 'color', [ 128/255 128/255   0/255 ], 'displayname', '017', 'clipping', 'off');
lh= line(SEC017_l_short(:,1), -SEC017_l_short(:,2), 'color', [   0/255 255/255   0/255 ], 'displayname', '017', 'clipping', 'off');
lh= line(SEC017_l_short(:,1), -SEC017_l_short(:,2), 'color', [   0/255 128/255 128/255 ], 'displayname', '017', 'clipping', 'off');
lh= line(SEC017_l_short(:,1), -SEC017_l_short(:,2), 'color', [   0/255   0/255 255/255 ], 'displayname', '017', 'clipping', 'off');
