Safe Haskell	Safe-Inferred

Derive.Scale.BaliScales

Contents

Laras
Format
tuning

Description

Utilities for Balinese scales. Mostly that means dealing with umbang and isep.

They're implemented as a modification of ChromaticScales because a saih pitu or pelog scale requires a key or pathet, which winds up being similar to a simplified chromatic scale.

Synopsis

make_scale :: Pitch.ScaleId -> ScaleMap -> Scale
data ScaleMap = ScaleMap {
- smap_chromatic :: !ChromaticScales.ScaleMap
- smap_laras :: !LarasMap
- smap_default_laras :: !Laras
}
type LarasMap = Map Text Laras
scale_map :: Config -> TheoryFormat.Format -> Maybe (Pitch.Semi, Pitch.Semi) -> ScaleMap
data Config = Config {
- config_layout :: !Theory.Layout
- config_keys :: !ChromaticScales.Keys
- config_default_key :: !Theory.Key
- config_laras :: !LarasMap
- config_default_laras :: !Laras
}
instrument_scale_map :: Config -> Instrument -> ScaleMap
data Instrument = Instrument {
- inst_degrees :: !TheoryFormat.Degrees
- inst_relative_octaves :: !RelativeOctaves
- inst_center :: !Pitch.Octave
- inst_low :: !Pitch.Pitch
- inst_high :: !Pitch.Pitch
}
instrument_range :: Instrument -> Scale.Range
data Laras = Laras {
- laras_name :: Text
- laras_doc :: Doc.Doc
- laras_base :: Pitch.Pitch
- laras_umbang :: Vector.Vector Pitch.NoteNumber
- laras_isep :: Vector.Vector Pitch.NoteNumber
}
laras_map :: [Laras] -> Map Text Laras
laras :: Text -> Pitch.Pitch -> ([Pitch.NoteNumber] -> [Pitch.NoteNumber]) -> Doc.Doc -> [(Pitch.NoteNumber, Pitch.NoteNumber)] -> Laras
laras_offset :: Theory.Layout -> Laras -> Pitch.Semi
laras_nns :: Laras -> [(Pitch.NoteNumber, Pitch.NoteNumber)]
balinese :: TheoryFormat.Degrees
ioeua :: TheoryFormat.Degrees
digit_octave_relative :: TheoryFormat.Degrees -> Bool -> Theory.Key -> ChromaticScales.Keys -> TheoryFormat.Format
ioeua_relative :: Bool -> Theory.Key -> ChromaticScales.Keys -> TheoryFormat.Format
type RelativeOctaves = (Char, Maybe Char, Char)
arrow_octaves :: RelativeOctaves
balinese_octaves :: RelativeOctaves
degrees_doc :: TheoryFormat.Degrees -> Text
relative_arrow :: TheoryFormat.Degrees -> RelativeOctaves -> Pitch.Octave -> Bool -> Theory.Key -> ChromaticScales.Keys -> TheoryFormat.Format
ioeua_relative_arrow :: Pitch.Octave -> Bool -> Theory.Key -> ChromaticScales.Keys -> TheoryFormat.Format
ioeua_absolute :: TheoryFormat.Format
modify_config :: (TheoryFormat.Config -> TheoryFormat.Config) -> TheoryFormat.RelativeFormat key -> TheoryFormat.RelativeFormat key
set_relative_octaves :: RelativeOctaves -> Pitch.Octave -> TheoryFormat.Config -> TheoryFormat.Config
cipher_relative_dotted :: Pitch.Octave -> Theory.Key -> ChromaticScales.Keys -> TheoryFormat.Format
cipher5 :: TheoryFormat.Degrees
dotted_octaves :: Pitch.Octave -> TheoryFormat.Config -> TheoryFormat.Config
data Tuning
- = Umbang
- | Isep
c_ombak :: ScoreT.Control
semis_to_nn :: Theory.Layout -> LarasMap -> Laras -> ChromaticScales.SemisToNoteNumber
laras_key :: EnvKey.Key
get_nn :: Vector.Vector Pitch.NoteNumber -> Pitch.FSemi -> Maybe Pitch.NoteNumber

