Safe Haskell | Safe-Inferred |
---|---|
Language | Haskell2010 |
Tuning graph with edges determined by interval set.
Synopsis
- type R = Rational
- r_flip :: R -> R
- r_nrm :: R -> R
- r_rel :: (R, R) -> R
- iset_sym :: [R] -> [R]
- rem_oct :: [R] -> [R]
- r_pcset :: [R] -> [Int]
- r_pcset_univ :: [R] -> [Int]
- r_is_pcset :: [Int] -> [R] -> Bool
- type G = Gr R
- edj_r :: (R, R) -> R
- mk_graph :: [R] -> [R] -> G
- gen_graph :: Ord v => [Dot_Meta_Attr] -> Graph_Pp v e -> [Edge_Lbl v e] -> [String]
- g_to_dot :: Int -> [(String, String)] -> (R -> [(String, String)]) -> G -> [String]
- mk_graph_scl :: [R] -> Scale -> G
- scl_to_dot :: ([R], Int, [(String, String)], R -> [(String, String)]) -> String -> IO [String]
- graph_to_fgl :: G -> Gr R R
- mk_graph_fgl :: [R] -> [R] -> Gr R R
R
Flip a ratio in (1,2) and multiply by 2.
import Data.Ratio {- base -} map r_flip [5%4,3%2,7%4] == [8%5,4%3,8%7] map r_flip [3/2,5/4,7/4] == [4/3,8/5,8/7]
r_pcset_univ :: [R] -> [Int] Source #
G
mk_graph :: [R] -> [R] -> G Source #
The graph with vertices scl_r and all edges where the interval (i,j) is in iset.
SCALA
scl_to_dot :: ([R], Int, [(String, String)], R -> [(String, String)]) -> String -> IO [String] Source #