R/GCLCFR.R

Defines functions `GCLCFR`

`GCLCFR` <-
function(t)
{
  r=sin(t)
  o=(1.0 - 0.0033670033 * (r*r))
  return(o)
}

Try the GEOmap package in your browser

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

GEOmap documentation built on Sept. 1, 2023, 5:09 p.m.