Documentation

make_scale :: Pitch.ScaleId -> ScaleMap -> Scale Source #

Top level scale constructor.

data ScaleMap Source #

Constructors

ScaleMap
Fields smap_chromatic :: !ChromaticScales.ScaleMap smap_laras :: !LarasMap smap_default_laras :: !Laras

type LarasMap = Map Text Laras Source #

scale_map Source #

Arguments

:: Config
-> TheoryFormat.Format
-> Maybe (Pitch.Semi, Pitch.Semi)	If not given, use the complete range of the saih.
-> ScaleMap

data Config Source #

Constructors

Config
Fields config_layout :: !Theory.Layout config_keys :: !ChromaticScales.Keys config_default_key :: !Theory.Key config_laras :: !LarasMap config_default_laras :: !Laras

Instances

Instances details

Show Config Source #
Instance details Defined in Derive.Scale.BaliScales Methods showsPrec :: Int -> Config -> ShowS # show :: Config -> String # showList :: [Config] -> ShowS #

instrument_scale_map :: Config -> Instrument -> ScaleMap Source #

This is a specialized version of scale_map that uses base octave and low and high pitches to compute the range.

data Instrument Source #

Describe an instrument-relative scale.

Constructors

Instrument
Fields inst_degrees :: !TheoryFormat.Degrees inst_relative_octaves :: !RelativeOctaves inst_center :: !Pitch.Octave inst_low :: !Pitch.Pitch inst_high :: !Pitch.Pitch

Instances

Instances details

Show Instrument Source #
Instance details Defined in Derive.Scale.BaliScales Methods showsPrec :: Int -> Instrument -> ShowS # show :: Instrument -> String # showList :: [Instrument] -> ShowS #
Eq Instrument Source #
Instance details Defined in Derive.Scale.BaliScales Methods (==) :: Instrument -> Instrument -> Bool # (/=) :: Instrument -> Instrument -> Bool #

instrument_range :: Instrument -> Scale.Range Source #

Laras

data Laras Source #

Describe the frequencies in a saih. This doesn't say what the range is, since that's in the ScaleMap, and all saihs in one scale should have the same range.

Constructors

Laras
Fields laras_name :: Text laras_doc :: Doc.Doc laras_base :: Pitch.Pitch The pitch where the laras starts. It should be such that octave 4 is close to middle C. laras_umbang :: Vector.Vector Pitch.NoteNumber laras_isep :: Vector.Vector Pitch.NoteNumber

Instances

Instances details

Show Laras Source #
Instance details Defined in Derive.Scale.BaliScales Methods showsPrec :: Int -> Laras -> ShowS # show :: Laras -> String # showList :: [Laras] -> ShowS #
Eq Laras Source #
Instance details Defined in Derive.Scale.BaliScales Methods (==) :: Laras -> Laras -> Bool # (/=) :: Laras -> Laras -> Bool #

laras_map :: [Laras] -> Map Text Laras Source #

laras :: Text -> Pitch.Pitch -> ([Pitch.NoteNumber] -> [Pitch.NoteNumber]) -> Doc.Doc -> [(Pitch.NoteNumber, Pitch.NoteNumber)] -> Laras Source #

laras_offset :: Theory.Layout -> Laras -> Pitch.Semi Source #

laras_nns :: Laras -> [(Pitch.NoteNumber, Pitch.NoteNumber)] Source #

Format

balinese :: TheoryFormat.Degrees Source #

This can't use backtick symbols because then the combining octave characters don't combine.

ioeua :: TheoryFormat.Degrees Source #

digit_octave_relative :: TheoryFormat.Degrees -> Bool -> Theory.Key -> ChromaticScales.Keys -> TheoryFormat.Format Source #

ioeua_relative :: Bool -> Theory.Key -> ChromaticScales.Keys -> TheoryFormat.Format Source #

type RelativeOctaves = (Char, Maybe Char, Char) Source #

(high, middle, low)

arrow_octaves :: RelativeOctaves Source #

Use ascii-art arrows for octaves.

balinese_octaves :: RelativeOctaves Source #

Use combining marks for octaves.

