R/ahargana.R

In VedicDateTime: Vedic Calendar System

# ---------------------------------------------------------------------------- #
#' ahargana
#'
#' @param jd Julian day number
#'
#' @return Ahargana
#'
#' @examples
#' ahargana(2459778)
#' ahargana(swephR::swe_julday(2022,7,14,0,swephR::SE$GREG_CAL))
ahargana <- function(jd){
  return (jd - 588465.5)
}
# ---------------------------------------------------------------------------- #