From 7360772d88222380389660746e1e06fbca9137ab Mon Sep 17 00:00:00 2001
From: skl <skl@opencascade.com>
Date: Tue, 25 Jul 2006 10:58:13 +0000
Subject: [PATCH] Corrections for bug PAL12653.

---
 src/Controls/SMESH_Controls.cxx | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/src/Controls/SMESH_Controls.cxx b/src/Controls/SMESH_Controls.cxx
index 5559dddec..a6ae0af99 100644
--- a/src/Controls/SMESH_Controls.cxx
+++ b/src/Controls/SMESH_Controls.cxx
@@ -520,7 +520,17 @@ double AspectRatio3D::GetValue( const TSequenceOfXYZ& P )
 {
   double aQuality = 0.0;
   if(myCurrElement->IsPoly()) return aQuality;
+
   int nbNodes = P.size();
+
+  if(myCurrElement->IsQuadratic()) {
+    if(nbNodes==10) nbNodes=4; // quadratic tetrahedron
+    else if(nbNodes==13) nbNodes=5; // quadratic pyramid
+    else if(nbNodes==15) nbNodes=6; // quadratic pentahedron
+    else if(nbNodes==20) nbNodes=8; // quadratic hexahedron
+    else return aQuality;
+  }
+
   switch(nbNodes){
   case 4:{
     double aLen[6] = {