WikiMusic.Model.Song

Documentation

data Song

Constructors

Song

Fields

• identifier :: UUID
• displayName :: Text
• musicKey :: Maybe Text
• musicTuning :: Maybe Text
• musicCreationDate :: Maybe Text
• albumName :: Maybe Text
• albumInfoLink :: Maybe Text
• createdBy :: UUID
• visibilityStatus :: Int
• approvedBy :: Maybe UUID
• createdAt :: UTCTime
• lastEditedAt :: Maybe UTCTime
• artworks :: Map UUID SongArtwork
• comments :: [ThreadRender SongComment]
• opinions :: Map UUID SongOpinion
• contents :: Map UUID SongContent
• spotifyUrl :: Maybe Text
• youtubeUrl :: Maybe Text
• soundcloudUrl :: Maybe Text
• wikipediaUrl :: Maybe Text
• artists :: Map UUID Text
• viewCount :: Int
• description :: Maybe Text

Instances

FromJSON Song

Defined in WikiMusic.Model.Song

Methods

parseJSON :: Value -> Parser Song

parseJSONList :: Value -> Parser [Song]

omittedField :: Maybe Song

ToJSON Song

Defined in WikiMusic.Model.Song

Methods

toJSON :: Song -> Value

toEncoding :: Song -> Encoding

toJSONList :: [Song] -> Value

toEncodingList :: [Song] -> Encoding

omitField :: Song -> Bool

Generic Song

Defined in WikiMusic.Model.Song

Associated Types

type Rep Song :: Type -> Type

Methods

from :: Song -> Rep Song x

to :: Rep Song x -> Song

Show Song

Defined in WikiMusic.Model.Song

Methods

showsPrec :: Int -> Song -> ShowS

show :: Song -> String

showList :: [Song] -> ShowS

Eq Song

Defined in WikiMusic.Model.Song

Methods

(==) :: Song -> Song -> Bool

(/=) :: Song -> Song -> Bool

ToSchema Song

Defined in WikiMusic.Model.Song

Methods

declareNamedSchema :: Proxy Song -> Declare (Definitions Schema) NamedSchema

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "albumInfoLink" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "albumName" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Maybe UUID, b ~ Maybe UUID) => LabelOptic "approvedBy" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Map UUID Text, b ~ Map UUID Text) => LabelOptic "artists" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Map UUID SongArtwork, b ~ Map UUID SongArtwork) => LabelOptic "artworks" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ [ThreadRender SongComment], b ~ [ThreadRender SongComment]) => LabelOptic "comments" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Map UUID SongContent, b ~ Map UUID SongContent) => LabelOptic "contents" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ UTCTime, b ~ UTCTime) => LabelOptic "createdAt" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "createdBy" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "description" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Text, b ~ Text) => LabelOptic "displayName" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "identifier" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Maybe UTCTime, b ~ Maybe UTCTime) => LabelOptic "lastEditedAt" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "musicCreationDate" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "musicKey" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "musicTuning" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Map UUID SongOpinion, b ~ Map UUID SongOpinion) => LabelOptic "opinions" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "soundcloudUrl" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "spotifyUrl" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Int, b ~ Int) => LabelOptic "viewCount" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Int, b ~ Int) => LabelOptic "visibilityStatus" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "wikipediaUrl" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "youtubeUrl" k Song Song a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx Song Song a b

type Rep Song

Defined in WikiMusic.Model.Song

