diff --git a/src/modules/mesh/inout/vtu/moduleMeshInputVTU.f90 b/src/modules/mesh/inout/vtu/moduleMeshInputVTU.f90 index f58564e..763517f 100644 --- a/src/modules/mesh/inout/vtu/moduleMeshInputVTU.f90 +++ b/src/modules/mesh/inout/vtu/moduleMeshInputVTU.f90 @@ -334,7 +334,7 @@ MODULE moduleMeshInputVTU CASE(2) IF (types(n) == 3) THEN - e = e+1 + e = e + 1 ALLOCATE(p(1:2)) p(1) = connectivity(offsets(n) - 1) p(2) = connectivity(offsets(n)) @@ -359,7 +359,7 @@ MODULE moduleMeshInputVTU END IF CASE(1) - IF (types(n) == 3) THEN + IF (types(n) == 1) THEN e = e + 1 ALLOCATE(p(1:1)) p(1) = connectivity(offsets(n))