Densidad de una malla

Hola muchachos como están.

Alguien podría decirme si hay alguna forma de saber la densidad de una malla (Mesh) en ambos sentidos.
Seria la cantidad de vértices que hay por cada lado.
Por en ejemplo, en las mallas poligonales trabaja con la densidad en M y N, en las superficies podría ser con U y V isolines.
Pero en las Mesh no logro saber como puedo definir esa densidad.
Si pueden orientarme o si saben como puedo hallar ese valor, se los agradecería mucho.
Un saludo.

https://drive.google.com/open?id=1YAoGCg7klh_Y1nHtIi3Rk9lAu-odhbOa

No suelo trabajar nunca con las Mesh pero he encontrado esto del Maestro Togores que creo que te puede orientar bastante
http://www.togores.net/home/%C2%A1formarsumeshconlisp/au2012es

Un saludo

Hola hermano como has estado.
Gracias nuevamente por tu ayuda.
Yo tengo los videos y el libro, pero las modificaciones que hace, son en base a los vertices ya actuales de la malla.
O si tan solo pudiera conseguir los cuatro bordes de ahí pudiera crear la polygonmesh.
Si sabes de algo te lo agradezco.
Saludos y mil gracias.

No se si funcionará bien para un caso mas general, pero para los ejemplos que has puesto servirá esta rutina que lo que hace es buscar cuantos puntos se alinean con el primer vértice que parece ser que es extremo. Luego divido el total de vértices por la cantidad de ellos alineados con el primero y obtengo la cantidad en la otra dirección:

Código:

(defun c:cuantoM ( / sentido ent listap p l m n )
;; by Nolo en http://acadhispano.foroargentina.net/t164-densidad-de-una-malla
(defun sentido (a b c  / r ) ; de Tony Tanzillo
 (setq r(-(*(- (car b)(car a))(-(cadr c)(cadr a )))(*(-(cadr b)(cadr a))(-(car c)(car a)))))
 (if (equal r 0.0 0.001) 0 (setq r (fix (/ r (abs r)) ))  )
)
(if (and (setq ent (entsel "\nSeleccionar MESH : "))
 (member '(0 . "MESH") (entget (setq ent (car ent))))
 )(progn
(setq listap (mapcar 'cdr (vl-remove-if '(lambda(a)(/=(car a) 10))(entget ent)))
 ;;listap (mapcar '(lambda(a)(list (car a)(cadr a))) listap) ;; si hiciera falta en algún caso
 p (car listap)
 l (mapcar '(lambda(a b) (sentido a b p) ) listap (append (cdr listap)(list(car listap))))
 m (length (vl-remove-if-not 'zerop l))
 n (/ (length l) m)
 )
 (princ (strcat (chr 10) (itoa m)" x "(itoa n)))
)(princ (strcat (chr 10)"No es un MESH"))
)
(princ)
)

Utilizo una función que tomé de  Tony Tanzillo que lo que hace es comprobar el sentido de giro de tres puntos coplanares, si están alineados da cero.
No se si te servirá ....

Un saludo

Hola hermano como estas.

Disculpa la demora en responder, pues estoy sin internet ya desde hace semanas y se me ha echo difícil responder, pues no en todos lados hay AutoCAD instalado.
Pero si he estado pendiente. Ya comencé a trabajar y ahí pues puedo revisar todos los días el correo.

Te cuento que en algunos casos el lisp lo hace bien y en otros no.
Tambien el orden de los puntos no es el mismo y eso me complica las cosas, pues mi pensado era saber cuantos vertices tenia por cada lado, luego substraer la cantidad del borde y crear la malla desde esos bordes, pero al cambiar el orden de los puntos, no puede funcionar así.
Te adjunto otro archivo con otras mallas, para que apliques el lisp y veas que en algunos casos el conteo no coincide con el de la malla.
Allí mismo puedes ver como van ordenados los puntos.

Bueno míralo y cualquier cosa me avisas.
Mil gracias por la ayuda de todos.

https://drive.google.com/open?id=19zhrZsXzuXEGSvcLooX12mnNaGE1NAoy

Esta claro que cuando se complica la cosa torciendo las directrices, como en los casos primero y tercero de los nuevos dibujos, el algoritmo que yo proponía no vale.
Aunque el resultado de que es "x" e "y" dependa de cuales puntos se almacenan primero cuando se crea la malla, se podría intentar ordenar de mayor a menor "y" para que siempre quedaran diferenciados según la vertical de la visual que tengas, pero no creo que merezca la pena ese trabajo si no te soluciona nada el algoritmo.

Un saludo

Hola hermano, gracias por revisarlo.
Pero como dices, así no lo va a solucionar porque depende del orden y si varia ya por ahí no puedo construir la malla.
Seria perder el tiempo.
Pero no se me ocurre otra manera para convertir la mesh en polygonmesh.
Seguiré investigando haber que consigo.
Y si sabes algo, cualquier cosa me avisas.
Muchas gracias.