Update FaceClass.f90

loganoz · Jun 29, 2024 · 342c198 · 342c198
1 parent 2b9c55a
commit 342c198
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Solver/src/libs/mesh/FaceClass.f90 b/Solver/src/libs/mesh/FaceClass.f90
@@ -207,7 +207,7 @@ SUBROUTINE Face_LinkWithElements( self, NelLeft, NelRight, nodeType, offset, sca
          integer,                 intent(in)    :: NelLeft(2)  ! Left element face polynomial order
          integer,                 intent(in)    :: NelRight(2) ! Right element face polynomial order
          integer,                 intent(in)    :: nodeType    ! Either Gauss or Gauss-Lobatto
-         real(kind=RP), optional, intent(in)    :: offset
+         real(kind=RP), optional, intent(in)    :: offset(2)
          real(kind=RP), optional, intent(in)    :: scale
 
          !real(kind=RP) :: test1(0:3)