R/addPT.R

Defines functions `addPT`

`addPT` <-
function(MEC, pch=5)
  {

    focpoint(MEC$P$az, MEC$P$dip, pch=5, lab="P", UP=MEC$UP)
    focpoint(MEC$T$az, MEC$T$dip, pch=5, lab="T", UP=MEC$UP)

  }

Try the RFOC package in your browser

Any scripts or data that you put into this service are public.

RFOC documentation built on Sept. 8, 2023, 6:12 p.m.