degrees_doc :: TheoryFormat.Degrees -> Text Source #

relative_arrow :: TheoryFormat.Degrees -> RelativeOctaves -> Pitch.Octave -> Bool -> Theory.Key -> ChromaticScales.Keys -> TheoryFormat.Format Source #

ioeua_relative_arrow :: Pitch.Octave -> Bool -> Theory.Key -> ChromaticScales.Keys -> TheoryFormat.Format Source #

ioeua_absolute :: TheoryFormat.Format Source #

modify_config :: (TheoryFormat.Config -> TheoryFormat.Config) -> TheoryFormat.RelativeFormat key -> TheoryFormat.RelativeFormat key Source #

set_relative_octaves :: RelativeOctaves -> Pitch.Octave -> TheoryFormat.Config -> TheoryFormat.Config Source #

cipher_relative_dotted :: Pitch.Octave -> Theory.Key -> ChromaticScales.Keys -> TheoryFormat.Format Source #

cipher5 :: TheoryFormat.Degrees Source #

dotted_octaves :: Pitch.Octave -> TheoryFormat.Config -> TheoryFormat.Config Source #

tuning

data Tuning Source #

Constructors

Umbang
Isep

Instances

Instances details

Bounded Tuning Source #
Instance details Defined in Derive.Scale.BaliScales Methods minBound :: Tuning # maxBound :: Tuning #
Enum Tuning Source #
Instance details Defined in Derive.Scale.BaliScales Methods succ :: Tuning -> Tuning # pred :: Tuning -> Tuning # toEnum :: Int -> Tuning # fromEnum :: Tuning -> Int # enumFrom :: Tuning -> [Tuning] # enumFromThen :: Tuning -> Tuning -> [Tuning] # enumFromTo :: Tuning -> Tuning -> [Tuning] # enumFromThenTo :: Tuning -> Tuning -> Tuning -> [Tuning] #
Show Tuning Source #
Instance details Defined in Derive.Scale.BaliScales Methods showsPrec :: Int -> Tuning -> ShowS # show :: Tuning -> String # showList :: [Tuning] -> ShowS #
Eq Tuning Source #
Instance details Defined in Derive.Scale.BaliScales Methods (==) :: Tuning -> Tuning -> Bool # (/=) :: Tuning -> Tuning -> Bool #
Ord Tuning Source #
Instance details Defined in Derive.Scale.BaliScales Methods compare :: Tuning -> Tuning -> Ordering # (<) :: Tuning -> Tuning -> Bool # (<=) :: Tuning -> Tuning -> Bool # (>) :: Tuning -> Tuning -> Bool # (>=) :: Tuning -> Tuning -> Bool # max :: Tuning -> Tuning -> Tuning # min :: Tuning -> Tuning -> Tuning #
REnv.ToVal Tuning Source #
Instance details Defined in Derive.Scale.BaliScales Methods to_val :: Tuning -> REnv.Val Source #
ShowVal.ShowVal Tuning Source #
Instance details Defined in Derive.Scale.BaliScales Methods show_val :: Tuning -> Text Source #
Typecheck.Typecheck Tuning Source #
Instance details Defined in Derive.Scale.BaliScales Methods from_val :: DeriveT.Val -> Typecheck.Checked Tuning Source # to_type :: Proxy Tuning -> Type Source # from_subtrack :: Track -> Maybe Tuning Source #
Pretty Tuning Source #
Instance details Defined in Derive.Scale.BaliScales Methods pretty :: Tuning -> Text Source # format :: Tuning -> Doc Source # formatList :: [Tuning] -> Doc Source #

c_ombak :: ScoreT.Control Source #

If ombak is unset, use the hardcoded tunings. Otherwise, create new umbang and isep tunings based on the given number.

semis_to_nn :: Theory.Layout -> LarasMap -> Laras -> ChromaticScales.SemisToNoteNumber Source #

Convert Pitch.FSemi to Pitch.NoteNumber.

laras_key :: EnvKey.Key Source #

VStr: Select saih tuning.

get_nn :: Vector.Vector Pitch.NoteNumber -> Pitch.FSemi -> Maybe Pitch.NoteNumber Source #