libsim Versione 7.1.11
|
◆ triangles_delete()
delete triangles
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)
311end DO
312
313call l4f_log(l4f_debug,"end triangulation sort")
314
|