libsim Versione 7.2.6

◆ triangles_compute_r()

integer function triangles_compute_r ( real, dimension(:), intent(in) xd,
real, 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 312 del file space_utilities.F90.

313call l4f_log(l4f_debug,"end triangulation sort")
314
315 !
316 ! IF NECESSARY, MODIFIES THE ORDERING IN SUCH A WAY THAT THE
317 ! FIRST THREE DATA POINTS ARE NOT COLLINEAR.
318 !
319ar = dsq12*ratio
320x1 = co(ipmn1)%x
321y1 = co(ipmn1)%y
322dx21 = co(ipmn2)%x-x1

Generated with Doxygen.