Sound.SC3.Auditor.FCD

Farfisa (electronics)

Recordings of FARFISA COMPACT DUO from B3 to D#6.

Registrations flute8, oboe8, trumpet8, strings8.

With and without vibrato.

Files are each recorded in one pass, metronome m=54, measure=6/4.

flute8, oboe8, trumpet8 were recorded together and balance is natural.

strings8 was recorded later, balance is below.

strings8 ought to balance with trumpet8.

Documentation

fcd_dir :: FilePath

fcd_registrations_plain :: [String]

There are four separate registrations (three used in aad).

fcd_registrations_vib :: [String]

Each has a vibrato variant.

fcd_registrations :: [String]

Making eight registrations in total.

fcd_registrations_ix :: [Int]

Having indices 0 through 7.

fcd_format :: String

Stored as flac.

fcd_fnames :: [FilePath]

The files of the recordings of the eight registrations.

fcd_hdr :: IO [Header]

header of 'fcd_fnames.

h <- fcd_hdr
length h == 8
map frameCount h

fcd_sample_dur :: Fractional n => n

The recorded duration for each tone (in seconds), ie. ts=6/4 at q=54.

fcd_sample_dur == 6 + 2/3

fcd_range :: (OctPC, OctPC)

Range (inclusive) of recorded tones.

bimap1 :: (t -> u) -> (t, t) -> (u, u)

fcd_range_midi :: Num n => (n, n)

As midi note numbers.

fcd_gamut_midi :: (Enum n, Num n) => [n]

All of the recorded midi note numbers.

length fcd_gamut_midi == 29

type SF_LD = (Int -> Bool, Header, FilePath)

(note-predicate,sf-header,sf-name)

sf_load_msg :: SF_LD -> Double -> Double -> Int -> Int -> Maybe Message

The odd form allows selective loading based on m, where the buffer numbers are as if all were loaded.

st = start time (sec.), du = duration (sec.), b = buffer-id, m = midi-note number

sf_load_seq_msg :: SF_LD -> Int -> Double -> (Double, Double) -> Int -> [Message]

fcd_load_seq_msg :: (Int -> Bool) -> Int -> [Header] -> [[Message]]

fcd_load_sel :: (Int -> Bool) -> Int -> IO ()

fcd_load_all_msg :: Int -> [Int] -> IO [Message]

Here k is the set of registrations to load.

fcd_load_all :: Int -> [Int] -> IO ()

Smplr

range_degree :: Num a => (a, a) -> a

fcd_smplr :: SMPLR_OPT -> Int -> (Int, Double) -> Maybe Double -> Double -> Message

fcd_init :: Int -> [Int] -> IO [Bundle]