if(!exists("meta") || is.null(meta)) meta <- packageDescription("RobAStRDA")
year <- sub("-.*", "", meta$Date)
note <- sprintf("R package version %s", meta$Version)

citHeader("To cite package RobAStRDA in publications use:")

citEntry(entry="Manual",
         title = "RobAStRDA: Interpolation Grids for Packages of the 'RobASt' - Family of Packages",
         author = personList(as.person("P. Ruckdeschel"),
		                     as.person("M. Kohl")),
         language = "English",
         year = year,
         note = paste("Contributions by", "S. Desmettre, G. Kroisandt, E. Massini, D. Pupashenko, M. Pupashenko, and B. Spangl; ",
		              note),
         type = "R package",
         url = "http://robast.r-forge.r-project.org/",
         textVersion = paste("Ruckdeschel, P., Kohl, M.",
                             sprintf("(%s).", year),
                             "RobAStRDA: Interpolation Grids for Packages of the 'RobASt' - Family of Packages",
                             paste("Contributions by", 
							 "S. Desmettre, G. Kroisandt, E. Massini, D. Pupashenko, M. Pupashenko, and B. Spangl;"),  
							 paste(note, ".", sep = ""),
                             "URL http://robast.r-forge.r-project.org/"))
