From 5776853952e265ae4689736c0b4f96d2df50e0e9 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Joachim=20Sch=C3=B6berl?= <joachim.schoeberl@tuwien.ac.at>
Date: Thu, 17 Jan 2019 23:35:23 +0100
Subject: [PATCH] more QUAD8

---
 libsrc/meshing/curvedelems.cpp | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/libsrc/meshing/curvedelems.cpp b/libsrc/meshing/curvedelems.cpp
index c4d0a73c..df489349 100644
--- a/libsrc/meshing/curvedelems.cpp
+++ b/libsrc/meshing/curvedelems.cpp
@@ -1888,7 +1888,6 @@ namespace netgen
 	}
 
       case QUAD:
-      case QUAD8:
 	{
 	  shapes(0) = (1-xi(0))*(1-xi(1));
 	  shapes(1) =    xi(0) *(1-xi(1));
@@ -1928,6 +1927,19 @@ namespace netgen
 
 	  break;
 	}
+
+      case QUAD8:
+	{
+	  shapes(0) = (1-xi(0))*(1-xi(1));
+	  shapes(1) =    xi(0) *(1-xi(1));
+	  shapes(2) =    xi(0) *   xi(1) ;
+	  shapes(3) = (1-xi(0))*   xi(1) ;
+          shapes(4) = 0.0;
+          shapes(5) = 0.0;
+          shapes(6) = 0.0;
+          shapes(7) = 0.0;
+          break;
+        }
         
       default:
 	throw NgException("CurvedElements::CalcShape 2d, element type not handled");