Karya, built on 2020-11-26T21:03:17 (patch 23b5be2d53a9e8e7d6136cda5aae2849abe5cded)
Safe HaskellNone

Cmd.Repl.LSol

Description

Utilities for solkattu. This re-exports Solkattu.Db so I can find pre-defined korvais.

E.g.: > return $ LSol.search $ LSol.hasInstrument "kendang_tunggal" > return $ LSol.search $ LSol.aroundDate (LSol.date 2017 7 10) 10 > 59: .... etc > LSol.insert_k1 True 1 59 (Index 0)

Synopsis

Documentation

insert :: (Solkattu.Notation stroke, Cmd.M m) => Korvai.Instrument stroke -> Bool -> TrackTime -> KorvaiIndex -> Index -> m () Source #

Insert the korvai at the selection. TODO implement ModifyNotes.replace_tracks to clear existing notes first

edit_new :: Cmd.M m => Korvai.Korvai -> Index -> Text -> m ReplProtocol.Result Source #

Find the korvai, do integrate_track for it, and open an editor on the source file. The editor has bindings to reintegrate after an edit.

get_key :: Cmd.M m => m Block.SourceKey Source #

Find the SourceKey of integrated events around the cursor.

reintegrate :: Ui.M m => Block.SourceKey -> m () Source #

This can be called manually to reintegrate after a change, but is also called automatically by edit.

integrate_track :: Cmd.M m => Korvai.Korvai -> Index -> Text -> m Block.SourceKey Source #

Get the SourceKey, create an empty track with that.

type Select = forall i. [(i, Korvai.Korvai)] -> [(i, Korvai.Korvai)] Source #

recentDates :: Int -> Select Source #

The number of date groups starting from the most recent.

date :: Stack => Int -> Int -> Int -> Day Source #

writeHtmlTo :: FilePath -> IO () Source #

Write all Korvais as HTML into the given directory.

writeTextTo :: FilePath -> Format.Abstraction -> IO () Source #

The usual text dir is a git repo, so I can see what effect changes have, in the same manner as App.VerifyPerformance.

data Index Source #

The indices start at 1, since the section display also does.

Constructors

All 
Index !Int 
Range !Int !Int 

Instances

Instances details
Eq Index # 
Instance details

Defined in Solkattu.Part

Methods

(==) :: Index -> Index -> Bool #

(/=) :: Index -> Index -> Bool #

Num Index # 
Instance details

Defined in Solkattu.Part

Show Index # 
Instance details

Defined in Solkattu.Part

Methods

showsPrec :: Int -> Index -> ShowS #

show :: Index -> String #

showList :: [Index] -> ShowS #