emptyNGram :: (Default a) => Int -> NGram a
    emptyNGram n = NGram (replicate n def)
emptyNGram :: (Default a) => Int -> NGram a
emptyNGram n = NGram (replicate n def)
emptyNGram n = NGram (replicate n def)