diff --git a/XSpectra/src/orthoUatwfc_k.f90 b/XSpectra/src/orthoUatwfc_k.f90
index 140680d36..48ff2f3e7 100644
--- a/XSpectra/src/orthoUatwfc_k.f90
+++ b/XSpectra/src/orthoUatwfc_k.f90
@@ -93,6 +93,6 @@ SUBROUTINE orthoUwfc_k(ik)
   !
   RETURN
      
-END SUBROUTINE orthoUwfc_k(ik)
+END SUBROUTINE orthoUwfc_k