Add new function to manage time steps

It is maybe a good idea to create an internal function to manage the time steps in order to avoid command lines in many functions:

if ("daily" %in% class(XXXXXXX)) {
  TimeStep <- 60 * 60 * 24
}
if ("hourly" %in% class(XXXXXXX)) {
  TimeStep <- 60 * 60
}