type Rep Song = D1 ('MetaData "Song" "WikiMusic.Model.Song" "wikimusic-model-hs-1.2.0.0-2AFmU6Rx8U3ctQHH6pLAk" 'False) (C1 ('MetaCons "Song" 'PrefixI 'True) ((((S1 ('MetaSel ('Just "identifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: S1 ('MetaSel ('Just "displayName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :*: (S1 ('MetaSel ('Just "musicKey") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: (S1 ('MetaSel ('Just "musicTuning") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "musicCreationDate") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text))))) :*: ((S1 ('MetaSel ('Just "albumName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: (S1 ('MetaSel ('Just "albumInfoLink") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "createdBy") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID))) :*: (S1 ('MetaSel ('Just "visibilityStatus") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :*: (S1 ('MetaSel ('Just "approvedBy") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe UUID)) :*: S1 ('MetaSel ('Just "createdAt") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UTCTime))))) :*: (((S1 ('MetaSel ('Just "lastEditedAt") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe UTCTime)) :*: (S1 ('MetaSel ('Just "artworks") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map UUID SongArtwork)) :*: S1 ('MetaSel ('Just "comments") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [ThreadRender SongComment]))) :*: (S1 ('MetaSel ('Just "opinions") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map UUID SongOpinion)) :*: (S1 ('MetaSel ('Just "contents") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map UUID SongContent)) :*: S1 ('MetaSel ('Just "spotifyUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text))))) :*: ((S1 ('MetaSel ('Just "youtubeUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: (S1 ('MetaSel ('Just "soundcloudUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "wikipediaUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))) :*: (S1 ('MetaSel ('Just "artists") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Map UUID Text)) :*: (S1 ('MetaSel ('Just "viewCount") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :*: S1 ('MetaSel ('Just "description") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text))))))))

data SongArtwork

Constructors

SongArtwork

Fields

• songIdentifier :: UUID
• artwork :: Artwork

Instances

FromJSON SongArtwork

Defined in WikiMusic.Model.Song

Methods

parseJSON :: Value -> Parser SongArtwork

parseJSONList :: Value -> Parser [SongArtwork]

omittedField :: Maybe SongArtwork

ToJSON SongArtwork

Defined in WikiMusic.Model.Song

Methods

toJSON :: SongArtwork -> Value

toEncoding :: SongArtwork -> Encoding

toJSONList :: [SongArtwork] -> Value

toEncodingList :: [SongArtwork] -> Encoding

omitField :: SongArtwork -> Bool

Generic SongArtwork

Defined in WikiMusic.Model.Song

Associated Types

type Rep SongArtwork :: Type -> Type

Methods

from :: SongArtwork -> Rep SongArtwork x

to :: Rep SongArtwork x -> SongArtwork

Show SongArtwork

Defined in WikiMusic.Model.Song

Methods

showsPrec :: Int -> SongArtwork -> ShowS

show :: SongArtwork -> String

showList :: [SongArtwork] -> ShowS

Eq SongArtwork

Defined in WikiMusic.Model.Song

Methods

(==) :: SongArtwork -> SongArtwork -> Bool

(/=) :: SongArtwork -> SongArtwork -> Bool

ToSchema SongArtwork

Defined in WikiMusic.Model.Song

Methods

declareNamedSchema :: Proxy SongArtwork -> Declare (Definitions Schema) NamedSchema

(k ~ A_Lens, a ~ Artwork, b ~ Artwork) => LabelOptic "artwork" k SongArtwork SongArtwork a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongArtwork SongArtwork a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "songIdentifier" k SongArtwork SongArtwork a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongArtwork SongArtwork a b

type Rep SongArtwork

Defined in WikiMusic.Model.Song

type Rep SongArtwork = D1 ('MetaData "SongArtwork" "WikiMusic.Model.Song" "wikimusic-model-hs-1.2.0.0-2AFmU6Rx8U3ctQHH6pLAk" 'False) (C1 ('MetaCons "SongArtwork" 'PrefixI 'True) (S1 ('MetaSel ('Just "songIdentifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: S1 ('MetaSel ('Just "artwork") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Artwork)))

data SongComment

Constructors

SongComment

Fields

• songIdentifier :: UUID
• comment :: Comment

Instances

FromJSON SongComment

Defined in WikiMusic.Model.Song

Methods

parseJSON :: Value -> Parser SongComment

parseJSONList :: Value -> Parser [SongComment]

omittedField :: Maybe SongComment

ToJSON SongComment

Defined in WikiMusic.Model.Song

Methods

toJSON :: SongComment -> Value

toEncoding :: SongComment -> Encoding

toJSONList :: [SongComment] -> Value

toEncodingList :: [SongComment] -> Encoding

omitField :: SongComment -> Bool

Generic SongComment

Defined in WikiMusic.Model.Song

Associated Types

type Rep SongComment :: Type -> Type

Methods

from :: SongComment -> Rep SongComment x

to :: Rep SongComment x -> SongComment

Show SongComment

Defined in WikiMusic.Model.Song

Methods

showsPrec :: Int -> SongComment -> ShowS

show :: SongComment -> String

showList :: [SongComment] -> ShowS

Eq SongComment

Defined in WikiMusic.Model.Song

Methods

(==) :: SongComment -> SongComment -> Bool

(/=) :: SongComment -> SongComment -> Bool

ToSchema SongComment

Defined in WikiMusic.Model.Song

Methods

declareNamedSchema :: Proxy SongComment -> Declare (Definitions Schema) NamedSchema

(k ~ A_Lens, a ~ Comment, b ~ Comment) => LabelOptic "comment" k SongComment SongComment a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongComment SongComment a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "songIdentifier" k SongComment SongComment a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongComment SongComment a b

type Rep SongComment

Defined in WikiMusic.Model.Song

type Rep SongComment = D1 ('MetaData "SongComment" "WikiMusic.Model.Song" "wikimusic-model-hs-1.2.0.0-2AFmU6Rx8U3ctQHH6pLAk" 'False) (C1 ('MetaCons "SongComment" 'PrefixI 'True) (S1 ('MetaSel ('Just "songIdentifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: S1 ('MetaSel ('Just "comment") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Comment)))

data SongOpinion

Constructors

SongOpinion

Fields

• songIdentifier :: UUID
• opinion :: Opinion

Instances

FromJSON SongOpinion

Defined in WikiMusic.Model.Song

Methods

parseJSON :: Value -> Parser SongOpinion

parseJSONList :: Value -> Parser [SongOpinion]

omittedField :: Maybe SongOpinion

ToJSON SongOpinion

Defined in WikiMusic.Model.Song

Methods

toJSON :: SongOpinion -> Value

toEncoding :: SongOpinion -> Encoding

toJSONList :: [SongOpinion] -> Value

toEncodingList :: [SongOpinion] -> Encoding

omitField :: SongOpinion -> Bool

Generic SongOpinion

Defined in WikiMusic.Model.Song

Associated Types

type Rep SongOpinion :: Type -> Type

Methods

from :: SongOpinion -> Rep SongOpinion x

to :: Rep SongOpinion x -> SongOpinion

Show SongOpinion

Defined in WikiMusic.Model.Song

Methods

showsPrec :: Int -> SongOpinion -> ShowS

show :: SongOpinion -> String

showList :: [SongOpinion] -> ShowS

Eq SongOpinion

Defined in WikiMusic.Model.Song

Methods

(==) :: SongOpinion -> SongOpinion -> Bool

(/=) :: SongOpinion -> SongOpinion -> Bool

ToSchema SongOpinion

Defined in WikiMusic.Model.Song

Methods

declareNamedSchema :: Proxy SongOpinion -> Declare (Definitions Schema) NamedSchema

(k ~ A_Lens, a ~ Opinion, b ~ Opinion) => LabelOptic "opinion" k SongOpinion SongOpinion a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongOpinion SongOpinion a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "songIdentifier" k SongOpinion SongOpinion a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongOpinion SongOpinion a b

type Rep SongOpinion

Defined in WikiMusic.Model.Song

type Rep SongOpinion = D1 ('MetaData "SongOpinion" "WikiMusic.Model.Song" "wikimusic-model-hs-1.2.0.0-2AFmU6Rx8U3ctQHH6pLAk" 'False) (C1 ('MetaCons "SongOpinion" 'PrefixI 'True) (S1 ('MetaSel ('Just "songIdentifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: S1 ('MetaSel ('Just "opinion") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Opinion)))

data SongContent

Constructors

SongContent

Fields

• identifier :: UUID
• songIdentifier :: UUID
• versionName :: Text
• createdBy :: UUID
• visibilityStatus :: Int
• approvedBy :: Maybe UUID
• instrumentType :: Text
• asciiLegend :: Maybe Text
• asciiContents :: Maybe Text
• pdfContents :: Maybe Text
• guitarProContents :: Maybe Text
• createdAt :: UTCTime
• lastEditedAt :: Maybe UTCTime

Instances

FromJSON SongContent

Defined in WikiMusic.Model.Song

Methods

parseJSON :: Value -> Parser SongContent

parseJSONList :: Value -> Parser [SongContent]

omittedField :: Maybe SongContent

ToJSON SongContent

Defined in WikiMusic.Model.Song

Methods

toJSON :: SongContent -> Value

toEncoding :: SongContent -> Encoding

toJSONList :: [SongContent] -> Value

toEncodingList :: [SongContent] -> Encoding

omitField :: SongContent -> Bool

Generic SongContent

Defined in WikiMusic.Model.Song

Associated Types

type Rep SongContent :: Type -> Type

Methods

from :: SongContent -> Rep SongContent x

to :: Rep SongContent x -> SongContent

Show SongContent

Defined in WikiMusic.Model.Song

Methods

showsPrec :: Int -> SongContent -> ShowS

show :: SongContent -> String

showList :: [SongContent] -> ShowS

Eq SongContent

Defined in WikiMusic.Model.Song

Methods

(==) :: SongContent -> SongContent -> Bool

(/=) :: SongContent -> SongContent -> Bool

ToSchema SongContent

Defined in WikiMusic.Model.Song

Methods

declareNamedSchema :: Proxy SongContent -> Declare (Definitions Schema) NamedSchema

(k ~ A_Lens, a ~ Maybe UUID, b ~ Maybe UUID) => LabelOptic "approvedBy" k SongContent SongContent a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongContent SongContent a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "asciiContents" k SongContent SongContent a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongContent SongContent a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "asciiLegend" k SongContent SongContent a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongContent SongContent a b

(k ~ A_Lens, a ~ UTCTime, b ~ UTCTime) => LabelOptic "createdAt" k SongContent SongContent a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongContent SongContent a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "createdBy" k SongContent SongContent a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongContent SongContent a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "guitarProContents" k SongContent SongContent a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongContent SongContent a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "identifier" k SongContent SongContent a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongContent SongContent a b

(k ~ A_Lens, a ~ Text, b ~ Text) => LabelOptic "instrumentType" k SongContent SongContent a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongContent SongContent a b

(k ~ A_Lens, a ~ Maybe UTCTime, b ~ Maybe UTCTime) => LabelOptic "lastEditedAt" k SongContent SongContent a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongContent SongContent a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "pdfContents" k SongContent SongContent a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongContent SongContent a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "songIdentifier" k SongContent SongContent a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongContent SongContent a b

(k ~ A_Lens, a ~ Text, b ~ Text) => LabelOptic "versionName" k SongContent SongContent a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongContent SongContent a b

(k ~ A_Lens, a ~ Int, b ~ Int) => LabelOptic "visibilityStatus" k SongContent SongContent a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongContent SongContent a b

type Rep SongContent

Defined in WikiMusic.Model.Song

type Rep SongContent = D1 ('MetaData "SongContent" "WikiMusic.Model.Song" "wikimusic-model-hs-1.2.0.0-2AFmU6Rx8U3ctQHH6pLAk" 'False) (C1 ('MetaCons "SongContent" 'PrefixI 'True) (((S1 ('MetaSel ('Just "identifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: (S1 ('MetaSel ('Just "songIdentifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: S1 ('MetaSel ('Just "versionName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))) :*: (S1 ('MetaSel ('Just "createdBy") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: (S1 ('MetaSel ('Just "visibilityStatus") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :*: S1 ('MetaSel ('Just "approvedBy") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe UUID))))) :*: ((S1 ('MetaSel ('Just "instrumentType") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: (S1 ('MetaSel ('Just "asciiLegend") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "asciiContents") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))) :*: ((S1 ('MetaSel ('Just "pdfContents") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "guitarProContents") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text))) :*: (S1 ('MetaSel ('Just "createdAt") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UTCTime) :*: S1 ('MetaSel ('Just "lastEditedAt") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe UTCTime)))))))

validateSong :: Song -> ValidationResult

validateSongArtwork :: SongArtwork -> ValidationResult

validateSongComment :: SongComment -> ValidationResult

validateSongOpinion :: SongOpinion -> ValidationResult

validateSongContent :: SongContent -> ValidationResult

data SongSortOrder

Constructors

DescCreatedAt

AscCreatedAt

DescLastEditedAt

AscLastEditedAt

DescDisplayName

AscDisplayName

Instances

Read SongSortOrder

Defined in WikiMusic.Model.Song

Methods

readsPrec :: Int -> ReadS SongSortOrder

readList :: ReadS [SongSortOrder]

readPrec :: ReadPrec SongSortOrder

readListPrec :: ReadPrec [SongSortOrder]

Show SongSortOrder

Defined in WikiMusic.Model.Song

Methods

showsPrec :: Int -> SongSortOrder -> ShowS

show :: SongSortOrder -> String

showList :: [SongSortOrder] -> ShowS

validateArtistOfSong :: ArtistOfSong -> ValidationResult

data ArtistOfSong

Constructors

ArtistOfSong

Fields

• identifier :: UUID
• songIdentifier :: UUID
• artistIdentifier :: UUID
• createdAt :: UTCTime
• createdBy :: UUID

Instances

FromJSON ArtistOfSong

Defined in WikiMusic.Model.Song

Methods

parseJSON :: Value -> Parser ArtistOfSong

parseJSONList :: Value -> Parser [ArtistOfSong]

omittedField :: Maybe ArtistOfSong

ToJSON ArtistOfSong

Defined in WikiMusic.Model.Song

Methods

toJSON :: ArtistOfSong -> Value

toEncoding :: ArtistOfSong -> Encoding

toJSONList :: [ArtistOfSong] -> Value

toEncodingList :: [ArtistOfSong] -> Encoding

omitField :: ArtistOfSong -> Bool

Generic ArtistOfSong

Defined in WikiMusic.Model.Song

Associated Types

type Rep ArtistOfSong :: Type -> Type

Methods

from :: ArtistOfSong -> Rep ArtistOfSong x

to :: Rep ArtistOfSong x -> ArtistOfSong

Show ArtistOfSong

Defined in WikiMusic.Model.Song

Methods

showsPrec :: Int -> ArtistOfSong -> ShowS

show :: ArtistOfSong -> String

showList :: [ArtistOfSong] -> ShowS

Eq ArtistOfSong

Defined in WikiMusic.Model.Song

Methods

(==) :: ArtistOfSong -> ArtistOfSong -> Bool

(/=) :: ArtistOfSong -> ArtistOfSong -> Bool

ToSchema ArtistOfSong

Defined in WikiMusic.Model.Song

Methods

declareNamedSchema :: Proxy ArtistOfSong -> Declare (Definitions Schema) NamedSchema

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "artistIdentifier" k ArtistOfSong ArtistOfSong a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx ArtistOfSong ArtistOfSong a b

(k ~ A_Lens, a ~ UTCTime, b ~ UTCTime) => LabelOptic "createdAt" k ArtistOfSong ArtistOfSong a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx ArtistOfSong ArtistOfSong a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "createdBy" k ArtistOfSong ArtistOfSong a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx ArtistOfSong ArtistOfSong a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "identifier" k ArtistOfSong ArtistOfSong a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx ArtistOfSong ArtistOfSong a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "songIdentifier" k ArtistOfSong ArtistOfSong a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx ArtistOfSong ArtistOfSong a b

type Rep ArtistOfSong

Defined in WikiMusic.Model.Song

type Rep ArtistOfSong = D1 ('MetaData "ArtistOfSong" "WikiMusic.Model.Song" "wikimusic-model-hs-1.2.0.0-2AFmU6Rx8U3ctQHH6pLAk" 'False) (C1 ('MetaCons "ArtistOfSong" 'PrefixI 'True) ((S1 ('MetaSel ('Just "identifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: S1 ('MetaSel ('Just "songIdentifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID)) :*: (S1 ('MetaSel ('Just "artistIdentifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: (S1 ('MetaSel ('Just "createdAt") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UTCTime) :*: S1 ('MetaSel ('Just "createdBy") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID)))))

data SongExternalSources

Constructors

SongExternalSources

Fields

• identifier :: UUID
• songIdentifier :: UUID
• createdBy :: UUID
• spotifyUrl :: Maybe Text
• youtubeUrl :: Maybe Text
• soundcloudUrl :: Maybe Text
• wikipediaUrl :: Maybe Text
• createdAt :: UTCTime
• lastEditedAt :: Maybe UTCTime

Instances

FromJSON SongExternalSources

Defined in WikiMusic.Model.Song

Methods

parseJSON :: Value -> Parser SongExternalSources

parseJSONList :: Value -> Parser [SongExternalSources]

omittedField :: Maybe SongExternalSources

ToJSON SongExternalSources

Defined in WikiMusic.Model.Song

Methods

toJSON :: SongExternalSources -> Value

toEncoding :: SongExternalSources -> Encoding

toJSONList :: [SongExternalSources] -> Value

toEncodingList :: [SongExternalSources] -> Encoding

omitField :: SongExternalSources -> Bool

Generic SongExternalSources

Defined in WikiMusic.Model.Song

Associated Types

type Rep SongExternalSources :: Type -> Type

Methods

from :: SongExternalSources -> Rep SongExternalSources x

to :: Rep SongExternalSources x -> SongExternalSources

Show SongExternalSources

Defined in WikiMusic.Model.Song

Methods

showsPrec :: Int -> SongExternalSources -> ShowS

show :: SongExternalSources -> String

showList :: [SongExternalSources] -> ShowS

Eq SongExternalSources

Defined in WikiMusic.Model.Song

Methods

(==) :: SongExternalSources -> SongExternalSources -> Bool

(/=) :: SongExternalSources -> SongExternalSources -> Bool

ToSchema SongExternalSources

Defined in WikiMusic.Model.Song

Methods

declareNamedSchema :: Proxy SongExternalSources -> Declare (Definitions Schema) NamedSchema

(k ~ A_Lens, a ~ UTCTime, b ~ UTCTime) => LabelOptic "createdAt" k SongExternalSources SongExternalSources a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongExternalSources SongExternalSources a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "createdBy" k SongExternalSources SongExternalSources a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongExternalSources SongExternalSources a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "identifier" k SongExternalSources SongExternalSources a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongExternalSources SongExternalSources a b

(k ~ A_Lens, a ~ Maybe UTCTime, b ~ Maybe UTCTime) => LabelOptic "lastEditedAt" k SongExternalSources SongExternalSources a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongExternalSources SongExternalSources a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "songIdentifier" k SongExternalSources SongExternalSources a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongExternalSources SongExternalSources a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "soundcloudUrl" k SongExternalSources SongExternalSources a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongExternalSources SongExternalSources a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "spotifyUrl" k SongExternalSources SongExternalSources a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongExternalSources SongExternalSources a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "wikipediaUrl" k SongExternalSources SongExternalSources a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongExternalSources SongExternalSources a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "youtubeUrl" k SongExternalSources SongExternalSources a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongExternalSources SongExternalSources a b

type Rep SongExternalSources

Defined in WikiMusic.Model.Song

type Rep SongExternalSources = D1 ('MetaData "SongExternalSources" "WikiMusic.Model.Song" "wikimusic-model-hs-1.2.0.0-2AFmU6Rx8U3ctQHH6pLAk" 'False) (C1 ('MetaCons "SongExternalSources" 'PrefixI 'True) (((S1 ('MetaSel ('Just "identifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: S1 ('MetaSel ('Just "songIdentifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID)) :*: (S1 ('MetaSel ('Just "createdBy") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: S1 ('MetaSel ('Just "spotifyUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))) :*: ((S1 ('MetaSel ('Just "youtubeUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "soundcloudUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text))) :*: (S1 ('MetaSel ('Just "wikipediaUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: (S1 ('MetaSel ('Just "createdAt") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UTCTime) :*: S1 ('MetaSel ('Just "lastEditedAt") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe UTCTime)))))))

validateSongExternalSources :: SongExternalSources -> ValidationResult

data SongArtworkOrderUpdate

Constructors

SongArtworkOrderUpdate

Fields

• identifier :: UUID
• orderValue :: Int

Instances

FromJSON SongArtworkOrderUpdate

Defined in WikiMusic.Model.Song

Methods

parseJSON :: Value -> Parser SongArtworkOrderUpdate

parseJSONList :: Value -> Parser [SongArtworkOrderUpdate]

omittedField :: Maybe SongArtworkOrderUpdate

ToJSON SongArtworkOrderUpdate

Defined in WikiMusic.Model.Song

Methods

toJSON :: SongArtworkOrderUpdate -> Value

toEncoding :: SongArtworkOrderUpdate -> Encoding

toJSONList :: [SongArtworkOrderUpdate] -> Value

toEncodingList :: [SongArtworkOrderUpdate] -> Encoding

omitField :: SongArtworkOrderUpdate -> Bool

Generic SongArtworkOrderUpdate

Defined in WikiMusic.Model.Song

Associated Types

type Rep SongArtworkOrderUpdate :: Type -> Type

Methods

from :: SongArtworkOrderUpdate -> Rep SongArtworkOrderUpdate x

to :: Rep SongArtworkOrderUpdate x -> SongArtworkOrderUpdate

Show SongArtworkOrderUpdate

Defined in WikiMusic.Model.Song

Methods

showsPrec :: Int -> SongArtworkOrderUpdate -> ShowS

show :: SongArtworkOrderUpdate -> String

showList :: [SongArtworkOrderUpdate] -> ShowS

Eq SongArtworkOrderUpdate

Defined in WikiMusic.Model.Song

Methods

(==) :: SongArtworkOrderUpdate -> SongArtworkOrderUpdate -> Bool

(/=) :: SongArtworkOrderUpdate -> SongArtworkOrderUpdate -> Bool

ToSchema SongArtworkOrderUpdate

Defined in WikiMusic.Model.Song

Methods

declareNamedSchema :: Proxy SongArtworkOrderUpdate -> Declare (Definitions Schema) NamedSchema

type Rep SongArtworkOrderUpdate

Defined in WikiMusic.Model.Song

type Rep SongArtworkOrderUpdate = D1 ('MetaData "SongArtworkOrderUpdate" "WikiMusic.Model.Song" "wikimusic-model-hs-1.2.0.0-2AFmU6Rx8U3ctQHH6pLAk" 'False) (C1 ('MetaCons "SongArtworkOrderUpdate" 'PrefixI 'True) (S1 ('MetaSel ('Just "identifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: S1 ('MetaSel ('Just "orderValue") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int)))

validateSongArtworkOrderUpdate :: SongArtworkOrderUpdate -> ValidationResult

validateSongDelta :: SongDelta -> ValidationResult

data SongDelta

Constructors

SongDelta

Fields

• identifier :: UUID
• displayName :: Maybe Text
• musicKey :: Maybe Text
• musicTuning :: Maybe Text
• musicCreationDate :: Maybe Text
• albumName :: Maybe Text
• albumInfoLink :: Maybe Text
• spotifyUrl :: Maybe Text
• youtubeUrl :: Maybe Text
• soundcloudUrl :: Maybe Text
• wikipediaUrl :: Maybe Text
• description :: Maybe Text

Instances

FromJSON SongDelta

Defined in WikiMusic.Model.Song

Methods

parseJSON :: Value -> Parser SongDelta

parseJSONList :: Value -> Parser [SongDelta]

omittedField :: Maybe SongDelta

ToJSON SongDelta

Defined in WikiMusic.Model.Song

Methods

toJSON :: SongDelta -> Value

toEncoding :: SongDelta -> Encoding

toJSONList :: [SongDelta] -> Value

toEncodingList :: [SongDelta] -> Encoding

omitField :: SongDelta -> Bool

Generic SongDelta

Defined in WikiMusic.Model.Song

Associated Types

type Rep SongDelta :: Type -> Type

Methods

from :: SongDelta -> Rep SongDelta x

to :: Rep SongDelta x -> SongDelta

Show SongDelta

Defined in WikiMusic.Model.Song

Methods

showsPrec :: Int -> SongDelta -> ShowS

show :: SongDelta -> String

showList :: [SongDelta] -> ShowS

Eq SongDelta

Defined in WikiMusic.Model.Song

Methods

(==) :: SongDelta -> SongDelta -> Bool

(/=) :: SongDelta -> SongDelta -> Bool

ToSchema SongDelta

Defined in WikiMusic.Model.Song

Methods

declareNamedSchema :: Proxy SongDelta -> Declare (Definitions Schema) NamedSchema

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "albumInfoLink" k SongDelta SongDelta a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongDelta SongDelta a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "albumName" k SongDelta SongDelta a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongDelta SongDelta a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "description" k SongDelta SongDelta a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongDelta SongDelta a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "displayName" k SongDelta SongDelta a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongDelta SongDelta a b

(k ~ A_Lens, a ~ UUID, b ~ UUID) => LabelOptic "identifier" k SongDelta SongDelta a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongDelta SongDelta a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "musicCreationDate" k SongDelta SongDelta a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongDelta SongDelta a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "musicKey" k SongDelta SongDelta a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongDelta SongDelta a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "musicTuning" k SongDelta SongDelta a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongDelta SongDelta a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "soundcloudUrl" k SongDelta SongDelta a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongDelta SongDelta a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "spotifyUrl" k SongDelta SongDelta a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongDelta SongDelta a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "wikipediaUrl" k SongDelta SongDelta a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongDelta SongDelta a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "youtubeUrl" k SongDelta SongDelta a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx SongDelta SongDelta a b

type Rep SongDelta

Defined in WikiMusic.Model.Song

type Rep SongDelta = D1 ('MetaData "SongDelta" "WikiMusic.Model.Song" "wikimusic-model-hs-1.2.0.0-2AFmU6Rx8U3ctQHH6pLAk" 'False) (C1 ('MetaCons "SongDelta" 'PrefixI 'True) (((S1 ('MetaSel ('Just "identifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: (S1 ('MetaSel ('Just "displayName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "musicKey") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))) :*: (S1 ('MetaSel ('Just "musicTuning") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: (S1 ('MetaSel ('Just "musicCreationDate") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "albumName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text))))) :*: ((S1 ('MetaSel ('Just "albumInfoLink") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: (S1 ('MetaSel ('Just "spotifyUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "youtubeUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))) :*: (S1 ('MetaSel ('Just "soundcloudUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: (S1 ('MetaSel ('Just "wikipediaUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "description") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))))))

validateSongContentDelta :: SongContentDelta -> ValidationResult

data SongContentDelta

Constructors

SongContentDelta

Fields

• identifier :: UUID
• versionName :: Text
• instrumentType :: Maybe Text
• asciiLegend :: Maybe Text
• asciiContents :: Maybe Text
• pdfContents :: Maybe Text
• guitarProContents :: Maybe Text

Instances

FromJSON SongContentDelta

Defined in WikiMusic.Model.Song

Methods

parseJSON :: Value -> Parser SongContentDelta

parseJSONList :: Value -> Parser [SongContentDelta]

omittedField :: Maybe SongContentDelta

ToJSON SongContentDelta

Defined in WikiMusic.Model.Song

Methods

toJSON :: SongContentDelta -> Value

toEncoding :: SongContentDelta -> Encoding

toJSONList :: [SongContentDelta] -> Value

toEncodingList :: [SongContentDelta] -> Encoding

omitField :: SongContentDelta -> Bool

Generic SongContentDelta

Defined in WikiMusic.Model.Song

Associated Types

type Rep SongContentDelta :: Type -> Type

Methods

from :: SongContentDelta -> Rep SongContentDelta x

to :: Rep SongContentDelta x -> SongContentDelta

Show SongContentDelta

Defined in WikiMusic.Model.Song

Methods

showsPrec :: Int -> SongContentDelta -> ShowS

show :: SongContentDelta -> String

showList :: [SongContentDelta] -> ShowS

Eq SongContentDelta

Defined in WikiMusic.Model.Song

Methods

(==) :: SongContentDelta -> SongContentDelta -> Bool

(/=) :: SongContentDelta -> SongContentDelta -> Bool

ToSchema SongContentDelta

Defined in WikiMusic.Model.Song

Methods

declareNamedSchema :: Proxy SongContentDelta -> Declare (Definitions Schema) NamedSchema

type Rep SongContentDelta

Defined in WikiMusic.Model.Song

type Rep SongContentDelta = D1 ('MetaData "SongContentDelta" "WikiMusic.Model.Song" "wikimusic-model-hs-1.2.0.0-2AFmU6Rx8U3ctQHH6pLAk" 'False) (C1 ('MetaCons "SongContentDelta" 'PrefixI 'True) ((S1 ('MetaSel ('Just "identifier") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UUID) :*: (S1 ('MetaSel ('Just "versionName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "instrumentType") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))) :*: ((S1 ('MetaSel ('Just "asciiLegend") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "asciiContents") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text))) :*: (S1 ('MetaSel ('Just "pdfContents") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "guitarProContents") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text))))))

show :: Show a => a -> String

A specialised variant of showsPrec, using precedence context zero, and returning an ordinary String.

read :: Read a => String -> a

The read function reads input from a string, which must be completely consumed by the input process. read fails with an error if the parse is unsuccessful, and it is therefore discouraged from being used in real applications. Use readMaybe or readEither for safe alternatives.

>>> read "123" :: Int
123

>>> read "hello" :: Int
*** Exception: Prelude.read: no parse

data SongIncludes

Constructors

IncludeArtists

IncludeComments

IncludeOpinions

IncludeArtworks

IncludeContents

Instances

FromJSON SongIncludes

Defined in WikiMusic.Model.Song

Methods

parseJSON :: Value -> Parser SongIncludes

parseJSONList :: Value -> Parser [SongIncludes]

omittedField :: Maybe SongIncludes

ToJSON SongIncludes

Defined in WikiMusic.Model.Song

Methods

toJSON :: SongIncludes -> Value

toEncoding :: SongIncludes -> Encoding

toJSONList :: [SongIncludes] -> Value

toEncodingList :: [SongIncludes] -> Encoding

omitField :: SongIncludes -> Bool

Generic SongIncludes

Defined in WikiMusic.Model.Song

Associated Types

type Rep SongIncludes :: Type -> Type

Methods

from :: SongIncludes -> Rep SongIncludes x

to :: Rep SongIncludes x -> SongIncludes

Read SongIncludes

Defined in WikiMusic.Model.Song

Methods

readsPrec :: Int -> ReadS SongIncludes

readList :: ReadS [SongIncludes]

readPrec :: ReadPrec SongIncludes

readListPrec :: ReadPrec [SongIncludes]

Show SongIncludes

Defined in WikiMusic.Model.Song

Methods

showsPrec :: Int -> SongIncludes -> ShowS

show :: SongIncludes -> String

showList :: [SongIncludes] -> ShowS

Eq SongIncludes

Defined in WikiMusic.Model.Song

Methods

(==) :: SongIncludes -> SongIncludes -> Bool

(/=) :: SongIncludes -> SongIncludes -> Bool

ToSchema SongIncludes

Defined in WikiMusic.Model.Song

Methods

declareNamedSchema :: Proxy SongIncludes -> Declare (Definitions Schema) NamedSchema

type Rep SongIncludes

Defined in WikiMusic.Model.Song

type Rep SongIncludes = D1 ('MetaData "SongIncludes" "WikiMusic.Model.Song" "wikimusic-model-hs-1.2.0.0-2AFmU6Rx8U3ctQHH6pLAk" 'False) ((C1 ('MetaCons "IncludeArtists" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "IncludeComments" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "IncludeOpinions" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "IncludeArtworks" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "IncludeContents" 'PrefixI 'False) (U1 :: Type -> Type))))

data EnrichSongParams

Constructors

EnrichSongParams

Fields

• includeComments :: Bool
• includeOpinions :: Bool
• includeArtworks :: Bool
• includeArtists :: Bool
• includeContents :: Bool

Instances

FromJSON EnrichSongParams

Defined in WikiMusic.Model.Song

Methods

parseJSON :: Value -> Parser EnrichSongParams

parseJSONList :: Value -> Parser [EnrichSongParams]

omittedField :: Maybe EnrichSongParams

ToJSON EnrichSongParams

Defined in WikiMusic.Model.Song

Methods

toJSON :: EnrichSongParams -> Value

toEncoding :: EnrichSongParams -> Encoding

toJSONList :: [EnrichSongParams] -> Value

toEncodingList :: [EnrichSongParams] -> Encoding

omitField :: EnrichSongParams -> Bool

Generic EnrichSongParams

Defined in WikiMusic.Model.Song

Associated Types

type Rep EnrichSongParams :: Type -> Type

Methods

from :: EnrichSongParams -> Rep EnrichSongParams x

to :: Rep EnrichSongParams x -> EnrichSongParams

Show EnrichSongParams

Defined in WikiMusic.Model.Song

Methods

showsPrec :: Int -> EnrichSongParams -> ShowS

show :: EnrichSongParams -> String

showList :: [EnrichSongParams] -> ShowS

Eq EnrichSongParams

Defined in WikiMusic.Model.Song

Methods

(==) :: EnrichSongParams -> EnrichSongParams -> Bool

(/=) :: EnrichSongParams -> EnrichSongParams -> Bool

ToSchema EnrichSongParams

Defined in WikiMusic.Model.Song

Methods

declareNamedSchema :: Proxy EnrichSongParams -> Declare (Definitions Schema) NamedSchema

(k ~ A_Lens, a ~ Bool, b ~ Bool) => LabelOptic "includeArtists" k EnrichSongParams EnrichSongParams a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx EnrichSongParams EnrichSongParams a b

(k ~ A_Lens, a ~ Bool, b ~ Bool) => LabelOptic "includeArtworks" k EnrichSongParams EnrichSongParams a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx EnrichSongParams EnrichSongParams a b

(k ~ A_Lens, a ~ Bool, b ~ Bool) => LabelOptic "includeComments" k EnrichSongParams EnrichSongParams a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx EnrichSongParams EnrichSongParams a b

(k ~ A_Lens, a ~ Bool, b ~ Bool) => LabelOptic "includeContents" k EnrichSongParams EnrichSongParams a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx EnrichSongParams EnrichSongParams a b

(k ~ A_Lens, a ~ Bool, b ~ Bool) => LabelOptic "includeOpinions" k EnrichSongParams EnrichSongParams a b

Defined in WikiMusic.Model.Song

Methods

labelOptic :: Optic k NoIx EnrichSongParams EnrichSongParams a b

type Rep EnrichSongParams

Defined in WikiMusic.Model.Song

type Rep EnrichSongParams = D1 ('MetaData "EnrichSongParams" "WikiMusic.Model.Song" "wikimusic-model-hs-1.2.0.0-2AFmU6Rx8U3ctQHH6pLAk" 'False) (C1 ('MetaCons "EnrichSongParams" 'PrefixI 'True) ((S1 ('MetaSel ('Just "includeComments") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool) :*: S1 ('MetaSel ('Just "includeOpinions") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool)) :*: (S1 ('MetaSel ('Just "includeArtworks") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool) :*: (S1 ('MetaSel ('Just "includeArtists") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool) :*: S1 ('MetaSel ('Just "includeContents") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool)))))

fullEnrichment :: EnrichSongParams

noEnrichment :: EnrichSongParams

parseInclude :: Text -> EnrichSongParams