GRF A RNNN01.TXT

General Purpose gINT version 7 and later Graph Reports:
  US A size paper (letter)
  Predominately rock data
  Well column: Not applicable
  Graph column: Not applicable
  Legend: Not applicable

  English (Imperial) units input and output
  Portrait Orientation

Description
===========
Uses a graph report to plot stereonets, that is, a polar coordinate plot of rock dip direction (angle) and joint dip angle from horizontal (radius). The ROCK JOINTS table used by the report has the following fields:
  Depth
  Dip Direction
  Dip Angle
  Joint Type

The Dip Direction values are assumed to be in the form <Direction>Angle<Direction>, for example:
  N30E (30° east of north = 30° azimuth)
  W20S (20° south of west = 250° azimuth)

The Dip Angle is in degrees and must be between 0 and 90.

The Joint Type field is a lookup to the following types:
  MJ   Mechanical Joint
  ND   Natural Discontinuity
  NF   Natural Folidation
  UNK  Unknown or unspecified

The type dictates the data marker that will be used on the plot. This is done in the "Data Marker Expression 1" property under the "Override Line/DM Expressions" tab in the report properties:
<<Case(<<ROCK JOINTS.Joint Type>>,_
  = "MJ",GRF A RNNN01 MECHANICAL JOINT,_
  = "ND",GRF A RNNN01 NATURAL DISCONTINUITY,_
  = "NF",GRF A RNNN01 NATURAL FOLIATION,_
  Else,GRF A RNNN01 UNKNOWN_
)>>

The color of each marker is specified under the same tab in the "Data Marker Color Expression 1" property as:
<<Case(<<ROCK JOINTS.Joint Type>>,_
  = "MJ",255,_
  = "ND",16711680,_
  = "NF",49152,_
  Else,0_
)>>

The above colors are Very Light Red, Very Light Blue, Light Green, and Black, respectively. See the Symbols:Colors application for color numbers of other colors if you wish to change the above.

Finally, the joint types are listed in a legend at the lower left corner of the report in a text entity with the following text expression:
<<Let(Type = NF)>>_
<<Let(Count NF = <<User System Data.GRF A RNNN01 Joint Type Count>>)>>_
<<Let(Type = ND)>>_
<<Let(Count ND = <<User System Data.GRF A RNNN01 Joint Type Count>>)>>_
<<Let(Type = MJ)>>_
<<Let(Count MJ = <<User System Data.GRF A RNNN01 Joint Type Count>>)>>_
<<Let(Type = UNK)>>_
<<Let(Count UNK = <<User System Data.GRF A RNNN01 Joint Type Count>>)>>_
<<Let(Type = "")>>_
<<Let(Count UNK = _
  <<Calc(<<Get(Count UNK)>> + <<User System Data.GRF A RNNN01 Joint Type Count>>)>>_
)>>_
<<Let(Count Specified = _
  <<Calc(_
    <<Get(Count NF)>> + _
    <<Get(Count ND)>> + _
    <<Get(Count MJ)>>_
  )>>_
)>>_
_
<<IIf(<<Get(Count Specified)>>,_
  <<ListBuildSepTrim(<<cr>>,_
    <<IIf(<<Get(Count NF)>>,_
      <<CLR!49152>><<DMK!grf a rnnn01 natural foliation>><<CLR!-1>>  NATURAL FOLIATION_
    )>>,_
    <<IIf(<<Get(Count ND)>>,_
      <<CLR!16711680>><<DMK!grf a rnnn01 natural discontinuity>><<CLR!-1>>  NATURAL DISCONTINUITY_
    )>>,_
    <<IIf(<<Get(Count MJ)>>,_
      <<CLR!255>><<DMK!grf a rnnn01 mechanical joint>><<CLR!-1>>  MECHANICAL JOINT_
    )>>,_
    <<IIf(<<Get(Count UNK)>>,_
      <<DMK!grf a rnnn01 unknown>>  UNKNOWN OR UNSPECIFIED_
    )>>_
  )>>_
)>>

The expression counts the number of occurrences each of the joint types in the plot and only shows the legend for those that are on the plot. If joint types are unspecified or unknown for all the plotted points, the legend is suppressed.

If you want to change the list of joint types you must change all of the above. If you don't wish to use joint types, just leave that field blank or remove the Joint Type field in Input.

