let b38 =
let b38_url =
"ftp://ftp.ensembl.org/pub/release-79/fasta/homo_sapiens/dna/Homo_sapiens.GRCh38.dna.primary_assembly.fa.gz" in
let dbsnp_b38 =
"http://ftp.ncbi.nlm.nih.gov/snp/organisms/human_9606_b142_GRCh38/VCF/00-All.vcf.gz" in
let gtf_b38_url =
"http://ftp.ensembl.org/pub/release-79/gtf/homo_sapiens/Homo_sapiens.GRCh38.79.gtf.gz" in
let cdna_b38_url =
"http://ftp.ensembl.org/pub/release-79/fasta/homo_sapiens/cdna/Homo_sapiens.GRCh38.cdna.all.fa.gz" in
create Name.b38
~metadata:"Provided by the Biokepi library"
~major_contigs:major_contigs_b37
~fasta:Location.(url b38_url|> gunzip)
~dbsnp:Location.(url dbsnp_b38 |> gunzip)
~exome_gtf:Location.(url gtf_b38_url |> gunzip)
~cdna:Location.(url cdna_b38_url |> gunzip)