diff --git a/MAPL_Base/MAPL_CFIO.F90 b/MAPL_Base/MAPL_CFIO.F90
index c94929fde296..078d7407819d 100644
--- a/MAPL_Base/MAPL_CFIO.F90
+++ b/MAPL_Base/MAPL_CFIO.F90
@@ -5420,7 +5420,7 @@ subroutine MAPL_CFIOReadBundleRead(MCFIO,tindex,hw,rc)
     type(Ptr2Arr)        :: PtrTypeOut(2)
     integer, allocatable :: varids(:)
     logical, allocatable :: transDone(:)
-    integer :: status1,status2,rotation,gridStagger
+    integer :: status1,status2
     integer :: alloc_ra
 
     if (present(hw)) then