Below each data marker the depth of the joint is automatically printed.


Graph reports only work in XY (Cartesian) coordinates. However, polar coordinates can be mapped to an XY system. The Independent axis data expression is:
  <<Calc(<<ROCK JOINTS.Dip Angle>> * <<Sin(<<BearingToAzimuth(<<ROCK JOINTS.Dip Direction>>)>>)>>)>>

The BearingToAzimuth function converts the <Direction>Angle<Direction> format to degrees azimuth (degrees from north in a clockwise direction).

The Dependent axis data expression is:
  <<Calc(<<ROCK JOINTS.Dip Angle>> * <<Cos(<<BearingToAzimuth(<<ROCK JOINTS.Dip Direction>>)>>)>>)>>

Both axes have minimum values of -90 and maximum values of 90.

The report suppresses the drawing of all grid lines and the data frame border. The polar axes are draw on the data frame in Reports:Graphs.

If you wish to enter Dip Direction in degrees azimuth:
1. In Data Design:Project Data, open your project, move to the ROCK JOINTS table, click on the Dip Direction field, and:
  A. Change the field data type of Dip Direction to Integer (or Single if you want to record fractional degrees).
  B. Click the browse button [...] right of the "Field Rules" property and set the minimum to 0 and the maximum to 360.
2. In the report properties dialog in Reports:Graphs change:
  A. The Independent Data Expression to:
       <<Calc(<<ROCK JOINTS.Dip Angle>> * <<Sin(<<ROCK JOINTS.Dip Direction>>)>>)>>
  B. The Dependent Data Expression to:
       <<Calc(<<ROCK JOINTS.Dip Angle>> * <<Cos(<<ROCK JOINTS.Dip Direction>>)>>)>>

See "Special Notes" below for special implementation instructions.
*************************************************

Revision History
================
21 February 2006:
  Initial Upload
*************************************************

INCLUDED FILES:
GRF A RNNN01.GLB
  gINT library file containing:
    Graphs           :  GRF A RNNN01

    Lookup Lists     :  GRF A RNNN01 WL READINGS

    User System Data Items :  GRF A RNNN01 Joint Type Count

    Data Markers     :  GRF A RNNN01 MECHANICAL JOINT
                        GRF A RNNN01 NATURAL DISCONTINUITY
                        GRF A RNNN01 NATURAL FOLIATION
                        GRF A RNNN01 UNKNOWN

  gINT project data template.  You will clone this file to create new project files.

GRF A RNNN01.GPJ
  gINT project file containing one borehole of example data.  You can use this file to clarify any input procedure questions by looking at the way the data was entered in the Input application.  You can also output this data using the report template to see what the final output looks like.
*************************************************

INSTALLATION PROCEDURE:
  1. Copy GRF A RNNN01.GDT to your gINT data template directory (usually C:\Program Files\GINT\DATATMPL).
  2. Copy GRF A RNNN01.GPJ to your gINT projects directory (usually C:\Program Files\GINT\PROJECTS).
  3. Merge GRF A RNNN01.GLB:
    a) Bring up gINT.
    b) Move to the Utilities application group and then to the Lib Merge/Copy application.
    c) Mark "Merge From".
    d) Specify the source library file as GRF A RNNN01.GLB.  Remember to specify the path or use the launch button (...) to select the file with a file dialog.
    e) Check the selection and query options to best meet your needs.  If you wish to merge all of the above, mark Select All and Never Query.
    f) Move all of the tables from the Available Source Table column to the Tables to Merge/Copy column by clicking the >> button.
    g) Click the Execute button.
*************************************************

SPECIAL NOTES:
1. The company name at the upper left is taken from the Company Information dialog (Help:Company Information).
2. Replace the "Logo" text at the upper left with your logo (Draw:Discrete Graphics or Draw:Bitmap Symbol depending on the location of your logo).
3. You can import the ROCK JOINTS table into your project database by:
  A. Move to Data Design:Project Database.
  B. Open a current project or your data template.
  C. Select the Tables:Import Table menu item.
  D. Select the GRF A RNNN01.GPJ or .GDT file.
  E. Select the ROCK JOINTS table.
  F. If you imported into a current project, remember to update the data template. That is most easily done in Input with the File:Make Data Template menu item.
*************************************************