stress_format.txt
Format required by OrbScore
when reading principal-stress directions.
--------------------------------------------
The following code in SUBROUTINE GETSTR of OrbScore
will read the data:

       CHARACTER*5 STRTAG, TAG
       CHARACTER*2 STRREG, REGIME
       CHARACTER*1 QUALIT
       REAL NLAT
       INTEGER AZIMUT
       DIMENSION STRTAG(MXSTR), STRPHI(MXSTR), STRTHE(MXSTR),
     +           STRQUA(MXSTR), STRAZI(MXSTR), STRREG(MXSTR)

.........................

   10  READ (IUNITS,11,END=100) TAG,NLAT,ELON,AZIMUT,QUALIT,REGIME
   11       FORMAT (A5,2F9.3,7X,I3,17X,A1,5X,A2)
            NUMSTR=NUMSTR+1
            STRTAG(NUMSTR)=TAG
            STRPHI(NUMSTR)=ELON*PIO180
            STRTHE(NUMSTR)=(90.-NLAT)*PIO180
            STRAZI(NUMSTR)=(180.-AZIMUT)*PIO180
            IF (QUALIT.EQ.'A') THEN
                 STRQUA(NUMSTR)=4.
            ELSE IF (QUALIT.EQ.'B') THEN
                 STRQUA(NUMSTR)=3.
            ELSE IF (QUALIT.EQ.'C') THEN
                 STRQUA(NUMSTR)=2.
            ELSE IF (QUALIT.EQ.'D') THEN
                 STRQUA(NUMSTR)=1.
            ELSE
                 STRQUA(NUMSTR)=0.
            ENDIF
            STRREG(NUMSTR)=REGIME
       IF (NUMSTR.LT.MXSTR) GO TO 10
-------------------------------------------------------
Possible qualities are:

A        excellent
B        good
C        fair
D        poor
E        very poor (ignored by OrbScore)


Possible REGIME values are:

NF         normal faulting
SS         strike-slip faulting
TF         thrust faulting
ST or TS   strike-slip & thrust faulting
NS or SN   strike-slip & normal faulting
U          undefined

-------------------------------------------------------
So, typical data lines might look like:

LABEL  +38.443 +137.234       129                 A     TF
LABEL  -47.123 -136.123        17                 C     SS
------------------------------------------------------------