libsim Versione 7.2.6

◆ triangles_compute_d()

integer function triangles_compute_d ( double precision, dimension(:), intent(in) xd,
double precision, dimension(:), intent(in) yd,
type (triangles), intent(inout) tri )
private
Parametri
[in]xdARRAY OF DIMENSION NDP CONTAINING THE X COORDINATES OF THE DATA POINTS
[in]ydARRAY OF DIMENSION NDP CONTAINING THE Y COORDINATES OF THE DATA POINTS.
[in,out]tricomputed triangles

Definizione alla linea 325 del file space_utilities.F90.

326DO jp=3,ndp
327 ip = iwp(jp)
328 IF (abs((co(ip)%y-y1)*dx21-(co(ip)%x-x1)*dy21) .GT. ar) then
329 err=.false.
330 exit
331 end IF
332end DO
333if (err) then
334 call l4f_log(l4f_debug,"CONTNG - ALL COLLINEAR DATA POINTS")
335 contng_simc=2

Generated with Doxygen.