libsim  Versione 7.1.6

◆ triangles_delete()

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

delete triangles

Parametri
thistriangles to delete

Definizione alla linea 306 del file space_utilities.F90.

307  its = iwp(jp1)
308  iwp(jp1) = iwp(jpmn)
309  iwp(jpmn) = its
310  wk(jpmn) = wk(jp1)
311 end DO
312 
313 call l4f_log(l4f_debug,"end triangulation sort")
314 

Generated with Doxygen.