diff --git a/CHANGELOG.md b/CHANGELOG.md
new file mode 100644
--- /dev/null
+++ b/CHANGELOG.md
@@ -0,0 +1,11 @@
+# Changelog for `gpu-vulkan-core-khr-surface`
+
+All notable changes to this project will be documented in this file.
+
+The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.0.0/),
+and this project adheres to the
+[Haskell Package Versioning Policy](https://pvp.haskell.org/).
+
+## Unreleased
+
+## 0.1.0.0 - YYYY-MM-DD
diff --git a/LICENSE b/LICENSE
new file mode 100644
--- /dev/null
+++ b/LICENSE
@@ -0,0 +1,26 @@
+Copyright 2025 Yoshikuni Jujo
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions are met:
+
+1.  Redistributions of source code must retain the above copyright notice, this
+    list of conditions and the following disclaimer.
+
+2.  Redistributions in binary form must reproduce the above copyright notice,
+    this list of conditions and the following disclaimer in the documentation
+    and/or other materials provided with the distribution.
+
+3.  Neither the name of the copyright holder nor the names of its contributors
+    may be used to endorse or promote products derived from this software
+    without specific prior written permission.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
+ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR
+ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
+(INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
+LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
+ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
diff --git a/README.md b/README.md
new file mode 100644
--- /dev/null
+++ b/README.md
@@ -0,0 +1,1 @@
+# gpu-vulkan-core-khr-surface
diff --git a/Setup.hs b/Setup.hs
new file mode 100644
--- /dev/null
+++ b/Setup.hs
@@ -0,0 +1,2 @@
+import Distribution.Simple
+main = defaultMain
diff --git a/gpu-vulkan-core-khr-surface.cabal b/gpu-vulkan-core-khr-surface.cabal
new file mode 100644
--- /dev/null
+++ b/gpu-vulkan-core-khr-surface.cabal
@@ -0,0 +1,60 @@
+cabal-version: 2.2
+
+-- This file has been generated from package.yaml by hpack version 0.37.0.
+--
+-- see: https://github.com/sol/hpack
+
+name:           gpu-vulkan-core-khr-surface
+version:        0.1.0.0
+synopsis:       Thin wrapper for VK_KHR_surface extension of the Vulkan API
+description:    Please see the README on GitHub at <https://github.com/YoshikuniJujo/gpu-vulkan-core-khr-surface#readme>
+category:       GPU
+homepage:       https://github.com/YoshikuniJujo/gpu-vulkan-core-khr-surface#readme
+bug-reports:    https://github.com/YoshikuniJujo/gpu-vulkan-core-khr-surface/issues
+author:         Yoshikuni Jujo
+maintainer:     yoshikuni.jujo@gmail.com
+copyright:      (c) 2025 Yoshikuni Jujo
+license:        BSD-3-Clause
+license-file:   LICENSE
+build-type:     Simple
+extra-doc-files:
+    README.md
+    CHANGELOG.md
+
+source-repository head
+  type: git
+  location: https://github.com/YoshikuniJujo/gpu-vulkan-core-khr-surface
+
+library
+  exposed-modules:
+      Gpu.Vulkan.Khr.Surface.Core
+      Gpu.Vulkan.Khr.Surface.PhysicalDevice.Core
+  other-modules:
+      Paths_gpu_vulkan_core_khr_surface
+  autogen-modules:
+      Paths_gpu_vulkan_core_khr_surface
+  hs-source-dirs:
+      src
+  ghc-options: -Wall -Wcompat -Widentities -Wincomplete-record-updates -Wincomplete-uni-patterns -Wmissing-export-lists -Wmissing-home-modules -Wpartial-fields -Wredundant-constraints
+  build-depends:
+      base >=4.7 && <5
+    , c-struct <1
+    , gpu-vulkan-core <1
+  default-language: Haskell2010
+
+test-suite gpu-vulkan-core-khr-surface-test
+  type: exitcode-stdio-1.0
+  main-is: Spec.hs
+  other-modules:
+      Paths_gpu_vulkan_core_khr_surface
+  autogen-modules:
+      Paths_gpu_vulkan_core_khr_surface
+  hs-source-dirs:
+      test
+  ghc-options: -Wall -Wcompat -Widentities -Wincomplete-record-updates -Wincomplete-uni-patterns -Wmissing-export-lists -Wmissing-home-modules -Wpartial-fields -Wredundant-constraints -threaded -rtsopts -with-rtsopts=-N
+  build-depends:
+      base >=4.7 && <5
+    , c-struct <1
+    , gpu-vulkan-core <1
+    , gpu-vulkan-core-khr-surface
+  default-language: Haskell2010
diff --git a/src/Gpu/Vulkan/Khr/Surface/Core.hsc b/src/Gpu/Vulkan/Khr/Surface/Core.hsc
new file mode 100644
--- /dev/null
+++ b/src/Gpu/Vulkan/Khr/Surface/Core.hsc
@@ -0,0 +1,87 @@
+{-# LANGUAGE TemplateHaskell #-}
+{-# LANGUAGE TupleSections #-}
+{-# LANGUAGE PatternSynonyms, ViewPatterns #-}
+{-# OPTIONS_GHC -Wall -fno-warn-tabs #-}
+
+module Gpu.Vulkan.Khr.Surface.Core (
+
+	-- * DESTROY
+
+	destroy, S,
+
+	-- * CAPABILITIES
+
+	Capabilities, pattern Capabilities,
+	capabilitiesMinImageCount, capabilitiesMaxImageCount,
+	capabilitiesCurrentExtent,
+	capabilitiesMinImageExtent, capabilitiesMaxImageExtent,
+	capabilitiesMaxImageArrayLayers,
+	capabilitiesSupportedTransforms, capabilitiesCurrentTransform,
+	capabilitiesSupportedCompositeAlpha, capabilitiesSupportedUsageFlags,
+
+	-- * FORMAT
+
+	Format, pattern Format, formatFormat, formatColorSpace
+
+	) where
+
+import Foreign.Ptr
+import Foreign.Storable
+import Foreign.C.Struct
+import Data.Word
+
+import Gpu.Vulkan.Core (Extent2d)
+
+import qualified Gpu.Vulkan.AllocationCallbacks.Core as AllocationCallbacks
+import qualified Gpu.Vulkan.Instance.Core as Instance
+
+#include <vulkan/vulkan.h>
+
+data STag
+type S = Ptr STag
+
+foreign import ccall "vkDestroySurfaceKHR" destroy ::
+	Instance.I -> S -> Ptr AllocationCallbacks.A -> IO ()
+
+struct "Capabilities" #{size VkSurfaceCapabilitiesKHR}
+		#{alignment VkSurfaceCapabilitiesKHR} [
+	("minImageCount", ''#{type uint32_t},
+		[| #{peek VkSurfaceCapabilitiesKHR, minImageCount} |],
+		[| #{poke VkSurfaceCapabilitiesKHR, minImageCount} |]),
+	("maxImageCount", ''#{type uint32_t},
+		[| #{peek VkSurfaceCapabilitiesKHR, maxImageCount} |],
+		[| #{poke VkSurfaceCapabilitiesKHR, maxImageCount} |]),
+	("currentExtent", ''Extent2d,
+		[| #{peek VkSurfaceCapabilitiesKHR, currentExtent} |],
+		[| #{poke VkSurfaceCapabilitiesKHR, currentExtent} |]),
+	("minImageExtent", ''Extent2d,
+		[| #{peek VkSurfaceCapabilitiesKHR, minImageExtent} |],
+		[| #{poke VkSurfaceCapabilitiesKHR, minImageExtent} |]),
+	("maxImageExtent", ''Extent2d,
+		[| #{peek VkSurfaceCapabilitiesKHR, maxImageExtent} |],
+		[| #{poke VkSurfaceCapabilitiesKHR, maxImageExtent} |]),
+	("maxImageArrayLayers", ''#{type uint32_t},
+		[| #{peek VkSurfaceCapabilitiesKHR, maxImageArrayLayers} |],
+		[| #{poke VkSurfaceCapabilitiesKHR, maxImageArrayLayers} |]),
+	("supportedTransforms", ''#{type VkSurfaceTransformFlagsKHR},
+		[| #{peek VkSurfaceCapabilitiesKHR, supportedTransforms} |],
+		[| #{poke VkSurfaceCapabilitiesKHR, supportedTransforms} |]),
+	("currentTransform", ''#{type VkSurfaceTransformFlagBitsKHR},
+		[| #{peek VkSurfaceCapabilitiesKHR, currentTransform} |],
+		[| #{poke VkSurfaceCapabilitiesKHR, currentTransform} |]),
+	("supportedCompositeAlpha", ''#{type VkCompositeAlphaFlagsKHR},
+		[| #{peek VkSurfaceCapabilitiesKHR, supportedCompositeAlpha} |],
+		[| #{poke VkSurfaceCapabilitiesKHR,
+			supportedCompositeAlpha} |]),
+	("supportedUsageFlags", ''#{type VkImageUsageFlags},
+		[| #{peek VkSurfaceCapabilitiesKHR, supportedUsageFlags} |],
+		[| #{poke VkSurfaceCapabilitiesKHR, supportedUsageFlags} |]) ]
+	[''Show, ''Storable]
+
+struct "Format" #{size VkSurfaceFormatKHR} #{alignment VkSurfaceFormatKHR} [
+	("format", ''#{type VkFormat}, [| #{peek VkSurfaceFormatKHR, format} |],
+		[| #{poke VkSurfaceFormatKHR, format} |]),
+	("colorSpace", ''#{type VkColorSpaceKHR},
+		[| #{peek VkSurfaceFormatKHR, colorSpace} |],
+		[| #{poke VkSurfaceFormatKHR, colorSpace} |]) ]
+	[''Show, ''Storable]
diff --git a/src/Gpu/Vulkan/Khr/Surface/PhysicalDevice/Core.hsc b/src/Gpu/Vulkan/Khr/Surface/PhysicalDevice/Core.hsc
new file mode 100644
--- /dev/null
+++ b/src/Gpu/Vulkan/Khr/Surface/PhysicalDevice/Core.hsc
@@ -0,0 +1,36 @@
+{-# OPTIONS_GHC -Wall -fno-warn-tabs #-}
+
+module Gpu.Vulkan.Khr.Surface.PhysicalDevice.Core (
+
+	-- * FUNCTIONS
+
+	getSupport, getCapabilities, getFormats, getPresentModes
+
+	) where
+
+import Foreign.Ptr
+import Data.Word
+import Data.Int
+
+import qualified Gpu.Vulkan.PhysicalDevice.Core as PhysicalDevice
+import qualified Gpu.Vulkan.Khr.Surface.Core as Surface
+
+#include <vulkan/vulkan.h>
+
+foreign import ccall "vkGetPhysicalDeviceSurfaceSupportKHR" getSupport ::
+	PhysicalDevice.P -> #{type uint32_t} -> Surface.S ->
+	Ptr #{type VkBool32} -> IO #{type VkResult}
+
+foreign import ccall "vkGetPhysicalDeviceSurfaceCapabilitiesKHR"
+	getCapabilities ::
+	PhysicalDevice.P -> Surface.S -> Ptr Surface.Capabilities ->
+	IO #{type VkResult}
+
+foreign import ccall "vkGetPhysicalDeviceSurfaceFormatsKHR" getFormats ::
+	PhysicalDevice.P -> Surface.S ->
+	Ptr #{type uint32_t} -> Ptr Surface.Format -> IO #{type VkResult}
+
+foreign import ccall "vkGetPhysicalDeviceSurfacePresentModesKHR"
+	getPresentModes ::
+	PhysicalDevice.P -> Surface.S ->
+	Ptr #{type uint32_t} -> Ptr #{type VkPresentModeKHR} -> IO #{type VkResult}
diff --git a/test/Spec.hs b/test/Spec.hs
new file mode 100644
--- /dev/null
+++ b/test/Spec.hs
@@ -0,0 +1,2 @@
+main :: IO ()
+main = putStrLn "Test suite not yet implemented"