-computeWerDists <- function(indices, getSeries, nb_series_per_chunk, smooth_lvl, nvoice,
- nbytes, endian, ncores=3, verbose=FALSE, parll=TRUE)
+computeWerDists <- function(indices, getSeries, nb_series_per_chunk, smooth_lvl=3,
+ nvoice=4, nbytes=4, endian=.Platform$endian, ncores=3, verbose=FALSE)