R/diracS2.R

"diracS2" <-
function(u,v,x,y)
{
diracS2<-diracS1(u,x)*diracS1(v,y)
	resultdiracS2<-diracS2
}

Try the fgac package in your browser

Any scripts or data that you put into this service are public.

fgac documentation built on May 2, 2019, 6:07 a.m.