#! /usr/bin/env nix-shell
#! nix-shell --pure -i runghc -p "haskellPackages.ghcWithPackages (hp: with hp; [ turtle ])"
{-# OPTIONS_GHC -Wall #-}
{-# LANGUAGE  OverloadedStrings #-}
{-# OPTIONS_GHC -Wno-deferred-type-errors #-}
{-# LANGUAGE NamedFieldPuns #-}
-- | Doc Comment
{- Block -}

module BeforeDocComment where

test :: Int -> Integer
test x = x * 2

data Record = Record
  { a :: Int,
    b :: Double,
    c :: String
  }

f Record{a, b} = a