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.62
+version:        0.1.0.63
 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/PhysicalDevice/Struct.hs b/src/Gpu/Vulkan/PhysicalDevice/Struct.hs
--- a/src/Gpu/Vulkan/PhysicalDevice/Struct.hs
+++ b/src/Gpu/Vulkan/PhysicalDevice/Struct.hs
@@ -62,6 +62,12 @@
 		descriptorIndexingFeaturesFromNoNext n .
 		descriptorIndexingFeaturesFromCore <$> peek (castPtr p)
 
+descriptorIndexingFeaturesZero :: TMaybe.M mn -> DescriptorIndexingFeatures mn
+descriptorIndexingFeaturesZero mn = unsafePerformIO
+	$ descriptorIndexingFeaturesFromNoNext mn
+	<$> descriptorIndexingFeaturesFromCore
+	<$> C.getClearedDescriptorIndexingFeatures
+
 makeStructure "Vulkan12Features"
 
 instance Peek Vulkan12FeaturesNoNext where
@@ -87,6 +93,10 @@
 		vulkan12FeaturesFromNoNext n .
 		vulkan12FeaturesFromCore <$> peek (castPtr p)
 
+vulkan12FeaturesZero :: TMaybe.M mn -> Vulkan12Features mn
+vulkan12FeaturesZero mn = unsafePerformIO $ vulkan12FeaturesFromNoNext mn
+	<$> vulkan12FeaturesFromCore <$> C.getClearedVulkan12Features
+
 makeStructure "Vulkan13Features"
 
 instance Peek Vulkan13FeaturesNoNext where
@@ -111,3 +121,7 @@
 	createNextable p n =
 		vulkan13FeaturesFromNoNext n .
 		vulkan13FeaturesFromCore <$> peek (castPtr p)
+
+vulkan13FeaturesZero :: TMaybe.M mn -> Vulkan13Features mn
+vulkan13FeaturesZero mn = unsafePerformIO $ vulkan13FeaturesFromNoNext mn
+	<$> vulkan13FeaturesFromCore <$> C.getClearedVulkan13Features