Takes Strike-Dip-Rake and creates planes and pole locations for MEC structure
CONVERTSDR(strike, dip, rake)
angle, degrees, strike of down dip directin
angle, degrees, dip is measured from the horizontal NOT from the NADIR
angle, degrees
LIST:
strike
dip
rake
list(az, dip) of F-pole
list(az, dip) of G-pole
list(az, dip) of U-pole
list(az, dip) of V-pole
list(az, dip) of P-pole
list(az, dip) of T-pole
list( az1=0, d1=0, az2=0, d2=0, uaz=0, ud=0, vaz=0, vd=0, paz=0, pd =0, taz=0, td=0)
input is strike dip and rake in degrees
BeachFoc
# NOT RUN { s=65 d=25 r=13 mc = CONVERTSDR(s,d,r ) # }
Run the code above in your browser using DataLab