Searched refs:j1gr (Results 1 – 1 of 1) sorted by relevance
189 double j1gr = sin(gr)/(gr*gr) - cos(gr)/gr; in action() local191 sum += 2.0 * fac * ctrans_re * j1gr / gr; in action()