diff --git a/gpu-vulkan-middle.cabal b/gpu-vulkan-middle.cabal
--- a/gpu-vulkan-middle.cabal
+++ b/gpu-vulkan-middle.cabal
@@ -5,7 +5,7 @@
 -- see: https://github.com/sol/hpack
 
 name:           gpu-vulkan-middle
-version:        0.1.0.70
+version:        0.1.0.71
 synopsis:       Medium wrapper for Vulkan API
 description:    Please see the README on GitHub at <https://github.com/YoshikuniJujo/gpu-vulkan-middle#readme>
 category:       GPU
diff --git a/src/Gpu/Vulkan/Middle.hs b/src/Gpu/Vulkan/Middle.hs
--- a/src/Gpu/Vulkan/Middle.hs
+++ b/src/Gpu/Vulkan/Middle.hs
@@ -71,7 +71,9 @@
 
 	Size(..),
 
-	DependencyInfo(..), BlitImageInfo2(..)
+	DependencyInfo(..), BlitImageInfo2(..),
+
+	remainingMipLevels, remainingArrayLayers
 
 	) where
 
diff --git a/src/Gpu/Vulkan/Middle/Internal.hsc b/src/Gpu/Vulkan/Middle/Internal.hsc
--- a/src/Gpu/Vulkan/Middle/Internal.hsc
+++ b/src/Gpu/Vulkan/Middle/Internal.hsc
@@ -47,8 +47,10 @@
 	Size(..),
 
 	DependencyInfo(..), dependencyInfoToCore,
-	BlitImageInfo2(..), blitImageInfo2ToCore
+	BlitImageInfo2(..), blitImageInfo2ToCore,
 
+	remainingMipLevels, remainingArrayLayers
+
 	) where
 
 import Foreign.Ptr
@@ -528,3 +530,7 @@
 	where
 	rc :: Integral n => n
 	rc = TL.length @_ @ras
+
+remainingMipLevels, remainingArrayLayers :: Word32
+remainingMipLevels = #{const VK_REMAINING_MIP_LEVELS}
+remainingArrayLayers = #{const VK_REMAINING_ARRAY_LAYERS}