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