R/endDate.R

In cboettig/build.eml: Build Ecological Metadata Language Files

#' endDate 
#'
#' endDate 
#'
#'
#' @inheritParams common_attributes 
#' @param calendarDate The calendar date for an event. See [calendarDate()]
#' @param time The time of day for an event. See [time()]
#' @param alternativeTimeScale A name, code, or date describing an event or period in an alternative time scale, such as one of the geologic time scales. See [alternativeTimeScale()]
#'
#' @return a endDate list object
#'
#' @export

 endDate <- function(calendarDate = NULL,
 time = NULL,
 alternativeTimeScale = NULL){ 
Filter(Negate(is.null),
 list(
calendarDate = calendarDate,
time = time,
alternativeTimeScale = alternativeTimeScale))}