# NOT RUN {
data(ensBMAtest)
julianVdates <- ymdhTOjul(ensBMAtest$vdate)
all.equal( julTOymdh(julianVdates), as.character(ensBMAtest$vdate))
all.equal( ymdhTOjul(ensBMAtest$idate), julianVdates-2)
# }
Run the code above in your browser using DataLab