###

untreated1_chr4 <- function()
{
    system.file("extdata", "untreated1_chr4.bam",
                package="pasillaBamSubset", mustWork=TRUE)
}

untreated3_chr4 <- function()
{
    system.file("extdata", "untreated3_chr4.bam",
                package="pasillaBamSubset", mustWork=TRUE)
}

dm3_chr4 <- function()
{
    system.file("extdata", "dm3_chr4.fa",
                package="pasillaBamSubset", mustWork=TRUE)
}
