#!/bin/bash
#	$Id: psmeca.sh 12114 2013-09-03 19:19:00Z fwobbe $
#
# Check gmt psmeca for plotting beach balls

ps=psmeca.ps

# Right lateral Strike Slip
echo 0.0 5.0 0.0 0 90 0 5 0 0   Right Strike Slip | gmt psmeca -Sa2.5c -Gblack -R-1/4/0/6 -JM14c -P -B2 -K > $ps

# Left lateral Strike Slip
echo 2.0 5.0 0.0 0 90 180 5 0 0 Left Strike Slip | gmt psmeca -Sa2.5c -Gblack -R -J -K -O >> $ps

# Thrust
echo 0.0 3.0 0.0 0 45 90 5 0 0  Thrust | gmt psmeca -Sa2.5c -Gblack -R -J -K -O >> $ps
echo 2.0 3.0 0.0 45 45 90 5 0 0 Thrust | gmt psmeca -Sa2.5c -Gblack -R -J -K -O >> $ps

# Normal
echo 0.0 1.0 0.0 0 45 -90 5 0 0  Normal | gmt psmeca -Sa2.5c -Gblack -R -J -K -O >> $ps
echo 2.0 1.0 0.0 45 45 -90 5 0 0 Normal | gmt psmeca -Sa2.5c -Gblack -R -J -K -O >> $ps

# Mixed
echo 3.4 0.6 0.0 10 35 129 5 0 0 Mixed  | gmt psmeca -Sa2.5c -Gblack -R -J -O >> $ps