#.onLoad = function(libname, pkgname) {
#  library.dynam("Relate", pkgname)
#  methods:::bind_activation(TRUE)
#}

#.onAttach <- function(libname, package) {
#  methods:::bind_activation(FALSE)
#}

#useDynLib(Relate,interface)
export(runHmmld.plink,sim_chr,getPlink,runHmmld,plot.HMMrelate,runHmmld.ped,getPed,ld.snp3) 
useDynLib(Relate,interface)


#S3method(print,HMMrelate)