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