Profile.hs revision b87efd3db0d2dc41615ea28669faf80fc1b48d56
446N/A{- |
4744N/AModule : $EmptyHeader$
446N/ADescription : <optional short description entry>
446N/ACopyright : (c) <Authors or Affiliations>
446N/ALicense : GPLv2 or higher
446N/A
446N/AMaintainer : <email>
446N/AStability : unstable | experimental | provisional | stable | frozen
446N/APortability : portable | non-portable (<reason>)
446N/A
446N/A<optional description>
446N/A-}
446N/A-- NOTE: use GHC flag -fcontext-stack50 with this module
446N/A---------------------------------------------------------------------------
446N/A-- Generated by DB/Direct
446N/A---------------------------------------------------------------------------
446N/Amodule Search.DB.FormulaDB.Profile where
446N/A
446N/Aimport Database.HaskellDB.DBLayout
446N/A
873N/A---------------------------------------------------------------------------
446N/A-- Table
446N/A---------------------------------------------------------------------------
446N/Aprofile :: Table
446N/A ((RecCons Library (Expr String)
5073N/A (RecCons File (Expr String)
446N/A (RecCons Line (Expr Int)
446N/A (RecCons Formula (Expr String)
446N/A (RecCons Skeleton (Expr String)
4744N/A (RecCons Skeleton_md5 (Expr String)
4744N/A (RecCons Parameter (Expr String)
4744N/A (RecCons Role (Expr String)
4744N/A (RecCons Norm_strength (Expr String)
4744N/A (RecCons Skeleton_length (Expr Int) RecNil)))))))))))
4744N/A
4744N/Aprofile = baseTable "profile" $
4744N/A hdbMakeEntry Library #
4744N/A hdbMakeEntry File #
4744N/A hdbMakeEntry Line #
4744N/A hdbMakeEntry Formula #
4744N/A hdbMakeEntry Skeleton #
4744N/A hdbMakeEntry Skeleton_md5 #
4744N/A hdbMakeEntry Parameter #
4744N/A hdbMakeEntry Role #
4744N/A hdbMakeEntry Norm_strength #
4744N/A hdbMakeEntry Skeleton_length
4744N/A
4744N/A---------------------------------------------------------------------------
4744N/A-- Fields
4744N/A---------------------------------------------------------------------------
4744N/A---------------------------------------------------------------------------
5073N/A-- Library Field
4744N/A---------------------------------------------------------------------------
5073N/A
4744N/Adata Library = Library
4744N/A
4744N/Ainstance FieldTag Library where fieldName _ = "library"
4744N/A
4744N/Alibrary :: Attr Library String
957N/Alibrary = mkAttr Library
4744N/A
4744N/A---------------------------------------------------------------------------
4744N/A-- File Field
4744N/A---------------------------------------------------------------------------
4744N/A
4744N/Adata File = File
4744N/A
4744N/Ainstance FieldTag File where fieldName _ = "file"
4744N/A
4744N/Afile :: Attr File String
4744N/Afile = mkAttr File
4744N/A
4744N/A---------------------------------------------------------------------------
4744N/A-- Line Field
4744N/A---------------------------------------------------------------------------
4744N/A
4744N/Adata Line = Line
4744N/A
4744N/Ainstance FieldTag Line where fieldName _ = "line"
4744N/A
4744N/Aline :: Attr Line Int
4744N/Aline = mkAttr Line
4744N/A
4744N/A---------------------------------------------------------------------------
4744N/A-- Formula Field
4744N/A---------------------------------------------------------------------------
4744N/A
4744N/Adata Formula = Formula
4744N/A
4744N/Ainstance FieldTag Formula where fieldName _ = "formula"
4744N/A
4744N/Aformula :: Attr Formula String
4744N/Aformula = mkAttr Formula
4744N/A
4744N/A---------------------------------------------------------------------------
4744N/A-- Skeleton Field
4744N/A---------------------------------------------------------------------------
4744N/A
4744N/Adata Skeleton = Skeleton
4744N/A
4744N/Ainstance FieldTag Skeleton where fieldName _ = "skeleton"
4744N/A
4618N/Askeleton :: Attr Skeleton String
4744N/Askeleton = mkAttr Skeleton
4744N/A
4744N/A---------------------------------------------------------------------------
4744N/A-- Skeleton_md5 Field
4744N/A---------------------------------------------------------------------------
4744N/A
4744N/Adata Skeleton_md5 = Skeleton_md5
4744N/A
4744N/Ainstance FieldTag Skeleton_md5 where fieldName _ = "skeleton_md5"
4744N/A
4744N/Askeleton_md5 :: Attr Skeleton_md5 String
4744N/Askeleton_md5 = mkAttr Skeleton_md5
4744N/A
4744N/A---------------------------------------------------------------------------
4744N/A-- Parameter Field
4744N/A---------------------------------------------------------------------------
4744N/A
4744N/Adata Parameter = Parameter
4744N/A
4744N/Ainstance FieldTag Parameter where fieldName _ = "parameter"
5073N/A
4744N/Aparameter :: Attr Parameter String
5073N/Aparameter = mkAttr Parameter
4744N/A
4744N/A---------------------------------------------------------------------------
4744N/A-- Role Field
4744N/A---------------------------------------------------------------------------
4744N/A
4744N/Adata Role = Role
4744N/A
4744N/Ainstance FieldTag Role where fieldName _ = "role"
4744N/A
4744N/Arole :: Attr Role String
4744N/Arole = mkAttr Role
4744N/A
4744N/A---------------------------------------------------------------------------
4744N/A-- Norm_strength Field
4744N/A---------------------------------------------------------------------------
4744N/A
4744N/Adata Norm_strength = Norm_strength
4744N/A
4744N/Ainstance FieldTag Norm_strength where
4744N/A fieldName _ = "norm_strength"
4744N/A
4744N/Anorm_strength :: Attr Norm_strength String
4744N/Anorm_strength = mkAttr Norm_strength
4744N/A
4744N/A---------------------------------------------------------------------------
4744N/A-- Skeleton_length Field
4744N/A---------------------------------------------------------------------------
4744N/A
4744N/Adata Skeleton_length = Skeleton_length
4744N/A
4744N/Ainstance FieldTag Skeleton_length where
4744N/A fieldName _ = "skeleton_length"
4744N/A
4744N/Askeleton_length :: Attr Skeleton_length Int
4744N/Askeleton_length = mkAttr Skeleton_length
4744N/A