libsim  Versione6.3.0

◆ triangles_delete()

subroutine space_utilities::triangles_delete ( type(triangles)  this)
private

delete triangles

Parametri
thistriangles to delete

Definizione alla linea 326 del file space_utilities.F90.

326 DO 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
332 end DO
333 if (err) then
Operatore di valore assoluto di un intervallo.

Generated with Doxygen.