Lines Matching refs:intp
234 WdetJb = Qwtb(lcsyst,intp) / (four*temp)
236 WdetJb = Qwtb(lcsyst,intp) / (four*temp)
238 WdetJb = Qwtb(lcsyst,intp) / (two*temp)
240 WdetJb = Qwtb(lcsyst,intp) / (four*temp)
242 WdetJb = Qwtb(lcsyst,intp) / (four*temp)
244 WdetJb = Qwtb(lcsyst,intp) / (two*temp)
382 if (intp.eq.ngaussb) then ! do this only for the last gauss point
682 if (intp.eq.ngaussb) then ! do this only for the last gauss point
871 WdetJb = (1 - Qwtb(lcsyst,intp)) / (four*temp)
873 WdetJb = Qwtb(lcsyst,intp) / temp
875 WdetJb = Qwtb(lcsyst,intp) / (four*temp)