#!/bin/csh

####### Example B4


/bin/rm tmp.ps

## Spatial window
psxy -N -M -R0/10/-10/0 -G200/250/150 \
-JX5 -X2 -Y3 -P -K <<END>tmp.ps
2.2 1
5.5 1
5.5 -9
2.2 -9
2.2 1
END

pstext -R -N -R -JX -K -O <<END>>tmp.ps
3.8 -8.5 12 0 0 MC Spatial Window
END

## The horizontal lines
psxy -N -M -R -W9/0/0/250 -JX -O -K <<END>>tmp.ps
> >
0 0
10 0
> >
0 -2
10 -2
>  >
0 -4
10 -4
> >
0 -6
10 -6
> >
END

pstext -R -N -R -JX -K -O <<END>>tmp.ps
8.5 -1.8 12 0 0 ML Disc. 1
8.5 -3.8 12 0 0 ML Disc. 2
8.5 -5.8 12 0 0 ML Disc. 3
END

## Stations
psxy -N -R -JX -O -K -St0.3 -G155/0/255 <<END>>tmp.ps
4 0.15
6 0.15
END

pstext -N -R -JX -O -K <<END>>tmp.ps
4 0.85 12 0 5 6 Station
6 0.85 12 0 5 6 Station
4 0.55 12 0 5 6 No. 1
6 0.55 12 0 5 6 No. 2
END

##Rays 
psxy -N -M -R -JX -O -K -W4/255/0/0 <<END>>tmp.ps
> >
4 0
0 -8
>  >
6 0
2 -8
> >
4 0
6.7 -8
> >
6 0
8.7 -8
> >
END

## Piercing points
psxy -R -N -JX -Sc0.1 -G100/250/250 -L -W1 -O -K <<END>>tmp.ps
3.0 -2.0
4.6777 -2.0
5.0 -2.0
6.6777 -2.0
2 -4
4 -4
5.333 -4
7.333 -4
1 -6
3 -6
6 -6
8 -6
END




pstext -N -R -JX -O <<END>>tmp.ps
1.5 -5 12 63.44 1 MC Ray No. 1
3.5 -5 12 63.44 1 MC Ray No. 2
5.7 -5 12 108.44 1 MC Ray No. 3
7.7 -5 12 108.44 1 MC Ray No. 4
2 -9.5 13 0 2 ML Blue dots == Ray piercing points
5 -12   17 0 5 6 A very schematic diagram showing the procedure and
5 -12.5 17 0 5 6 the variation of the number of stacking points with depth
5 -13.0 17 0 5 6 for a given spatial window
END


ps2jpeg150 tmp.ps