BlankForm.hs

{-# LANGUAGE TemplateHaskell #-}
{-# OPTIONS_GHC -Wall #-}

{- | The blank CASA Form 101-02, which the XFDF of the application form fills,
read from @etc/casa@ when the package is compiled.
-}
module ReOC.Render.BlankForm (
  blankForm,
  blankFormFile,
) where

import Data.ByteString (ByteString)
import ReOC.Render.Embed (embedFileBytes)

-- | The blank CASA Form 101-02 (PDF).
blankForm :: ByteString
blankForm =
  $(embedFileBytes "etc/casa/rpa-operators-certificate-reoc-initial-issue-variation-renewal-form-101-02.pdf")

-- | The file name of the blank form, which the XFDF names, and which it is written beside.
blankFormFile :: FilePath
blankFormFile =
  "rpa-operators-certificate-reoc-initial-issue-variation-renewal-form-101-02.pdf"