Searched refs:epsd (Results 1 – 1 of 1) sorted by relevance
133 real*8 x(numnp,nsd), BC(nshg,ndofBC), rj1,rj2,rj3,rj4,distd,epsd local150 epsd=1.0d-8 ! this is distance SQUARED to save square root197 if(dd.lt.epsd) then