powered by
ivpsiKS(delta, t)
psiKS
#b<-ivpsiKS(0.4,c(a[8],a[9],a[10],a[11],a[12],a[13])) #
Run the code above in your browser using DataLab