[current,divrg]=DDGOXddcurrent(Simesh,Sinodes,data,contacts);