# NOT RUN {
# create some objects
o<-GeneralInDel(rate=1, propose.by=function(process){sample(c(1:10),1)});
x<-GTR()
# check if they inherit from GeneralInDel
is.GeneralInDel(o)
is.GeneralInDel(x)
# }
Run the code above in your browser using DataLab