hsc3-rec 0.14 → 0.14.1
raw patch · 427 files changed
+923/−924 lines, 427 files
This diff is very large; some files are shown as “too large to diff”. Download the raw patch for the complete diff.
Files
- Sound/SC3/UGen/Record/A2K.hs +2/−2
- Sound/SC3/UGen/Record/APF.hs +4/−4
- Sound/SC3/UGen/Record/AY.hs +2/−2
- Sound/SC3/UGen/Record/AY8910.hs +2/−2
- Sound/SC3/UGen/Record/Allpass1.hs +2/−2
- Sound/SC3/UGen/Record/Allpass2.hs +2/−2
- Sound/SC3/UGen/Record/AllpassC.hs +2/−2
- Sound/SC3/UGen/Record/AllpassL.hs +2/−2
- Sound/SC3/UGen/Record/AllpassN.hs +2/−2
- Sound/SC3/UGen/Record/AmpComp.hs +2/−2
- Sound/SC3/UGen/Record/Amplitude.hs +2/−2
- Sound/SC3/UGen/Record/AmplitudeMod.hs +2/−2
- Sound/SC3/UGen/Record/AnalyseEvents2.hs +2/−2
- Sound/SC3/UGen/Record/Atari2600.hs +2/−2
- Sound/SC3/UGen/Record/AudioMSG.hs +2/−2
- Sound/SC3/UGen/Record/AverageOutput.hs +2/−2
- Sound/SC3/UGen/Record/BAllPass.hs +2/−2
- Sound/SC3/UGen/Record/BBandPass.hs +2/−2
- Sound/SC3/UGen/Record/BBandStop.hs +2/−2
- Sound/SC3/UGen/Record/BFEncode1.hs +2/−2
- Sound/SC3/UGen/Record/BFEncode2.hs +2/−2
- Sound/SC3/UGen/Record/BHiPass.hs +2/−2
- Sound/SC3/UGen/Record/BHiShelf.hs +2/−2
- Sound/SC3/UGen/Record/BLowPass.hs +2/−2
- Sound/SC3/UGen/Record/BLowShelf.hs +2/−2
- Sound/SC3/UGen/Record/BMoog.hs +2/−2
- Sound/SC3/UGen/Record/BPF.hs +4/−4
- Sound/SC3/UGen/Record/BPZ2.hs +2/−2
- Sound/SC3/UGen/Record/BPeakEQ.hs +2/−2
- Sound/SC3/UGen/Record/BRF.hs +4/−4
- Sound/SC3/UGen/Record/BRZ2.hs +2/−2
- Sound/SC3/UGen/Record/Balance.hs +2/−2
- Sound/SC3/UGen/Record/Ball.hs +2/−2
- Sound/SC3/UGen/Record/Brusselator.hs +2/−2
- Sound/SC3/UGen/Record/BufAllpassC.hs +2/−2
- Sound/SC3/UGen/Record/BufAllpassL.hs +2/−2
- Sound/SC3/UGen/Record/BufAllpassN.hs +2/−2
- Sound/SC3/UGen/Record/BufCombC.hs +2/−2
- Sound/SC3/UGen/Record/BufCombL.hs +2/−2
- Sound/SC3/UGen/Record/BufCombN.hs +2/−2
- Sound/SC3/UGen/Record/BufDelayC.hs +2/−2
- Sound/SC3/UGen/Record/BufDelayL.hs +2/−2
- Sound/SC3/UGen/Record/BufDelayN.hs +2/−2
- Sound/SC3/UGen/Record/BufGrain.hs +2/−2
- Sound/SC3/UGen/Record/BufGrainB.hs +2/−2
- Sound/SC3/UGen/Record/BufGrainBBF.hs +2/−2
- Sound/SC3/UGen/Record/BufGrainBF.hs +2/−2
- Sound/SC3/UGen/Record/BufGrainI.hs +2/−2
- Sound/SC3/UGen/Record/BufGrainIBF.hs +2/−2
- Sound/SC3/UGen/Record/CheckBadValues.hs +4/−4
- Sound/SC3/UGen/Record/CircleRamp.hs +2/−2
- Sound/SC3/UGen/Record/Clip.hs +2/−2
- Sound/SC3/UGen/Record/Clipper32.hs +2/−2
- Sound/SC3/UGen/Record/Clipper4.hs +2/−2
- Sound/SC3/UGen/Record/Clipper8.hs +2/−2
- Sound/SC3/UGen/Record/CoinGate.hs +2/−2
- Sound/SC3/UGen/Record/CombC.hs +2/−2
- Sound/SC3/UGen/Record/CombL.hs +2/−2
- Sound/SC3/UGen/Record/CombLP.hs +2/−2
- Sound/SC3/UGen/Record/CombN.hs +2/−2
- Sound/SC3/UGen/Record/Compander.hs +2/−2
- Sound/SC3/UGen/Record/CompanderD.hs +2/−2
- Sound/SC3/UGen/Record/Convolution.hs +2/−2
- Sound/SC3/UGen/Record/Convolution2.hs +2/−2
- Sound/SC3/UGen/Record/Convolution2L.hs +2/−2
- Sound/SC3/UGen/Record/Convolution3.hs +2/−2
- Sound/SC3/UGen/Record/Coyote.hs +2/−2
- Sound/SC3/UGen/Record/Crest.hs +2/−2
- Sound/SC3/UGen/Record/CrossoverDistortion.hs +2/−2
- Sound/SC3/UGen/Record/DC.hs +4/−4
- Sound/SC3/UGen/Record/DFM1.hs +4/−4
- Sound/SC3/UGen/Record/Dbrown.hs +2/−2
- Sound/SC3/UGen/Record/Dbrown2.hs +2/−2
- Sound/SC3/UGen/Record/Decay.hs +2/−2
- Sound/SC3/UGen/Record/Decay2.hs +2/−2
- Sound/SC3/UGen/Record/Decimator.hs +4/−4
- Sound/SC3/UGen/Record/DegreeToKey.hs +2/−2
- Sound/SC3/UGen/Record/DelTapWr.hs +2/−2
- Sound/SC3/UGen/Record/Delay1.hs +2/−2
- Sound/SC3/UGen/Record/Delay2.hs +2/−2
- Sound/SC3/UGen/Record/DelayC.hs +2/−2
- Sound/SC3/UGen/Record/DelayL.hs +2/−2
- Sound/SC3/UGen/Record/DelayN.hs +2/−2
- Sound/SC3/UGen/Record/DetectIndex.hs +2/−2
- Sound/SC3/UGen/Record/DetectSilence.hs +2/−2
- Sound/SC3/UGen/Record/Dgauss.hs +2/−2
- Sound/SC3/UGen/Record/Dgeom.hs +2/−2
- Sound/SC3/UGen/Record/Dibrown.hs +2/−2
- Sound/SC3/UGen/Record/Disintegrator.hs +2/−2
- Sound/SC3/UGen/Record/DiskOut.hs +2/−2
- Sound/SC3/UGen/Record/Diwhite.hs +2/−2
- Sound/SC3/UGen/Record/Donce.hs +2/−2
- Sound/SC3/UGen/Record/DoubleNestedAllpassC.hs +2/−2
- Sound/SC3/UGen/Record/DoubleNestedAllpassL.hs +2/−2
- Sound/SC3/UGen/Record/DoubleNestedAllpassN.hs +2/−2
- Sound/SC3/UGen/Record/DoubleWell3.hs +2/−2
- Sound/SC3/UGen/Record/Dpoll.hs +4/−4
- Sound/SC3/UGen/Record/Dreset.hs +2/−2
- Sound/SC3/UGen/Record/DriveNoise.hs +2/−2
- Sound/SC3/UGen/Record/Dseries.hs +2/−2
- Sound/SC3/UGen/Record/Dstutter.hs +2/−2
- Sound/SC3/UGen/Record/Dwhite.hs +2/−2
- Sound/SC3/UGen/Record/EnvDetect.hs +2/−2
- Sound/SC3/UGen/Record/FFT.hs +4/−4
- Sound/SC3/UGen/Record/FMHEncode0.hs +2/−2
- Sound/SC3/UGen/Record/FMHEncode1.hs +2/−2
- Sound/SC3/UGen/Record/FMHEncode2.hs +2/−2
- Sound/SC3/UGen/Record/FOS.hs +4/−4
- Sound/SC3/UGen/Record/FoaAsymmetry.hs +2/−2
- Sound/SC3/UGen/Record/FoaDirectO.hs +2/−2
- Sound/SC3/UGen/Record/FoaDirectX.hs +2/−2
- Sound/SC3/UGen/Record/FoaDirectY.hs +2/−2
- Sound/SC3/UGen/Record/FoaDirectZ.hs +2/−2
- Sound/SC3/UGen/Record/FoaDominateX.hs +2/−2
- Sound/SC3/UGen/Record/FoaDominateY.hs +2/−2
- Sound/SC3/UGen/Record/FoaDominateZ.hs +2/−2
- Sound/SC3/UGen/Record/FoaFocusX.hs +2/−2
- Sound/SC3/UGen/Record/FoaFocusY.hs +2/−2
- Sound/SC3/UGen/Record/FoaFocusZ.hs +2/−2
- Sound/SC3/UGen/Record/FoaNFC.hs +2/−2
- Sound/SC3/UGen/Record/FoaPanB.hs +2/−2
- Sound/SC3/UGen/Record/FoaPressX.hs +2/−2
- Sound/SC3/UGen/Record/FoaPressY.hs +2/−2
- Sound/SC3/UGen/Record/FoaPressZ.hs +2/−2
- Sound/SC3/UGen/Record/FoaProximity.hs +2/−2
- Sound/SC3/UGen/Record/FoaPsychoShelf.hs +2/−2
- Sound/SC3/UGen/Record/FoaPushX.hs +2/−2
- Sound/SC3/UGen/Record/FoaPushY.hs +2/−2
- Sound/SC3/UGen/Record/FoaPushZ.hs +2/−2
- Sound/SC3/UGen/Record/FoaRotate.hs +2/−2
- Sound/SC3/UGen/Record/FoaTilt.hs +2/−2
- Sound/SC3/UGen/Record/FoaTumble.hs +2/−2
- Sound/SC3/UGen/Record/FoaZoomX.hs +2/−2
- Sound/SC3/UGen/Record/FoaZoomY.hs +2/−2
- Sound/SC3/UGen/Record/FoaZoomZ.hs +2/−2
- Sound/SC3/UGen/Record/Fold.hs +2/−2
- Sound/SC3/UGen/Record/Formlet.hs +2/−2
- Sound/SC3/UGen/Record/Free.hs +2/−2
- Sound/SC3/UGen/Record/FreeSelf.hs +2/−2
- Sound/SC3/UGen/Record/FreeVerb.hs +2/−2
- Sound/SC3/UGen/Record/FreeVerb2.hs +2/−2
- Sound/SC3/UGen/Record/FreqShift.hs +2/−2
- Sound/SC3/UGen/Record/Friction.hs +4/−4
- Sound/SC3/UGen/Record/GVerb.hs +2/−2
- Sound/SC3/UGen/Record/Gate.hs +2/−2
- Sound/SC3/UGen/Record/GaussClass.hs +2/−2
- Sound/SC3/UGen/Record/GlitchBPF.hs +2/−2
- Sound/SC3/UGen/Record/GlitchBRF.hs +2/−2
- Sound/SC3/UGen/Record/GlitchHPF.hs +2/−2
- Sound/SC3/UGen/Record/GlitchRHPF.hs +2/−2
- Sound/SC3/UGen/Record/Goertzel.hs +2/−2
- Sound/SC3/UGen/Record/GrainBuf.hs +2/−2
- Sound/SC3/UGen/Record/GrainIn.hs +2/−2
- Sound/SC3/UGen/Record/GravityGrid.hs +2/−2
- Sound/SC3/UGen/Record/GravityGrid2.hs +2/−2
- Sound/SC3/UGen/Record/HPF.hs +4/−4
- Sound/SC3/UGen/Record/HPZ1.hs +2/−2
- Sound/SC3/UGen/Record/HPZ2.hs +2/−2
- Sound/SC3/UGen/Record/Hasher.hs +2/−2
- Sound/SC3/UGen/Record/Hilbert.hs +2/−2
- Sound/SC3/UGen/Record/HilbertFIR.hs +2/−2
- Sound/SC3/UGen/Record/IIRFilter.hs +2/−2
- Sound/SC3/UGen/Record/InGrain.hs +2/−2
- Sound/SC3/UGen/Record/InGrainB.hs +2/−2
- Sound/SC3/UGen/Record/InGrainBBF.hs +2/−2
- Sound/SC3/UGen/Record/InGrainBF.hs +2/−2
- Sound/SC3/UGen/Record/InGrainI.hs +2/−2
- Sound/SC3/UGen/Record/InGrainIBF.hs +2/−2
- Sound/SC3/UGen/Record/InRange.hs +2/−2
- Sound/SC3/UGen/Record/Index.hs +2/−2
- Sound/SC3/UGen/Record/IndexInBetween.hs +2/−2
- Sound/SC3/UGen/Record/IndexL.hs +2/−2
- Sound/SC3/UGen/Record/InsideOut.hs +2/−2
- Sound/SC3/UGen/Record/Integrator.hs +2/−2
- Sound/SC3/UGen/Record/K2A.hs +2/−2
- Sound/SC3/UGen/Record/LFBrownNoise0.hs +2/−2
- Sound/SC3/UGen/Record/LFBrownNoise1.hs +2/−2
- Sound/SC3/UGen/Record/LFBrownNoise2.hs +2/−2
- Sound/SC3/UGen/Record/LFClipNoise.hs +2/−2
- Sound/SC3/UGen/Record/LFCub.hs +2/−2
- Sound/SC3/UGen/Record/LFDClipNoise.hs +2/−2
- Sound/SC3/UGen/Record/LFDNoise0.hs +2/−2
- Sound/SC3/UGen/Record/LFDNoise1.hs +2/−2
- Sound/SC3/UGen/Record/LFDNoise3.hs +2/−2
- Sound/SC3/UGen/Record/LFGauss.hs +2/−2
- Sound/SC3/UGen/Record/LFNoise0.hs +2/−2
- Sound/SC3/UGen/Record/LFNoise1.hs +2/−2
- Sound/SC3/UGen/Record/LFNoise2.hs +2/−2
- Sound/SC3/UGen/Record/LFPar.hs +2/−2
- Sound/SC3/UGen/Record/LFPulse.hs +2/−2
- Sound/SC3/UGen/Record/LFSaw.hs +2/−2
- Sound/SC3/UGen/Record/LFTri.hs +2/−2
- Sound/SC3/UGen/Record/LPF.hs +4/−4
- Sound/SC3/UGen/Record/LPF1.hs +2/−2
- Sound/SC3/UGen/Record/LPF18.hs +2/−2
- Sound/SC3/UGen/Record/LPFVS6.hs +2/−2
- Sound/SC3/UGen/Record/LPZ1.hs +2/−2
- Sound/SC3/UGen/Record/LPZ2.hs +2/−2
- Sound/SC3/UGen/Record/LTI.hs +2/−2
- Sound/SC3/UGen/Record/Lag.hs +2/−2
- Sound/SC3/UGen/Record/Lag2.hs +2/−2
- Sound/SC3/UGen/Record/Lag2UD.hs +2/−2
- Sound/SC3/UGen/Record/Lag3.hs +2/−2
- Sound/SC3/UGen/Record/Lag3UD.hs +2/−2
- Sound/SC3/UGen/Record/LagUD.hs +2/−2
- Sound/SC3/UGen/Record/LastValue.hs +2/−2
- Sound/SC3/UGen/Record/Latch.hs +2/−2
- Sound/SC3/UGen/Record/LeakDC.hs +2/−2
- Sound/SC3/UGen/Record/Limiter.hs +2/−2
- Sound/SC3/UGen/Record/LinExp.hs +2/−2
- Sound/SC3/UGen/Record/LinPan2.hs +2/−2
- Sound/SC3/UGen/Record/LocalOut.hs +2/−2
- Sound/SC3/UGen/Record/Logistic.hs +2/−2
- Sound/SC3/UGen/Record/LoopBuf.hs +2/−2
- Sound/SC3/UGen/Record/MantissaMask.hs +2/−2
- Sound/SC3/UGen/Record/MarkovSynth.hs +2/−2
- Sound/SC3/UGen/Record/Max.hs +2/−2
- Sound/SC3/UGen/Record/Maxamp.hs +2/−2
- Sound/SC3/UGen/Record/MeanTriggered.hs +4/−4
- Sound/SC3/UGen/Record/Median.hs +4/−4
- Sound/SC3/UGen/Record/MedianTriggered.hs +4/−4
- Sound/SC3/UGen/Record/MidEQ.hs +2/−2
- Sound/SC3/UGen/Record/MonoGrain.hs +2/−2
- Sound/SC3/UGen/Record/MonoGrainBF.hs +2/−2
- Sound/SC3/UGen/Record/MoogFF.hs +2/−2
- Sound/SC3/UGen/Record/MoogLadder.hs +2/−2
- Sound/SC3/UGen/Record/MoogVCF.hs +2/−2
- Sound/SC3/UGen/Record/NL.hs +2/−2
- Sound/SC3/UGen/Record/NeedleRect.hs +2/−2
- Sound/SC3/UGen/Record/NestedAllpassC.hs +2/−2
- Sound/SC3/UGen/Record/NestedAllpassL.hs +2/−2
- Sound/SC3/UGen/Record/NestedAllpassN.hs +2/−2
- Sound/SC3/UGen/Record/Normalizer.hs +2/−2
- Sound/SC3/UGen/Record/OSFold4.hs +2/−2
- Sound/SC3/UGen/Record/OSFold8.hs +2/−2
- Sound/SC3/UGen/Record/OSTrunc4.hs +2/−2
- Sound/SC3/UGen/Record/OSTrunc8.hs +2/−2
- Sound/SC3/UGen/Record/OSWrap4.hs +2/−2
- Sound/SC3/UGen/Record/OSWrap8.hs +2/−2
- Sound/SC3/UGen/Record/OffsetOut.hs +2/−2
- Sound/SC3/UGen/Record/OnePole.hs +2/−2
- Sound/SC3/UGen/Record/OneZero.hs +2/−2
- Sound/SC3/UGen/Record/Onsets.hs +2/−2
- Sound/SC3/UGen/Record/Oregonator.hs +2/−2
- Sound/SC3/UGen/Record/Out.hs +2/−2
- Sound/SC3/UGen/Record/PV_Add.hs +2/−2
- Sound/SC3/UGen/Record/PV_BinBufRd.hs +2/−2
- Sound/SC3/UGen/Record/PV_BinDelay.hs +2/−2
- Sound/SC3/UGen/Record/PV_BinFilter.hs +2/−2
- Sound/SC3/UGen/Record/PV_BinPlayBuf.hs +4/−4
- Sound/SC3/UGen/Record/PV_BinScramble.hs +2/−2
- Sound/SC3/UGen/Record/PV_BinShift.hs +2/−2
- Sound/SC3/UGen/Record/PV_BinWipe.hs +2/−2
- Sound/SC3/UGen/Record/PV_BrickWall.hs +2/−2
- Sound/SC3/UGen/Record/PV_BufRd.hs +2/−2
- Sound/SC3/UGen/Record/PV_ChainUGen.hs +2/−2
- Sound/SC3/UGen/Record/PV_CommonMag.hs +2/−2
- Sound/SC3/UGen/Record/PV_CommonMul.hs +2/−2
- Sound/SC3/UGen/Record/PV_Compander.hs +2/−2
- Sound/SC3/UGen/Record/PV_ConformalMap.hs +2/−2
- Sound/SC3/UGen/Record/PV_Conj.hs +2/−2
- Sound/SC3/UGen/Record/PV_Copy.hs +2/−2
- Sound/SC3/UGen/Record/PV_CopyPhase.hs +2/−2
- Sound/SC3/UGen/Record/PV_Cutoff.hs +2/−2
- Sound/SC3/UGen/Record/PV_DiffMags.hs +2/−2
- Sound/SC3/UGen/Record/PV_Diffuser.hs +2/−2
- Sound/SC3/UGen/Record/PV_Div.hs +2/−2
- Sound/SC3/UGen/Record/PV_EvenBin.hs +2/−2
- Sound/SC3/UGen/Record/PV_ExtractRepeat.hs +2/−2
- Sound/SC3/UGen/Record/PV_Freeze.hs +2/−2
- Sound/SC3/UGen/Record/PV_FreqBuffer.hs +2/−2
- Sound/SC3/UGen/Record/PV_HainsworthFoote.hs +2/−2
- Sound/SC3/UGen/Record/PV_Invert.hs +2/−2
- Sound/SC3/UGen/Record/PV_JensenAndersen.hs +2/−2
- Sound/SC3/UGen/Record/PV_LocalMax.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagAbove.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagBelow.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagBuffer.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagClip.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagDiv.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagExp.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagFreeze.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagGate.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagLog.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagMap.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagMinus.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagMul.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagMulAdd.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagNoise.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagScale.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagShift.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagSmear.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagSmooth.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagSquared.hs +2/−2
- Sound/SC3/UGen/Record/PV_MagSubtract.hs +2/−2
- Sound/SC3/UGen/Record/PV_Max.hs +2/−2
- Sound/SC3/UGen/Record/PV_MaxMagN.hs +2/−2
- Sound/SC3/UGen/Record/PV_Min.hs +2/−2
- Sound/SC3/UGen/Record/PV_MinMagN.hs +2/−2
- Sound/SC3/UGen/Record/PV_Morph.hs +2/−2
- Sound/SC3/UGen/Record/PV_Mul.hs +2/−2
- Sound/SC3/UGen/Record/PV_NoiseSynthF.hs +2/−2
- Sound/SC3/UGen/Record/PV_NoiseSynthP.hs +2/−2
- Sound/SC3/UGen/Record/PV_OddBin.hs +2/−2
- Sound/SC3/UGen/Record/PV_PartialSynthF.hs +2/−2
- Sound/SC3/UGen/Record/PV_PartialSynthP.hs +2/−2
- Sound/SC3/UGen/Record/PV_PhaseShift.hs +2/−2
- Sound/SC3/UGen/Record/PV_PhaseShift270.hs +2/−2
- Sound/SC3/UGen/Record/PV_PhaseShift90.hs +2/−2
- Sound/SC3/UGen/Record/PV_PitchShift.hs +2/−2
- Sound/SC3/UGen/Record/PV_PlayBuf.hs +4/−4
- Sound/SC3/UGen/Record/PV_RandComb.hs +2/−2
- Sound/SC3/UGen/Record/PV_RandWipe.hs +2/−2
- Sound/SC3/UGen/Record/PV_RecordBuf.hs +2/−2
- Sound/SC3/UGen/Record/PV_RectComb.hs +2/−2
- Sound/SC3/UGen/Record/PV_RectComb2.hs +2/−2
- Sound/SC3/UGen/Record/PV_SoftWipe.hs +2/−2
- Sound/SC3/UGen/Record/PV_SpectralEnhance.hs +2/−2
- Sound/SC3/UGen/Record/PV_SpectralMap.hs +4/−4
- Sound/SC3/UGen/Record/PV_Whiten.hs +4/−4
- Sound/SC3/UGen/Record/PV_XFade.hs +2/−2
- Sound/SC3/UGen/Record/Pan2.hs +2/−2
- Sound/SC3/UGen/Record/Pan4.hs +2/−2
- Sound/SC3/UGen/Record/PanAz.hs +2/−2
- Sound/SC3/UGen/Record/PanB.hs +2/−2
- Sound/SC3/UGen/Record/PanB2.hs +2/−2
- Sound/SC3/UGen/Record/PanX.hs +2/−2
- Sound/SC3/UGen/Record/PanX2D.hs +2/−2
- Sound/SC3/UGen/Record/PartConv.hs +2/−2
- Sound/SC3/UGen/Record/Pause.hs +2/−2
- Sound/SC3/UGen/Record/PauseSelf.hs +2/−2
- Sound/SC3/UGen/Record/Peak.hs +2/−2
- Sound/SC3/UGen/Record/PeakEQ2.hs +2/−2
- Sound/SC3/UGen/Record/PeakEQ4.hs +2/−2
- Sound/SC3/UGen/Record/PeakFollower.hs +2/−2
- Sound/SC3/UGen/Record/Phasor.hs +2/−2
- Sound/SC3/UGen/Record/Pitch.hs +2/−2
- Sound/SC3/UGen/Record/PitchShift.hs +2/−2
- Sound/SC3/UGen/Record/PlaneTree.hs +2/−2
- Sound/SC3/UGen/Record/PlayBuf.hs +2/−2
- Sound/SC3/UGen/Record/Pluck.hs +2/−2
- Sound/SC3/UGen/Record/PosRatio.hs +2/−2
- Sound/SC3/UGen/Record/PrintVal.hs +4/−4
- Sound/SC3/UGen/Record/PulseDivider.hs +2/−2
- Sound/SC3/UGen/Record/Qitch.hs +2/−2
- Sound/SC3/UGen/Record/RDelayMap.hs +2/−2
- Sound/SC3/UGen/Record/RDelaySet.hs +2/−2
- Sound/SC3/UGen/Record/RDelaySetB.hs +2/−2
- Sound/SC3/UGen/Record/RHPF.hs +2/−2
- Sound/SC3/UGen/Record/RLPF.hs +2/−2
- Sound/SC3/UGen/Record/RLPFD.hs +2/−2
- Sound/SC3/UGen/Record/RMEQ.hs +2/−2
- Sound/SC3/UGen/Record/RMShelf.hs +2/−2
- Sound/SC3/UGen/Record/RMShelf2.hs +2/−2
- Sound/SC3/UGen/Record/RPlayTrace.hs +2/−2
- Sound/SC3/UGen/Record/RShufflerL.hs +2/−2
- Sound/SC3/UGen/Record/Ramp.hs +2/−2
- Sound/SC3/UGen/Record/RandID.hs +2/−2
- Sound/SC3/UGen/Record/RedDPCMdecode.hs +2/−2
- Sound/SC3/UGen/Record/RedDPCMencode.hs +4/−4
- Sound/SC3/UGen/Record/RedLbyl.hs +2/−2
- Sound/SC3/UGen/Record/RedPhasor.hs +2/−2
- Sound/SC3/UGen/Record/RedPhasor2.hs +2/−2
- Sound/SC3/UGen/Record/RegaliaMitraEQ.hs +2/−2
- Sound/SC3/UGen/Record/ReplaceOut.hs +2/−2
- Sound/SC3/UGen/Record/Resonz.hs +2/−2
- Sound/SC3/UGen/Record/Ringz.hs +2/−2
- Sound/SC3/UGen/Record/RosslerResL.hs +2/−2
- Sound/SC3/UGen/Record/Rotate.hs +2/−2
- Sound/SC3/UGen/Record/RunningMax.hs +2/−2
- Sound/SC3/UGen/Record/RunningMin.hs +2/−2
- Sound/SC3/UGen/Record/RunningSum.hs +2/−2
- Sound/SC3/UGen/Record/SID6581f.hs +2/−2
- Sound/SC3/UGen/Record/SMS.hs +2/−2
- Sound/SC3/UGen/Record/SN76489.hs +2/−2
- Sound/SC3/UGen/Record/SOS.hs +4/−4
- Sound/SC3/UGen/Record/SVF.hs +2/−2
- Sound/SC3/UGen/Record/Schmidt.hs +2/−2
- Sound/SC3/UGen/Record/SendTrig.hs +4/−4
- Sound/SC3/UGen/Record/Shaper.hs +2/−2
- Sound/SC3/UGen/Record/SineShaper.hs +2/−2
- Sound/SC3/UGen/Record/SkipNeedle.hs +2/−2
- Sound/SC3/UGen/Record/Slew.hs +2/−2
- Sound/SC3/UGen/Record/Slope.hs +2/−2
- Sound/SC3/UGen/Record/SmoothDecimator.hs +4/−4
- Sound/SC3/UGen/Record/SoftClipAmp.hs +2/−2
- Sound/SC3/UGen/Record/SoftClipAmp4.hs +2/−2
- Sound/SC3/UGen/Record/SoftClipAmp8.hs +2/−2
- Sound/SC3/UGen/Record/SoftClipper4.hs +2/−2
- Sound/SC3/UGen/Record/SoftClipper8.hs +2/−2
- Sound/SC3/UGen/Record/Spreader.hs +2/−2
- Sound/SC3/UGen/Record/Spring.hs +4/−4
- Sound/SC3/UGen/Record/SpruceBudworm.hs +2/−2
- Sound/SC3/UGen/Record/Squiz.hs +2/−2
- Sound/SC3/UGen/Record/Stepper.hs +4/−4
- Sound/SC3/UGen/Record/StereoConvolution2L.hs +2/−2
- Sound/SC3/UGen/Record/Sweep.hs +2/−2
- Sound/SC3/UGen/Record/SwitchDelay.hs +2/−2
- Sound/SC3/UGen/Record/T2A.hs +2/−2
- Sound/SC3/UGen/Record/T2K.hs +2/−2
- Sound/SC3/UGen/Record/TBall.hs too large to diff
- Sound/SC3/UGen/Record/TDelay.hs too large to diff
- Sound/SC3/UGen/Record/TGrains.hs too large to diff
- Sound/SC3/UGen/Record/TGrains2.hs too large to diff
- Sound/SC3/UGen/Record/TGrains3.hs too large to diff
- Sound/SC3/UGen/Record/TPV.hs too large to diff
- Sound/SC3/UGen/Record/TWindex.hs too large to diff
- Sound/SC3/UGen/Record/Tartini.hs too large to diff
- Sound/SC3/UGen/Record/Tilt.hs too large to diff
- Sound/SC3/UGen/Record/Trig.hs too large to diff
- Sound/SC3/UGen/Record/Trig1.hs too large to diff
- Sound/SC3/UGen/Record/TrigAvg.hs too large to diff
- Sound/SC3/UGen/Record/TwoPole.hs too large to diff
- Sound/SC3/UGen/Record/TwoZero.hs too large to diff
- Sound/SC3/UGen/Record/VBAP.hs too large to diff
- Sound/SC3/UGen/Record/VDiskIn.hs too large to diff
- Sound/SC3/UGen/Record/VarLag.hs too large to diff
- Sound/SC3/UGen/Record/Vibrato.hs too large to diff
- Sound/SC3/UGen/Record/WAmp.hs too large to diff
- Sound/SC3/UGen/Record/WaveLoss.hs too large to diff
- Sound/SC3/UGen/Record/Wrap.hs too large to diff
- Sound/SC3/UGen/Record/WrapIndex.hs too large to diff
- Sound/SC3/UGen/Record/WrapSummer.hs too large to diff
- Sound/SC3/UGen/Record/XOut.hs too large to diff
- Sound/SC3/UGen/Record/ZeroCrossing.hs too large to diff
- hsc3-rec.cabal too large to diff
- mk/build.hs too large to diff
Sound/SC3/UGen/Record/A2K.hs view
@@ -3,11 +3,11 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data A2K = A2K {- in :: S.UGen+ input :: S.UGen } deriving (Show) a2K :: A2K a2K = A2K {- in = 0.0+ input = 0.0 } mkA2K :: A2K -> S.UGen mkA2K (A2K a') = S.mkOsc S.KR "A2K" [a'] 1
Sound/SC3/UGen/Record/APF.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data APF = APF { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, radius :: S.UGen } deriving (Show)-aPF :: APF-aPF = APF {+apf :: APF+apf = APF { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0, radius = 0.8 }
Sound/SC3/UGen/Record/AY.hs view
@@ -15,8 +15,8 @@ envstyle :: S.UGen, chiptype :: S.UGen } deriving (Show)-aY :: AY-aY = AY {+ay :: AY+ay = AY { tonea = 1777.0, toneb = 1666.0, tonec = 1555.0,
Sound/SC3/UGen/Record/AY8910.hs view
@@ -17,7 +17,7 @@ rB :: S.UGen, rC :: S.UGen, rD :: S.UGen,- rate :: S.UGen+ rate_ :: S.UGen } deriving (Show) aY8910 :: AY8910 aY8910 = AY8910 {@@ -35,7 +35,7 @@ rB = 0.0, rC = 0.0, rD = 0.0,- rate = 1.0+ rate_ = 1.0 } mkAY8910 :: AY8910 -> S.UGen mkAY8910 (AY8910 a' b' c' d' e' f' g' h' i' j' k' l' m' n' o') = S.mkOsc S.AR "AY8910" [a',b',c',d',e',f',g',h',i',j',k',l',m',n',o'] 3
Sound/SC3/UGen/Record/Allpass1.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Allpass1 = Allpass1 {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen } deriving (Show) allpass1 :: Allpass1 allpass1 = Allpass1 {- in = 0.0,+ input = 0.0, freq = 1200.0 } mkAllpass1 :: Allpass1 -> S.UGen
Sound/SC3/UGen/Record/Allpass2.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Allpass2 = Allpass2 {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen } deriving (Show) allpass2 :: Allpass2 allpass2 = Allpass2 {- in = 0.0,+ input = 0.0, freq = 1200.0, rq = 1.0 }
Sound/SC3/UGen/Record/AllpassC.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data AllpassC = AllpassC { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, maxdelaytime :: S.UGen, delaytime :: S.UGen, decaytime :: S.UGen@@ -12,7 +12,7 @@ allpassC :: AllpassC allpassC = AllpassC { rate = S.AR,- in = 0.0,+ input = 0.0, maxdelaytime = 0.2, delaytime = 0.2, decaytime = 1.0
Sound/SC3/UGen/Record/AllpassL.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data AllpassL = AllpassL { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, maxdelaytime :: S.UGen, delaytime :: S.UGen, decaytime :: S.UGen@@ -12,7 +12,7 @@ allpassL :: AllpassL allpassL = AllpassL { rate = S.AR,- in = 0.0,+ input = 0.0, maxdelaytime = 0.2, delaytime = 0.2, decaytime = 1.0
Sound/SC3/UGen/Record/AllpassN.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data AllpassN = AllpassN { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, maxdelaytime :: S.UGen, delaytime :: S.UGen, decaytime :: S.UGen@@ -12,7 +12,7 @@ allpassN :: AllpassN allpassN = AllpassN { rate = S.AR,- in = 0.0,+ input = 0.0, maxdelaytime = 0.2, delaytime = 0.2, decaytime = 1.0
Sound/SC3/UGen/Record/AmpComp.hs view
@@ -6,14 +6,14 @@ rate :: S.Rate, freq :: S.UGen, root :: S.UGen,- exp :: S.UGen+ exp_ :: S.UGen } deriving (Show) ampComp :: AmpComp ampComp = AmpComp { rate = S.AR, freq = 0.0, root = 0.0,- exp = 0.3333+ exp_ = 0.3333 } mkAmpComp :: AmpComp -> S.UGen mkAmpComp (AmpComp r a' b' c') = S.mkOsc r "AmpComp" [a',b',c'] 1
Sound/SC3/UGen/Record/Amplitude.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data Amplitude = Amplitude { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, attackTime :: S.UGen, releaseTime :: S.UGen } deriving (Show) amplitude :: Amplitude amplitude = Amplitude { rate = S.AR,- in = 0.0,+ input = 0.0, attackTime = 0.01, releaseTime = 0.01 }
Sound/SC3/UGen/Record/AmplitudeMod.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data AmplitudeMod = AmplitudeMod { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, attackTime :: S.UGen, releaseTime :: S.UGen } deriving (Show) amplitudeMod :: AmplitudeMod amplitudeMod = AmplitudeMod { rate = S.AR,- in = 0.0,+ input = 0.0, attackTime = 0.01, releaseTime = 0.01 }
Sound/SC3/UGen/Record/AnalyseEvents2.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data AnalyseEvents2 = AnalyseEvents2 {- in :: S.UGen,+ input :: S.UGen, bufnum :: S.UGen, threshold :: S.UGen, triggerid :: S.UGen,@@ -12,7 +12,7 @@ } deriving (Show) analyseEvents2 :: AnalyseEvents2 analyseEvents2 = AnalyseEvents2 {- in = 0.0,+ input = 0.0, bufnum = 0.0, threshold = 0.34, triggerid = 101.0,
Sound/SC3/UGen/Record/Atari2600.hs view
@@ -9,7 +9,7 @@ audf1 :: S.UGen, audv0 :: S.UGen, audv1 :: S.UGen,- rate :: S.UGen+ rate_ :: S.UGen } deriving (Show) atari2600 :: Atari2600 atari2600 = Atari2600 {@@ -19,7 +19,7 @@ audf1 = 4.0, audv0 = 5.0, audv1 = 5.0,- rate = 1.0+ rate_ = 1.0 } mkAtari2600 :: Atari2600 -> S.UGen mkAtari2600 (Atari2600 a' b' c' d' e' f' g') = S.mkOsc S.AR "Atari2600" [a',b',c',d',e',f',g'] 1
Sound/SC3/UGen/Record/AudioMSG.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data AudioMSG = AudioMSG {- in :: S.UGen,+ input :: S.UGen, index :: S.UGen } deriving (Show) audioMSG :: AudioMSG audioMSG = AudioMSG {- in = 0.0,+ input = 0.0, index = 0.0 } mkAudioMSG :: AudioMSG -> S.UGen
Sound/SC3/UGen/Record/AverageOutput.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data AverageOutput = AverageOutput { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, trig :: S.UGen } deriving (Show) averageOutput :: AverageOutput averageOutput = AverageOutput { rate = S.AR,- in = 0.0,+ input = 0.0, trig = 0.0 } mkAverageOutput :: AverageOutput -> S.UGen
Sound/SC3/UGen/Record/BAllPass.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data BAllPass = BAllPass {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen } deriving (Show) bAllPass :: BAllPass bAllPass = BAllPass {- in = 0.0,+ input = 0.0, freq = 1200.0, rq = 1.0 }
Sound/SC3/UGen/Record/BBandPass.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data BBandPass = BBandPass {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, bw :: S.UGen } deriving (Show) bBandPass :: BBandPass bBandPass = BBandPass {- in = 0.0,+ input = 0.0, freq = 1200.0, bw = 1.0 }
Sound/SC3/UGen/Record/BBandStop.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data BBandStop = BBandStop {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, bw :: S.UGen } deriving (Show) bBandStop :: BBandStop bBandStop = BBandStop {- in = 0.0,+ input = 0.0, freq = 1200.0, bw = 1.0 }
Sound/SC3/UGen/Record/BFEncode1.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data BFEncode1 = BFEncode1 {- in :: S.UGen,+ input :: S.UGen, azimuth :: S.UGen, elevation :: S.UGen, rho :: S.UGen,@@ -12,7 +12,7 @@ } deriving (Show) bFEncode1 :: BFEncode1 bFEncode1 = BFEncode1 {- in = 0.0,+ input = 0.0, azimuth = 0.0, elevation = 0.0, rho = 1.0,
Sound/SC3/UGen/Record/BFEncode2.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data BFEncode2 = BFEncode2 {- in :: S.UGen,+ input :: S.UGen, point_x :: S.UGen, point_y :: S.UGen, elevation :: S.UGen,@@ -12,7 +12,7 @@ } deriving (Show) bFEncode2 :: BFEncode2 bFEncode2 = BFEncode2 {- in = 0.0,+ input = 0.0, point_x = 1.0, point_y = 1.0, elevation = 0.0,
Sound/SC3/UGen/Record/BHiPass.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data BHiPass = BHiPass {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen } deriving (Show) bHiPass :: BHiPass bHiPass = BHiPass {- in = 0.0,+ input = 0.0, freq = 1200.0, rq = 1.0 }
Sound/SC3/UGen/Record/BHiShelf.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data BHiShelf = BHiShelf {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rs :: S.UGen, db :: S.UGen } deriving (Show) bHiShelf :: BHiShelf bHiShelf = BHiShelf {- in = 0.0,+ input = 0.0, freq = 1200.0, rs = 1.0, db = 0.0
Sound/SC3/UGen/Record/BLowPass.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data BLowPass = BLowPass {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen } deriving (Show) bLowPass :: BLowPass bLowPass = BLowPass {- in = 0.0,+ input = 0.0, freq = 1200.0, rq = 1.0 }
Sound/SC3/UGen/Record/BLowShelf.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data BLowShelf = BLowShelf {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rs :: S.UGen, db :: S.UGen } deriving (Show) bLowShelf :: BLowShelf bLowShelf = BLowShelf {- in = 0.0,+ input = 0.0, freq = 1200.0, rs = 1.0, db = 0.0
Sound/SC3/UGen/Record/BMoog.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data BMoog = BMoog {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, q :: S.UGen, mode :: S.UGen,@@ -11,7 +11,7 @@ } deriving (Show) bMoog :: BMoog bMoog = BMoog {- in = 0.0,+ input = 0.0, freq = 440.0, q = 0.2, mode = 0.0,
Sound/SC3/UGen/Record/BPF.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data BPF = BPF { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen } deriving (Show)-bPF :: BPF-bPF = BPF {+bpf :: BPF+bpf = BPF { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0, rq = 1.0 }
Sound/SC3/UGen/Record/BPZ2.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data BPZ2 = BPZ2 { rate :: S.Rate,- in :: S.UGen+ input :: S.UGen } deriving (Show) bPZ2 :: BPZ2 bPZ2 = BPZ2 { rate = S.AR,- in = 0.0+ input = 0.0 } mkBPZ2 :: BPZ2 -> S.UGen mkBPZ2 (BPZ2 r a') = S.mkOsc r "BPZ2" [a'] 1
Sound/SC3/UGen/Record/BPeakEQ.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data BPeakEQ = BPeakEQ {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen, db :: S.UGen } deriving (Show) bPeakEQ :: BPeakEQ bPeakEQ = BPeakEQ {- in = 0.0,+ input = 0.0, freq = 1200.0, rq = 1.0, db = 0.0
Sound/SC3/UGen/Record/BRF.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data BRF = BRF { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen } deriving (Show)-bRF :: BRF-bRF = BRF {+brf :: BRF+brf = BRF { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0, rq = 1.0 }
Sound/SC3/UGen/Record/BRZ2.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data BRZ2 = BRZ2 { rate :: S.Rate,- in :: S.UGen+ input :: S.UGen } deriving (Show) bRZ2 :: BRZ2 bRZ2 = BRZ2 { rate = S.AR,- in = 0.0+ input = 0.0 } mkBRZ2 :: BRZ2 -> S.UGen mkBRZ2 (BRZ2 r a') = S.mkOsc r "BRZ2" [a'] 1
Sound/SC3/UGen/Record/Balance.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Balance = Balance {- in :: S.UGen,+ input :: S.UGen, test :: S.UGen, hp :: S.UGen, stor :: S.UGen } deriving (Show) balance :: Balance balance = Balance {- in = 0.0,+ input = 0.0, test = 0.0, hp = 10.0, stor = 0.0
Sound/SC3/UGen/Record/Ball.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data Ball = Ball { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, g :: S.UGen, damp :: S.UGen, friction :: S.UGen@@ -12,7 +12,7 @@ ball :: Ball ball = Ball { rate = S.AR,- in = 0.0,+ input = 0.0, g = 1.0, damp = 0.0, friction = 0.01
Sound/SC3/UGen/Record/Brusselator.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data Brusselator = Brusselator { reset :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, mu :: S.UGen, gamma :: S.UGen, initx :: S.UGen,@@ -13,7 +13,7 @@ brusselator :: Brusselator brusselator = Brusselator { reset = 0.0,- rate = 0.01,+ rate_ = 0.01, mu = 1.0, gamma = 1.0, initx = 0.5,
Sound/SC3/UGen/Record/BufAllpassC.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data BufAllpassC = BufAllpassC { buf :: S.UGen,- in :: S.UGen,+ input :: S.UGen, delaytime :: S.UGen, decaytime :: S.UGen } deriving (Show) bufAllpassC :: BufAllpassC bufAllpassC = BufAllpassC { buf = 0.0,- in = 0.0,+ input = 0.0, delaytime = 0.2, decaytime = 1.0 }
Sound/SC3/UGen/Record/BufAllpassL.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data BufAllpassL = BufAllpassL { buf :: S.UGen,- in :: S.UGen,+ input :: S.UGen, delaytime :: S.UGen, decaytime :: S.UGen } deriving (Show) bufAllpassL :: BufAllpassL bufAllpassL = BufAllpassL { buf = 0.0,- in = 0.0,+ input = 0.0, delaytime = 0.2, decaytime = 1.0 }
Sound/SC3/UGen/Record/BufAllpassN.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data BufAllpassN = BufAllpassN { buf :: S.UGen,- in :: S.UGen,+ input :: S.UGen, delaytime :: S.UGen, decaytime :: S.UGen } deriving (Show) bufAllpassN :: BufAllpassN bufAllpassN = BufAllpassN { buf = 0.0,- in = 0.0,+ input = 0.0, delaytime = 0.2, decaytime = 1.0 }
Sound/SC3/UGen/Record/BufCombC.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data BufCombC = BufCombC { buf :: S.UGen,- in :: S.UGen,+ input :: S.UGen, delaytime :: S.UGen, decaytime :: S.UGen } deriving (Show) bufCombC :: BufCombC bufCombC = BufCombC { buf = 0.0,- in = 0.0,+ input = 0.0, delaytime = 0.2, decaytime = 1.0 }
Sound/SC3/UGen/Record/BufCombL.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data BufCombL = BufCombL { buf :: S.UGen,- in :: S.UGen,+ input :: S.UGen, delaytime :: S.UGen, decaytime :: S.UGen } deriving (Show) bufCombL :: BufCombL bufCombL = BufCombL { buf = 0.0,- in = 0.0,+ input = 0.0, delaytime = 0.2, decaytime = 1.0 }
Sound/SC3/UGen/Record/BufCombN.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data BufCombN = BufCombN { buf :: S.UGen,- in :: S.UGen,+ input :: S.UGen, delaytime :: S.UGen, decaytime :: S.UGen } deriving (Show) bufCombN :: BufCombN bufCombN = BufCombN { buf = 0.0,- in = 0.0,+ input = 0.0, delaytime = 0.2, decaytime = 1.0 }
Sound/SC3/UGen/Record/BufDelayC.hs view
@@ -5,14 +5,14 @@ data BufDelayC = BufDelayC { rate :: S.Rate, buf :: S.UGen,- in :: S.UGen,+ input :: S.UGen, delaytime :: S.UGen } deriving (Show) bufDelayC :: BufDelayC bufDelayC = BufDelayC { rate = S.AR, buf = 0.0,- in = 0.0,+ input = 0.0, delaytime = 0.2 } mkBufDelayC :: BufDelayC -> S.UGen
Sound/SC3/UGen/Record/BufDelayL.hs view
@@ -5,14 +5,14 @@ data BufDelayL = BufDelayL { rate :: S.Rate, buf :: S.UGen,- in :: S.UGen,+ input :: S.UGen, delaytime :: S.UGen } deriving (Show) bufDelayL :: BufDelayL bufDelayL = BufDelayL { rate = S.AR, buf = 0.0,- in = 0.0,+ input = 0.0, delaytime = 0.2 } mkBufDelayL :: BufDelayL -> S.UGen
Sound/SC3/UGen/Record/BufDelayN.hs view
@@ -5,14 +5,14 @@ data BufDelayN = BufDelayN { rate :: S.Rate, buf :: S.UGen,- in :: S.UGen,+ input :: S.UGen, delaytime :: S.UGen } deriving (Show) bufDelayN :: BufDelayN bufDelayN = BufDelayN { rate = S.AR, buf = 0.0,- in = 0.0,+ input = 0.0, delaytime = 0.2 } mkBufDelayN :: BufDelayN -> S.UGen
Sound/SC3/UGen/Record/BufGrain.hs view
@@ -6,7 +6,7 @@ trigger :: S.UGen, dur :: S.UGen, sndbuf :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, pos :: S.UGen, interp :: S.UGen } deriving (Show)@@ -15,7 +15,7 @@ trigger = 0.0, dur = 1.0, sndbuf = 0.0,- rate = 1.0,+ rate_ = 1.0, pos = 0.0, interp = 2.0 }
Sound/SC3/UGen/Record/BufGrainB.hs view
@@ -6,7 +6,7 @@ trigger :: S.UGen, dur :: S.UGen, sndbuf :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, pos :: S.UGen, envbuf :: S.UGen, interp :: S.UGen@@ -16,7 +16,7 @@ trigger = 0.0, dur = 1.0, sndbuf = 0.0,- rate = 1.0,+ rate_ = 1.0, pos = 0.0, envbuf = 0.0, interp = 2.0
Sound/SC3/UGen/Record/BufGrainBBF.hs view
@@ -6,7 +6,7 @@ trigger :: S.UGen, dur :: S.UGen, sndbuf :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, pos :: S.UGen, envbuf :: S.UGen, azimuth :: S.UGen,@@ -20,7 +20,7 @@ trigger = 0.0, dur = 1.0, sndbuf = 0.0,- rate = 1.0,+ rate_ = 1.0, pos = 0.0, envbuf = 0.0, azimuth = 0.0,
Sound/SC3/UGen/Record/BufGrainBF.hs view
@@ -6,7 +6,7 @@ trigger :: S.UGen, dur :: S.UGen, sndbuf :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, pos :: S.UGen, azimuth :: S.UGen, elevation :: S.UGen,@@ -19,7 +19,7 @@ trigger = 0.0, dur = 1.0, sndbuf = 0.0,- rate = 1.0,+ rate_ = 1.0, pos = 0.0, azimuth = 0.0, elevation = 0.0,
Sound/SC3/UGen/Record/BufGrainI.hs view
@@ -6,7 +6,7 @@ trigger :: S.UGen, dur :: S.UGen, sndbuf :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, pos :: S.UGen, envbuf1 :: S.UGen, envbuf2 :: S.UGen,@@ -18,7 +18,7 @@ trigger = 0.0, dur = 1.0, sndbuf = 0.0,- rate = 1.0,+ rate_ = 1.0, pos = 0.0, envbuf1 = 0.0, envbuf2 = 0.0,
Sound/SC3/UGen/Record/BufGrainIBF.hs view
@@ -6,7 +6,7 @@ trigger :: S.UGen, dur :: S.UGen, sndbuf :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, pos :: S.UGen, envbuf1 :: S.UGen, envbuf2 :: S.UGen,@@ -22,7 +22,7 @@ trigger = 0.0, dur = 1.0, sndbuf = 0.0,- rate = 1.0,+ rate_ = 1.0, pos = 0.0, envbuf1 = 0.0, envbuf2 = 0.0,
Sound/SC3/UGen/Record/CheckBadValues.hs view
@@ -4,15 +4,15 @@ import Sound.SC3.UGen.Record data CheckBadValues = CheckBadValues { rate :: S.Rate,- in :: S.UGen,- id :: S.UGen,+ input :: S.UGen,+ id_ :: S.UGen, post :: S.UGen } deriving (Show) checkBadValues :: CheckBadValues checkBadValues = CheckBadValues { rate = S.AR,- in = 0.0,- id = 0.0,+ input = 0.0,+ id_ = 0.0, post = 2.0 } mkCheckBadValues :: CheckBadValues -> S.UGen
Sound/SC3/UGen/Record/CircleRamp.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data CircleRamp = CircleRamp { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, lagTime :: S.UGen, circmin :: S.UGen, circmax :: S.UGen@@ -12,7 +12,7 @@ circleRamp :: CircleRamp circleRamp = CircleRamp { rate = S.AR,- in = 0.0,+ input = 0.0, lagTime = 0.1, circmin = -180.0, circmax = 180.0
Sound/SC3/UGen/Record/Clip.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data Clip = Clip { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, lo :: S.UGen, hi :: S.UGen } deriving (Show) clip :: Clip clip = Clip { rate = S.AR,- in = 0.0,+ input = 0.0, lo = 0.0, hi = 1.0 }
Sound/SC3/UGen/Record/Clipper32.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Clipper32 = Clipper32 {- in :: S.UGen,+ input :: S.UGen, lo :: S.UGen, hi :: S.UGen } deriving (Show) clipper32 :: Clipper32 clipper32 = Clipper32 {- in = 0.0,+ input = 0.0, lo = -0.8, hi = 0.8 }
Sound/SC3/UGen/Record/Clipper4.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Clipper4 = Clipper4 {- in :: S.UGen,+ input :: S.UGen, lo :: S.UGen, hi :: S.UGen } deriving (Show) clipper4 :: Clipper4 clipper4 = Clipper4 {- in = 0.0,+ input = 0.0, lo = -0.8, hi = 0.8 }
Sound/SC3/UGen/Record/Clipper8.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Clipper8 = Clipper8 {- in :: S.UGen,+ input :: S.UGen, lo :: S.UGen, hi :: S.UGen } deriving (Show) clipper8 :: Clipper8 clipper8 = Clipper8 {- in = 0.0,+ input = 0.0, lo = -0.8, hi = 0.8 }
Sound/SC3/UGen/Record/CoinGate.hs view
@@ -5,13 +5,13 @@ data CoinGate = CoinGate { rate :: S.Rate, prob :: S.UGen,- in :: S.UGen+ input :: S.UGen } deriving (Show) coinGate :: CoinGate coinGate = CoinGate { rate = S.AR, prob = 0.0,- in = 0.0+ input = 0.0 } mkCoinGate :: CoinGate -> S.UGen mkCoinGate (CoinGate r a' b') = S.mkOsc r "CoinGate" [a',b'] 1
Sound/SC3/UGen/Record/CombC.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data CombC = CombC { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, maxdelaytime :: S.UGen, delaytime :: S.UGen, decaytime :: S.UGen@@ -12,7 +12,7 @@ combC :: CombC combC = CombC { rate = S.AR,- in = 0.0,+ input = 0.0, maxdelaytime = 0.2, delaytime = 0.2, decaytime = 1.0
Sound/SC3/UGen/Record/CombL.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data CombL = CombL { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, maxdelaytime :: S.UGen, delaytime :: S.UGen, decaytime :: S.UGen@@ -12,7 +12,7 @@ combL :: CombL combL = CombL { rate = S.AR,- in = 0.0,+ input = 0.0, maxdelaytime = 0.2, delaytime = 0.2, decaytime = 1.0
Sound/SC3/UGen/Record/CombLP.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data CombLP = CombLP {- in :: S.UGen,+ input :: S.UGen, gate :: S.UGen, maxdelaytime :: S.UGen, delaytime :: S.UGen,@@ -12,7 +12,7 @@ } deriving (Show) combLP :: CombLP combLP = CombLP {- in = 0.0,+ input = 0.0, gate = 1.0, maxdelaytime = 0.2, delaytime = 0.2,
Sound/SC3/UGen/Record/CombN.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data CombN = CombN { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, maxdelaytime :: S.UGen, delaytime :: S.UGen, decaytime :: S.UGen@@ -12,7 +12,7 @@ combN :: CombN combN = CombN { rate = S.AR,- in = 0.0,+ input = 0.0, maxdelaytime = 0.2, delaytime = 0.2, decaytime = 1.0
Sound/SC3/UGen/Record/Compander.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Compander = Compander {- in :: S.UGen,+ input :: S.UGen, control :: S.UGen, thresh :: S.UGen, slopeBelow :: S.UGen,@@ -13,7 +13,7 @@ } deriving (Show) compander :: Compander compander = Compander {- in = 0.0,+ input = 0.0, control = 0.0, thresh = 0.5, slopeBelow = 1.0,
Sound/SC3/UGen/Record/CompanderD.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data CompanderD = CompanderD {- in :: S.UGen,+ input :: S.UGen, thresh :: S.UGen, slopeBelow :: S.UGen, slopeAbove :: S.UGen,@@ -12,7 +12,7 @@ } deriving (Show) companderD :: CompanderD companderD = CompanderD {- in = 0.0,+ input = 0.0, thresh = 0.5, slopeBelow = 1.0, slopeAbove = 1.0,
Sound/SC3/UGen/Record/Convolution.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Convolution = Convolution {- in :: S.UGen,+ input :: S.UGen, kernel :: S.UGen, framesize :: S.UGen } deriving (Show) convolution :: Convolution convolution = Convolution {- in = 0.0,+ input = 0.0, kernel = 0.0, framesize = 512.0 }
Sound/SC3/UGen/Record/Convolution2.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Convolution2 = Convolution2 {- in :: S.UGen,+ input :: S.UGen, kernel :: S.UGen, trigger :: S.UGen, framesize :: S.UGen } deriving (Show) convolution2 :: Convolution2 convolution2 = Convolution2 {- in = 0.0,+ input = 0.0, kernel = 0.0, trigger = 0.0, framesize = 2048.0
Sound/SC3/UGen/Record/Convolution2L.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Convolution2L = Convolution2L {- in :: S.UGen,+ input :: S.UGen, kernel :: S.UGen, trigger :: S.UGen, framesize :: S.UGen,@@ -11,7 +11,7 @@ } deriving (Show) convolution2L :: Convolution2L convolution2L = Convolution2L {- in = 0.0,+ input = 0.0, kernel = 0.0, trigger = 0.0, framesize = 2048.0,
Sound/SC3/UGen/Record/Convolution3.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data Convolution3 = Convolution3 { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, kernel :: S.UGen, trigger :: S.UGen, framesize :: S.UGen@@ -12,7 +12,7 @@ convolution3 :: Convolution3 convolution3 = Convolution3 { rate = S.AR,- in = 0.0,+ input = 0.0, kernel = 0.0, trigger = 0.0, framesize = 2048.0
Sound/SC3/UGen/Record/Coyote.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Coyote = Coyote {- in :: S.UGen,+ input :: S.UGen, trackFall :: S.UGen, slowLag :: S.UGen, fastLag :: S.UGen,@@ -13,7 +13,7 @@ } deriving (Show) coyote :: Coyote coyote = Coyote {- in = 0.0,+ input = 0.0, trackFall = 0.2, slowLag = 0.2, fastLag = 0.01,
Sound/SC3/UGen/Record/Crest.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Crest = Crest {- in :: S.UGen,+ input :: S.UGen, numsamps :: S.UGen, gate :: S.UGen } deriving (Show) crest :: Crest crest = Crest {- in = 0.0,+ input = 0.0, numsamps = 400.0, gate = 1.0 }
Sound/SC3/UGen/Record/CrossoverDistortion.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data CrossoverDistortion = CrossoverDistortion {- in :: S.UGen,+ input :: S.UGen, amp :: S.UGen, smooth :: S.UGen } deriving (Show) crossoverDistortion :: CrossoverDistortion crossoverDistortion = CrossoverDistortion {- in = 0.0,+ input = 0.0, amp = 0.5, smooth = 0.5 }
Sound/SC3/UGen/Record/DC.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data DC = DC { rate :: S.Rate,- in :: S.UGen+ input :: S.UGen } deriving (Show)-dC :: DC-dC = DC {+dc :: DC+dc = DC { rate = S.AR,- in = 0.0+ input = 0.0 } mkDC :: DC -> S.UGen mkDC (DC r a') = S.mkOsc r "DC" [a'] 1
Sound/SC3/UGen/Record/DFM1.hs view
@@ -3,20 +3,20 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data DFM1 = DFM1 {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, res :: S.UGen, inputgain :: S.UGen,- type :: S.UGen,+ type_ :: S.UGen, noiselevel :: S.UGen } deriving (Show) dFM1 :: DFM1 dFM1 = DFM1 {- in = 0.0,+ input = 0.0, freq = 1000.0, res = 0.1, inputgain = 1.0,- type = 0.0,+ type_ = 0.0, noiselevel = 0.0003 } mkDFM1 :: DFM1 -> S.UGen
Sound/SC3/UGen/Record/Dbrown.hs view
@@ -6,14 +6,14 @@ lo :: S.UGen, hi :: S.UGen, step :: S.UGen,- length :: S.UGen+ length_ :: S.UGen } deriving (Show) dbrown :: Dbrown dbrown = Dbrown { lo = 0.0, hi = 1.0, step = 0.01,- length = 100000000.0+ length_ = 100000000.0 } mkDbrown :: Dbrown -> S.UGen mkDbrown (Dbrown a' b' c' d') = S.mkOsc S.DR "Dbrown" [a',b',c',d'] 1
Sound/SC3/UGen/Record/Dbrown2.hs view
@@ -7,7 +7,7 @@ hi :: S.UGen, step :: S.UGen, dist :: S.UGen,- length :: S.UGen+ length_ :: S.UGen } deriving (Show) dbrown2 :: Dbrown2 dbrown2 = Dbrown2 {@@ -15,7 +15,7 @@ hi = 0.0, step = 0.0, dist = 0.0,- length = 100000000.0+ length_ = 100000000.0 } mkDbrown2 :: Dbrown2 -> S.UGen mkDbrown2 (Dbrown2 a' b' c' d' e') = S.mkOsc S.DR "Dbrown2" [a',b',c',d',e'] 1
Sound/SC3/UGen/Record/Decay.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data Decay = Decay { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, decayTime :: S.UGen } deriving (Show) decay :: Decay decay = Decay { rate = S.AR,- in = 0.0,+ input = 0.0, decayTime = 1.0 } mkDecay :: Decay -> S.UGen
Sound/SC3/UGen/Record/Decay2.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data Decay2 = Decay2 { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, attackTime :: S.UGen, decayTime :: S.UGen } deriving (Show) decay2 :: Decay2 decay2 = Decay2 { rate = S.AR,- in = 0.0,+ input = 0.0, attackTime = 0.01, decayTime = 1.0 }
Sound/SC3/UGen/Record/Decimator.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Decimator = Decimator {- in :: S.UGen,- rate :: S.UGen,+ input :: S.UGen,+ rate_ :: S.UGen, bits :: S.UGen } deriving (Show) decimator :: Decimator decimator = Decimator {- in = 0.0,- rate = 44100.0,+ input = 0.0,+ rate_ = 44100.0, bits = 24.0 } mkDecimator :: Decimator -> S.UGen
Sound/SC3/UGen/Record/DegreeToKey.hs view
@@ -5,14 +5,14 @@ data DegreeToKey = DegreeToKey { rate :: S.Rate, bufnum :: S.UGen,- in :: S.UGen,+ input :: S.UGen, octave :: S.UGen } deriving (Show) degreeToKey :: DegreeToKey degreeToKey = DegreeToKey { rate = S.AR, bufnum = 0.0,- in = 0.0,+ input = 0.0, octave = 12.0 } mkDegreeToKey :: DegreeToKey -> S.UGen
Sound/SC3/UGen/Record/DelTapWr.hs view
@@ -5,13 +5,13 @@ data DelTapWr = DelTapWr { rate :: S.Rate, buffer :: S.UGen,- in :: S.UGen+ input :: S.UGen } deriving (Show) delTapWr :: DelTapWr delTapWr = DelTapWr { rate = S.AR, buffer = 0.0,- in = 0.0+ input = 0.0 } mkDelTapWr :: DelTapWr -> S.UGen mkDelTapWr (DelTapWr r a' b') = S.mkOsc r "DelTapWr" [a',b'] 1
Sound/SC3/UGen/Record/Delay1.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data Delay1 = Delay1 { rate :: S.Rate,- in :: S.UGen+ input :: S.UGen } deriving (Show) delay1 :: Delay1 delay1 = Delay1 { rate = S.AR,- in = 0.0+ input = 0.0 } mkDelay1 :: Delay1 -> S.UGen mkDelay1 (Delay1 r a') = S.mkOsc r "Delay1" [a'] 1
Sound/SC3/UGen/Record/Delay2.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data Delay2 = Delay2 { rate :: S.Rate,- in :: S.UGen+ input :: S.UGen } deriving (Show) delay2 :: Delay2 delay2 = Delay2 { rate = S.AR,- in = 0.0+ input = 0.0 } mkDelay2 :: Delay2 -> S.UGen mkDelay2 (Delay2 r a') = S.mkOsc r "Delay2" [a'] 1
Sound/SC3/UGen/Record/DelayC.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data DelayC = DelayC { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, maxdelaytime :: S.UGen, delaytime :: S.UGen } deriving (Show) delayC :: DelayC delayC = DelayC { rate = S.AR,- in = 0.0,+ input = 0.0, maxdelaytime = 0.2, delaytime = 0.2 }
Sound/SC3/UGen/Record/DelayL.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data DelayL = DelayL { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, maxdelaytime :: S.UGen, delaytime :: S.UGen } deriving (Show) delayL :: DelayL delayL = DelayL { rate = S.AR,- in = 0.0,+ input = 0.0, maxdelaytime = 0.2, delaytime = 0.2 }
Sound/SC3/UGen/Record/DelayN.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data DelayN = DelayN { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, maxdelaytime :: S.UGen, delaytime :: S.UGen } deriving (Show) delayN :: DelayN delayN = DelayN { rate = S.AR,- in = 0.0,+ input = 0.0, maxdelaytime = 0.2, delaytime = 0.2 }
Sound/SC3/UGen/Record/DetectIndex.hs view
@@ -5,13 +5,13 @@ data DetectIndex = DetectIndex { rate :: S.Rate, bufnum :: S.UGen,- in :: S.UGen+ input :: S.UGen } deriving (Show) detectIndex :: DetectIndex detectIndex = DetectIndex { rate = S.AR, bufnum = 0.0,- in = 0.0+ input = 0.0 } mkDetectIndex :: DetectIndex -> S.UGen mkDetectIndex (DetectIndex r a' b') = S.mkOsc r "DetectIndex" [a',b'] 1
Sound/SC3/UGen/Record/DetectSilence.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data DetectSilence = DetectSilence { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, amp :: S.UGen, time :: S.UGen, doneAction :: S.UGen@@ -12,7 +12,7 @@ detectSilence :: DetectSilence detectSilence = DetectSilence { rate = S.AR,- in = 0.0,+ input = 0.0, amp = 0.0001, time = 0.1, doneAction = 0.0
Sound/SC3/UGen/Record/Dgauss.hs view
@@ -5,13 +5,13 @@ data Dgauss = Dgauss { lo :: S.UGen, hi :: S.UGen,- length :: S.UGen+ length_ :: S.UGen } deriving (Show) dgauss :: Dgauss dgauss = Dgauss { lo = 0.0, hi = 0.0,- length = 100000000.0+ length_ = 100000000.0 } mkDgauss :: Dgauss -> S.UGen mkDgauss (Dgauss a' b' c') = S.mkOsc S.DR "Dgauss" [a',b',c'] 1
Sound/SC3/UGen/Record/Dgeom.hs view
@@ -5,13 +5,13 @@ data Dgeom = Dgeom { start :: S.UGen, grow :: S.UGen,- length :: S.UGen+ length_ :: S.UGen } deriving (Show) dgeom :: Dgeom dgeom = Dgeom { start = 1.0, grow = 2.0,- length = 100000000.0+ length_ = 100000000.0 } mkDgeom :: Dgeom -> S.UGen mkDgeom (Dgeom a' b' c') = S.mkOsc S.DR "Dgeom" [a',b',c'] 1
Sound/SC3/UGen/Record/Dibrown.hs view
@@ -6,14 +6,14 @@ lo :: S.UGen, hi :: S.UGen, step :: S.UGen,- length :: S.UGen+ length_ :: S.UGen } deriving (Show) dibrown :: Dibrown dibrown = Dibrown { lo = 0.0, hi = 1.0, step = 0.01,- length = 100000000.0+ length_ = 100000000.0 } mkDibrown :: Dibrown -> S.UGen mkDibrown (Dibrown a' b' c' d') = S.mkOsc S.DR "Dibrown" [a',b',c',d'] 1
Sound/SC3/UGen/Record/Disintegrator.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Disintegrator = Disintegrator {- in :: S.UGen,+ input :: S.UGen, probability :: S.UGen, multiplier :: S.UGen } deriving (Show) disintegrator :: Disintegrator disintegrator = Disintegrator {- in = 0.0,+ input = 0.0, probability = 0.5, multiplier = 0.0 }
Sound/SC3/UGen/Record/DiskOut.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data DiskOut = DiskOut { bufnum :: S.UGen,- channelsArray :: S.UGen+ input :: S.UGen } deriving (Show) diskOut :: DiskOut diskOut = DiskOut { bufnum = 0.0,- channelsArray = 0.0+ input = 0.0 } mkDiskOut :: DiskOut -> S.UGen mkDiskOut (DiskOut a' b') = S.mkOsc S.AR "DiskOut" [a',b'] 1
Sound/SC3/UGen/Record/Diwhite.hs view
@@ -5,13 +5,13 @@ data Diwhite = Diwhite { lo :: S.UGen, hi :: S.UGen,- length :: S.UGen+ length_ :: S.UGen } deriving (Show) diwhite :: Diwhite diwhite = Diwhite { lo = 0.0, hi = 1.0,- length = 100000000.0+ length_ = 100000000.0 } mkDiwhite :: Diwhite -> S.UGen mkDiwhite (Diwhite a' b' c') = S.mkOsc S.DR "Diwhite" [a',b',c'] 1
Sound/SC3/UGen/Record/Donce.hs view
@@ -3,11 +3,11 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Donce = Donce {- in :: S.UGen+ input :: S.UGen } deriving (Show) donce :: Donce donce = Donce {- in = 0.0+ input = 0.0 } mkDonce :: Donce -> S.UGen mkDonce (Donce a') = S.mkOsc S.DR "Donce" [a'] 1
Sound/SC3/UGen/Record/DoubleNestedAllpassC.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data DoubleNestedAllpassC = DoubleNestedAllpassC {- in :: S.UGen,+ input :: S.UGen, maxdelay1 :: S.UGen, delay1 :: S.UGen, gain1 :: S.UGen,@@ -16,7 +16,7 @@ } deriving (Show) doubleNestedAllpassC :: DoubleNestedAllpassC doubleNestedAllpassC = DoubleNestedAllpassC {- in = 0.0,+ input = 0.0, maxdelay1 = 0.0047, delay1 = 0.0047, gain1 = 0.15,
Sound/SC3/UGen/Record/DoubleNestedAllpassL.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data DoubleNestedAllpassL = DoubleNestedAllpassL {- in :: S.UGen,+ input :: S.UGen, maxdelay1 :: S.UGen, delay1 :: S.UGen, gain1 :: S.UGen,@@ -16,7 +16,7 @@ } deriving (Show) doubleNestedAllpassL :: DoubleNestedAllpassL doubleNestedAllpassL = DoubleNestedAllpassL {- in = 0.0,+ input = 0.0, maxdelay1 = 0.0047, delay1 = 0.0047, gain1 = 0.15,
Sound/SC3/UGen/Record/DoubleNestedAllpassN.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data DoubleNestedAllpassN = DoubleNestedAllpassN {- in :: S.UGen,+ input :: S.UGen, maxdelay1 :: S.UGen, delay1 :: S.UGen, gain1 :: S.UGen,@@ -16,7 +16,7 @@ } deriving (Show) doubleNestedAllpassN :: DoubleNestedAllpassN doubleNestedAllpassN = DoubleNestedAllpassN {- in = 0.0,+ input = 0.0, maxdelay1 = 0.0047, delay1 = 0.0047, gain1 = 0.15,
Sound/SC3/UGen/Record/DoubleWell3.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data DoubleWell3 = DoubleWell3 { reset :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, f :: S.UGen, delta :: S.UGen, initx :: S.UGen,@@ -13,7 +13,7 @@ doubleWell3 :: DoubleWell3 doubleWell3 = DoubleWell3 { reset = 0.0,- rate = 0.01,+ rate_ = 0.01, f = 0.0, delta = 0.25, initx = 0.0,
Sound/SC3/UGen/Record/Dpoll.hs view
@@ -3,15 +3,15 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Dpoll = Dpoll {- in :: S.UGen,- label :: S.UGen,+ input :: S.UGen,+ label_ :: S.UGen, run :: S.UGen, trigid :: S.UGen } deriving (Show) dpoll :: Dpoll dpoll = Dpoll {- in = 0.0,- label = 0.0,+ input = 0.0,+ label_ = 0.0, run = 1.0, trigid = -1.0 }
Sound/SC3/UGen/Record/Dreset.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Dreset = Dreset {- in :: S.UGen,+ input :: S.UGen, reset :: S.UGen } deriving (Show) dreset :: Dreset dreset = Dreset {- in = 0.0,+ input = 0.0, reset = 0.0 } mkDreset :: Dreset -> S.UGen
Sound/SC3/UGen/Record/DriveNoise.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data DriveNoise = DriveNoise {- in :: S.UGen,+ input :: S.UGen, amount :: S.UGen, multi :: S.UGen } deriving (Show) driveNoise :: DriveNoise driveNoise = DriveNoise {- in = 0.0,+ input = 0.0, amount = 1.0, multi = 5.0 }
Sound/SC3/UGen/Record/Dseries.hs view
@@ -5,13 +5,13 @@ data Dseries = Dseries { start :: S.UGen, step :: S.UGen,- length :: S.UGen+ length_ :: S.UGen } deriving (Show) dseries :: Dseries dseries = Dseries { start = 1.0, step = 1.0,- length = 100000000.0+ length_ = 100000000.0 } mkDseries :: Dseries -> S.UGen mkDseries (Dseries a' b' c') = S.mkOsc S.DR "Dseries" [a',b',c'] 1
Sound/SC3/UGen/Record/Dstutter.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data Dstutter = Dstutter { n :: S.UGen,- in :: S.UGen+ input :: S.UGen } deriving (Show) dstutter :: Dstutter dstutter = Dstutter { n = 0.0,- in = 0.0+ input = 0.0 } mkDstutter :: Dstutter -> S.UGen mkDstutter (Dstutter a' b') = S.mkOsc S.DR "Dstutter" [a',b'] 1
Sound/SC3/UGen/Record/Dwhite.hs view
@@ -5,13 +5,13 @@ data Dwhite = Dwhite { lo :: S.UGen, hi :: S.UGen,- length :: S.UGen+ length_ :: S.UGen } deriving (Show) dwhite :: Dwhite dwhite = Dwhite { lo = 0.0, hi = 1.0,- length = 100000000.0+ length_ = 100000000.0 } mkDwhite :: Dwhite -> S.UGen mkDwhite (Dwhite a' b' c') = S.mkOsc S.DR "Dwhite" [a',b',c'] 1
Sound/SC3/UGen/Record/EnvDetect.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data EnvDetect = EnvDetect {- in :: S.UGen,+ input :: S.UGen, attack :: S.UGen, release :: S.UGen } deriving (Show) envDetect :: EnvDetect envDetect = EnvDetect {- in = 0.0,+ input = 0.0, attack = 100.0, release = 0.0 }
Sound/SC3/UGen/Record/FFT.hs view
@@ -4,16 +4,16 @@ import Sound.SC3.UGen.Record data FFT = FFT { buffer :: S.UGen,- in :: S.UGen,+ input :: S.UGen, hop :: S.UGen, wintype :: S.UGen, active :: S.UGen, winsize :: S.UGen } deriving (Show)-fFT :: FFT-fFT = FFT {+fft :: FFT+fft = FFT { buffer = 0.0,- in = 0.0,+ input = 0.0, hop = 0.5, wintype = 0.0, active = 1.0,
Sound/SC3/UGen/Record/FMHEncode0.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FMHEncode0 = FMHEncode0 {- in :: S.UGen,+ input :: S.UGen, azimuth :: S.UGen, elevation :: S.UGen, gain :: S.UGen } deriving (Show) fMHEncode0 :: FMHEncode0 fMHEncode0 = FMHEncode0 {- in = 0.0,+ input = 0.0, azimuth = 0.0, elevation = 0.0, gain = 1.0
Sound/SC3/UGen/Record/FMHEncode1.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FMHEncode1 = FMHEncode1 {- in :: S.UGen,+ input :: S.UGen, azimuth :: S.UGen, elevation :: S.UGen, rho :: S.UGen,@@ -12,7 +12,7 @@ } deriving (Show) fMHEncode1 :: FMHEncode1 fMHEncode1 = FMHEncode1 {- in = 0.0,+ input = 0.0, azimuth = 0.0, elevation = 0.0, rho = 1.0,
Sound/SC3/UGen/Record/FMHEncode2.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FMHEncode2 = FMHEncode2 {- in :: S.UGen,+ input :: S.UGen, point_x :: S.UGen, point_y :: S.UGen, elevation :: S.UGen,@@ -12,7 +12,7 @@ } deriving (Show) fMHEncode2 :: FMHEncode2 fMHEncode2 = FMHEncode2 {- in = 0.0,+ input = 0.0, point_x = 0.0, point_y = 0.0, elevation = 0.0,
Sound/SC3/UGen/Record/FOS.hs view
@@ -4,15 +4,15 @@ import Sound.SC3.UGen.Record data FOS = FOS { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, a0 :: S.UGen, a1 :: S.UGen, b1 :: S.UGen } deriving (Show)-fOS :: FOS-fOS = FOS {+fos :: FOS+fos = FOS { rate = S.AR,- in = 0.0,+ input = 0.0, a0 = 0.0, a1 = 0.0, b1 = 0.0
Sound/SC3/UGen/Record/FoaAsymmetry.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaAsymmetry = FoaAsymmetry {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaAsymmetry :: FoaAsymmetry foaAsymmetry = FoaAsymmetry {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaAsymmetry :: FoaAsymmetry -> S.UGen
Sound/SC3/UGen/Record/FoaDirectO.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaDirectO = FoaDirectO {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaDirectO :: FoaDirectO foaDirectO = FoaDirectO {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaDirectO :: FoaDirectO -> S.UGen
Sound/SC3/UGen/Record/FoaDirectX.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaDirectX = FoaDirectX {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaDirectX :: FoaDirectX foaDirectX = FoaDirectX {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaDirectX :: FoaDirectX -> S.UGen
Sound/SC3/UGen/Record/FoaDirectY.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaDirectY = FoaDirectY {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaDirectY :: FoaDirectY foaDirectY = FoaDirectY {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaDirectY :: FoaDirectY -> S.UGen
Sound/SC3/UGen/Record/FoaDirectZ.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaDirectZ = FoaDirectZ {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaDirectZ :: FoaDirectZ foaDirectZ = FoaDirectZ {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaDirectZ :: FoaDirectZ -> S.UGen
Sound/SC3/UGen/Record/FoaDominateX.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaDominateX = FoaDominateX {- in :: S.UGen,+ input :: S.UGen, gain :: S.UGen } deriving (Show) foaDominateX :: FoaDominateX foaDominateX = FoaDominateX {- in = 0.0,+ input = 0.0, gain = 0.0 } mkFoaDominateX :: FoaDominateX -> S.UGen
Sound/SC3/UGen/Record/FoaDominateY.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaDominateY = FoaDominateY {- in :: S.UGen,+ input :: S.UGen, gain :: S.UGen } deriving (Show) foaDominateY :: FoaDominateY foaDominateY = FoaDominateY {- in = 0.0,+ input = 0.0, gain = 0.0 } mkFoaDominateY :: FoaDominateY -> S.UGen
Sound/SC3/UGen/Record/FoaDominateZ.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaDominateZ = FoaDominateZ {- in :: S.UGen,+ input :: S.UGen, gain :: S.UGen } deriving (Show) foaDominateZ :: FoaDominateZ foaDominateZ = FoaDominateZ {- in = 0.0,+ input = 0.0, gain = 0.0 } mkFoaDominateZ :: FoaDominateZ -> S.UGen
Sound/SC3/UGen/Record/FoaFocusX.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaFocusX = FoaFocusX {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaFocusX :: FoaFocusX foaFocusX = FoaFocusX {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaFocusX :: FoaFocusX -> S.UGen
Sound/SC3/UGen/Record/FoaFocusY.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaFocusY = FoaFocusY {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaFocusY :: FoaFocusY foaFocusY = FoaFocusY {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaFocusY :: FoaFocusY -> S.UGen
Sound/SC3/UGen/Record/FoaFocusZ.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaFocusZ = FoaFocusZ {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaFocusZ :: FoaFocusZ foaFocusZ = FoaFocusZ {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaFocusZ :: FoaFocusZ -> S.UGen
Sound/SC3/UGen/Record/FoaNFC.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaNFC = FoaNFC {- in :: S.UGen,+ input :: S.UGen, distance :: S.UGen } deriving (Show) foaNFC :: FoaNFC foaNFC = FoaNFC {- in = 0.0,+ input = 0.0, distance = 1.0 } mkFoaNFC :: FoaNFC -> S.UGen
Sound/SC3/UGen/Record/FoaPanB.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaPanB = FoaPanB {- in :: S.UGen,+ input :: S.UGen, azimuth :: S.UGen, elevation :: S.UGen } deriving (Show) foaPanB :: FoaPanB foaPanB = FoaPanB {- in = 0.0,+ input = 0.0, azimuth = 0.0, elevation = 0.0 }
Sound/SC3/UGen/Record/FoaPressX.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaPressX = FoaPressX {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaPressX :: FoaPressX foaPressX = FoaPressX {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaPressX :: FoaPressX -> S.UGen
Sound/SC3/UGen/Record/FoaPressY.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaPressY = FoaPressY {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaPressY :: FoaPressY foaPressY = FoaPressY {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaPressY :: FoaPressY -> S.UGen
Sound/SC3/UGen/Record/FoaPressZ.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaPressZ = FoaPressZ {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaPressZ :: FoaPressZ foaPressZ = FoaPressZ {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaPressZ :: FoaPressZ -> S.UGen
Sound/SC3/UGen/Record/FoaProximity.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaProximity = FoaProximity {- in :: S.UGen,+ input :: S.UGen, distance :: S.UGen } deriving (Show) foaProximity :: FoaProximity foaProximity = FoaProximity {- in = 0.0,+ input = 0.0, distance = 1.0 } mkFoaProximity :: FoaProximity -> S.UGen
Sound/SC3/UGen/Record/FoaPsychoShelf.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaPsychoShelf = FoaPsychoShelf {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, k0 :: S.UGen, k1 :: S.UGen } deriving (Show) foaPsychoShelf :: FoaPsychoShelf foaPsychoShelf = FoaPsychoShelf {- in = 0.0,+ input = 0.0, freq = 400.0, k0 = 0.0, k1 = 0.0
Sound/SC3/UGen/Record/FoaPushX.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaPushX = FoaPushX {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaPushX :: FoaPushX foaPushX = FoaPushX {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaPushX :: FoaPushX -> S.UGen
Sound/SC3/UGen/Record/FoaPushY.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaPushY = FoaPushY {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaPushY :: FoaPushY foaPushY = FoaPushY {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaPushY :: FoaPushY -> S.UGen
Sound/SC3/UGen/Record/FoaPushZ.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaPushZ = FoaPushZ {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaPushZ :: FoaPushZ foaPushZ = FoaPushZ {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaPushZ :: FoaPushZ -> S.UGen
Sound/SC3/UGen/Record/FoaRotate.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaRotate = FoaRotate {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaRotate :: FoaRotate foaRotate = FoaRotate {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaRotate :: FoaRotate -> S.UGen
Sound/SC3/UGen/Record/FoaTilt.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaTilt = FoaTilt {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaTilt :: FoaTilt foaTilt = FoaTilt {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaTilt :: FoaTilt -> S.UGen
Sound/SC3/UGen/Record/FoaTumble.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaTumble = FoaTumble {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaTumble :: FoaTumble foaTumble = FoaTumble {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaTumble :: FoaTumble -> S.UGen
Sound/SC3/UGen/Record/FoaZoomX.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaZoomX = FoaZoomX {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaZoomX :: FoaZoomX foaZoomX = FoaZoomX {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaZoomX :: FoaZoomX -> S.UGen
Sound/SC3/UGen/Record/FoaZoomY.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaZoomY = FoaZoomY {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaZoomY :: FoaZoomY foaZoomY = FoaZoomY {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaZoomY :: FoaZoomY -> S.UGen
Sound/SC3/UGen/Record/FoaZoomZ.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FoaZoomZ = FoaZoomZ {- in :: S.UGen,+ input :: S.UGen, angle :: S.UGen } deriving (Show) foaZoomZ :: FoaZoomZ foaZoomZ = FoaZoomZ {- in = 0.0,+ input = 0.0, angle = 0.0 } mkFoaZoomZ :: FoaZoomZ -> S.UGen
Sound/SC3/UGen/Record/Fold.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data Fold = Fold { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, lo :: S.UGen, hi :: S.UGen } deriving (Show) fold :: Fold fold = Fold { rate = S.AR,- in = 0.0,+ input = 0.0, lo = 0.0, hi = 1.0 }
Sound/SC3/UGen/Record/Formlet.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data Formlet = Formlet { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, attacktime :: S.UGen, decaytime :: S.UGen@@ -12,7 +12,7 @@ formlet :: Formlet formlet = Formlet { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0, attacktime = 1.0, decaytime = 1.0
Sound/SC3/UGen/Record/Free.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data Free = Free { trig :: S.UGen,- id :: S.UGen+ id_ :: S.UGen } deriving (Show) free :: Free free = Free { trig = 0.0,- id = 0.0+ id_ = 0.0 } mkFree :: Free -> S.UGen mkFree (Free a' b') = S.mkOsc S.KR "Free" [a',b'] 1
Sound/SC3/UGen/Record/FreeSelf.hs view
@@ -3,11 +3,11 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FreeSelf = FreeSelf {- in :: S.UGen+ input :: S.UGen } deriving (Show) freeSelf :: FreeSelf freeSelf = FreeSelf {- in = 0.0+ input = 0.0 } mkFreeSelf :: FreeSelf -> S.UGen mkFreeSelf (FreeSelf a') = S.mkOsc S.KR "FreeSelf" [a'] 1
Sound/SC3/UGen/Record/FreeVerb.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FreeVerb = FreeVerb {- in :: S.UGen,+ input :: S.UGen, mix :: S.UGen, room :: S.UGen, damp :: S.UGen } deriving (Show) freeVerb :: FreeVerb freeVerb = FreeVerb {- in = 0.0,+ input = 0.0, mix = 0.33, room = 0.5, damp = 0.5
Sound/SC3/UGen/Record/FreeVerb2.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FreeVerb2 = FreeVerb2 {- in :: S.UGen,+ input :: S.UGen, in2 :: S.UGen, mix :: S.UGen, room :: S.UGen,@@ -11,7 +11,7 @@ } deriving (Show) freeVerb2 :: FreeVerb2 freeVerb2 = FreeVerb2 {- in = 0.0,+ input = 0.0, in2 = 0.0, mix = 0.33, room = 0.5,
Sound/SC3/UGen/Record/FreqShift.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data FreqShift = FreqShift {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, phase :: S.UGen } deriving (Show) freqShift :: FreqShift freqShift = FreqShift {- in = 0.0,+ input = 0.0, freq = 0.0, phase = 0.0 }
Sound/SC3/UGen/Record/Friction.hs view
@@ -4,8 +4,8 @@ import Sound.SC3.UGen.Record data Friction = Friction { rate :: S.Rate,- in :: S.UGen,- friction :: S.UGen,+ input :: S.UGen,+ friction_ :: S.UGen, spring :: S.UGen, damp :: S.UGen, mass :: S.UGen,@@ -14,8 +14,8 @@ friction :: Friction friction = Friction { rate = S.AR,- in = 0.0,- friction = 0.5,+ input = 0.0,+ friction_ = 0.5, spring = 0.414, damp = 0.313, mass = 0.1,
Sound/SC3/UGen/Record/GVerb.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data GVerb = GVerb {- in :: S.UGen,+ input :: S.UGen, roomsize :: S.UGen, revtime :: S.UGen, damping :: S.UGen,@@ -16,7 +16,7 @@ } deriving (Show) gVerb :: GVerb gVerb = GVerb {- in = 0.0,+ input = 0.0, roomsize = 10.0, revtime = 3.0, damping = 0.5,
Sound/SC3/UGen/Record/Gate.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data Gate = Gate { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, trig :: S.UGen } deriving (Show) gate :: Gate gate = Gate { rate = S.AR,- in = 0.0,+ input = 0.0, trig = 0.0 } mkGate :: Gate -> S.UGen
Sound/SC3/UGen/Record/GaussClass.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data GaussClass = GaussClass {- in :: S.UGen,+ input :: S.UGen, bufnum :: S.UGen, gate :: S.UGen } deriving (Show) gaussClass :: GaussClass gaussClass = GaussClass {- in = 0.0,+ input = 0.0, bufnum = 0.0, gate = 0.0 }
Sound/SC3/UGen/Record/GlitchBPF.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data GlitchBPF = GlitchBPF { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen } deriving (Show) glitchBPF :: GlitchBPF glitchBPF = GlitchBPF { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0, rq = 1.0 }
Sound/SC3/UGen/Record/GlitchBRF.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data GlitchBRF = GlitchBRF { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen } deriving (Show) glitchBRF :: GlitchBRF glitchBRF = GlitchBRF { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0, rq = 1.0 }
Sound/SC3/UGen/Record/GlitchHPF.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data GlitchHPF = GlitchHPF { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen } deriving (Show) glitchHPF :: GlitchHPF glitchHPF = GlitchHPF { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0 } mkGlitchHPF :: GlitchHPF -> S.UGen
Sound/SC3/UGen/Record/GlitchRHPF.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data GlitchRHPF = GlitchRHPF { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen } deriving (Show) glitchRHPF :: GlitchRHPF glitchRHPF = GlitchRHPF { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0, rq = 1.0 }
Sound/SC3/UGen/Record/Goertzel.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Goertzel = Goertzel {- in :: S.UGen,+ input :: S.UGen, bufsize :: S.UGen, freq :: S.UGen, hop :: S.UGen } deriving (Show) goertzel :: Goertzel goertzel = Goertzel {- in = 0.0,+ input = 0.0, bufsize = 1024.0, freq = 0.0, hop = 1.0
Sound/SC3/UGen/Record/GrainBuf.hs view
@@ -6,7 +6,7 @@ trigger :: S.UGen, dur :: S.UGen, sndbuf :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, pos :: S.UGen, interp :: S.UGen, pan :: S.UGen,@@ -18,7 +18,7 @@ trigger = 0.0, dur = 1.0, sndbuf = 0.0,- rate = 1.0,+ rate_ = 1.0, pos = 0.0, interp = 2.0, pan = 0.0,
Sound/SC3/UGen/Record/GrainIn.hs view
@@ -5,7 +5,7 @@ data GrainIn = GrainIn { trigger :: S.UGen, dur :: S.UGen,- in :: S.UGen,+ input :: S.UGen, pan :: S.UGen, envbufnum :: S.UGen, maxGrains :: S.UGen@@ -14,7 +14,7 @@ grainIn = GrainIn { trigger = 0.0, dur = 1.0,- in = 0.0,+ input = 0.0, pan = 0.0, envbufnum = -1.0, maxGrains = 512.0
Sound/SC3/UGen/Record/GravityGrid.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data GravityGrid = GravityGrid { reset :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, newx :: S.UGen, newy :: S.UGen, bufnum :: S.UGen@@ -12,7 +12,7 @@ gravityGrid :: GravityGrid gravityGrid = GravityGrid { reset = 0.0,- rate = 0.1,+ rate_ = 0.1, newx = 0.0, newy = 0.0, bufnum = 0.0
Sound/SC3/UGen/Record/GravityGrid2.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data GravityGrid2 = GravityGrid2 { reset :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, newx :: S.UGen, newy :: S.UGen, bufnum :: S.UGen@@ -12,7 +12,7 @@ gravityGrid2 :: GravityGrid2 gravityGrid2 = GravityGrid2 { reset = 0.0,- rate = 0.1,+ rate_ = 0.1, newx = 0.0, newy = 0.0, bufnum = 0.0
Sound/SC3/UGen/Record/HPF.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data HPF = HPF { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen } deriving (Show)-hPF :: HPF-hPF = HPF {+hpf :: HPF+hpf = HPF { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0 } mkHPF :: HPF -> S.UGen
Sound/SC3/UGen/Record/HPZ1.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data HPZ1 = HPZ1 { rate :: S.Rate,- in :: S.UGen+ input :: S.UGen } deriving (Show) hPZ1 :: HPZ1 hPZ1 = HPZ1 { rate = S.AR,- in = 0.0+ input = 0.0 } mkHPZ1 :: HPZ1 -> S.UGen mkHPZ1 (HPZ1 r a') = S.mkOsc r "HPZ1" [a'] 1
Sound/SC3/UGen/Record/HPZ2.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data HPZ2 = HPZ2 { rate :: S.Rate,- in :: S.UGen+ input :: S.UGen } deriving (Show) hPZ2 :: HPZ2 hPZ2 = HPZ2 { rate = S.AR,- in = 0.0+ input = 0.0 } mkHPZ2 :: HPZ2 -> S.UGen mkHPZ2 (HPZ2 r a') = S.mkOsc r "HPZ2" [a'] 1
Sound/SC3/UGen/Record/Hasher.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data Hasher = Hasher { rate :: S.Rate,- in :: S.UGen+ input :: S.UGen } deriving (Show) hasher :: Hasher hasher = Hasher { rate = S.AR,- in = 0.0+ input = 0.0 } mkHasher :: Hasher -> S.UGen mkHasher (Hasher r a') = S.mkOsc r "Hasher" [a'] 1
Sound/SC3/UGen/Record/Hilbert.hs view
@@ -3,11 +3,11 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Hilbert = Hilbert {- in :: S.UGen+ input :: S.UGen } deriving (Show) hilbert :: Hilbert hilbert = Hilbert {- in = 0.0+ input = 0.0 } mkHilbert :: Hilbert -> S.UGen mkHilbert (Hilbert a') = S.mkOsc S.AR "Hilbert" [a'] 2
Sound/SC3/UGen/Record/HilbertFIR.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data HilbertFIR = HilbertFIR {- in :: S.UGen,+ input :: S.UGen, buffer :: S.UGen } deriving (Show) hilbertFIR :: HilbertFIR hilbertFIR = HilbertFIR {- in = 0.0,+ input = 0.0, buffer = 0.0 } mkHilbertFIR :: HilbertFIR -> S.UGen
Sound/SC3/UGen/Record/IIRFilter.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data IIRFilter = IIRFilter {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen } deriving (Show) iIRFilter :: IIRFilter iIRFilter = IIRFilter {- in = 0.0,+ input = 0.0, freq = 440.0, rq = 1.0 }
Sound/SC3/UGen/Record/InGrain.hs view
@@ -5,13 +5,13 @@ data InGrain = InGrain { trigger :: S.UGen, dur :: S.UGen,- in :: S.UGen+ input :: S.UGen } deriving (Show) inGrain :: InGrain inGrain = InGrain { trigger = 0.0, dur = 1.0,- in = 0.0+ input = 0.0 } mkInGrain :: InGrain -> S.UGen mkInGrain (InGrain a' b' c') = S.mkOsc S.AR "InGrain" [a',b',c'] 1
Sound/SC3/UGen/Record/InGrainB.hs view
@@ -5,14 +5,14 @@ data InGrainB = InGrainB { trigger :: S.UGen, dur :: S.UGen,- in :: S.UGen,+ input :: S.UGen, envbuf :: S.UGen } deriving (Show) inGrainB :: InGrainB inGrainB = InGrainB { trigger = 0.0, dur = 1.0,- in = 0.0,+ input = 0.0, envbuf = 0.0 } mkInGrainB :: InGrainB -> S.UGen
Sound/SC3/UGen/Record/InGrainBBF.hs view
@@ -5,7 +5,7 @@ data InGrainBBF = InGrainBBF { trigger :: S.UGen, dur :: S.UGen,- in :: S.UGen,+ input :: S.UGen, envbuf :: S.UGen, azimuth :: S.UGen, elevation :: S.UGen,@@ -16,7 +16,7 @@ inGrainBBF = InGrainBBF { trigger = 0.0, dur = 1.0,- in = 0.0,+ input = 0.0, envbuf = 0.0, azimuth = 0.0, elevation = 0.0,
Sound/SC3/UGen/Record/InGrainBF.hs view
@@ -5,7 +5,7 @@ data InGrainBF = InGrainBF { trigger :: S.UGen, dur :: S.UGen,- in :: S.UGen,+ input :: S.UGen, azimuth :: S.UGen, elevation :: S.UGen, rho :: S.UGen,@@ -15,7 +15,7 @@ inGrainBF = InGrainBF { trigger = 0.0, dur = 1.0,- in = 0.0,+ input = 0.0, azimuth = 0.0, elevation = 0.0, rho = 1.0,
Sound/SC3/UGen/Record/InGrainI.hs view
@@ -5,7 +5,7 @@ data InGrainI = InGrainI { trigger :: S.UGen, dur :: S.UGen,- in :: S.UGen,+ input :: S.UGen, envbuf1 :: S.UGen, envbuf2 :: S.UGen, ifac :: S.UGen@@ -14,7 +14,7 @@ inGrainI = InGrainI { trigger = 0.0, dur = 1.0,- in = 0.0,+ input = 0.0, envbuf1 = 0.0, envbuf2 = 0.0, ifac = 0.5
Sound/SC3/UGen/Record/InGrainIBF.hs view
@@ -5,7 +5,7 @@ data InGrainIBF = InGrainIBF { trigger :: S.UGen, dur :: S.UGen,- in :: S.UGen,+ input :: S.UGen, envbuf1 :: S.UGen, envbuf2 :: S.UGen, ifac :: S.UGen,@@ -18,7 +18,7 @@ inGrainIBF = InGrainIBF { trigger = 0.0, dur = 1.0,- in = 0.0,+ input = 0.0, envbuf1 = 0.0, envbuf2 = 0.0, ifac = 0.5,
Sound/SC3/UGen/Record/InRange.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data InRange = InRange { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, lo :: S.UGen, hi :: S.UGen } deriving (Show) inRange :: InRange inRange = InRange { rate = S.AR,- in = 0.0,+ input = 0.0, lo = 0.0, hi = 1.0 }
Sound/SC3/UGen/Record/Index.hs view
@@ -5,13 +5,13 @@ data Index = Index { rate :: S.Rate, bufnum :: S.UGen,- in :: S.UGen+ input :: S.UGen } deriving (Show) index :: Index index = Index { rate = S.AR, bufnum = 0.0,- in = 0.0+ input = 0.0 } mkIndex :: Index -> S.UGen mkIndex (Index r a' b') = S.mkOsc r "Index" [a',b'] 1
Sound/SC3/UGen/Record/IndexInBetween.hs view
@@ -5,13 +5,13 @@ data IndexInBetween = IndexInBetween { rate :: S.Rate, bufnum :: S.UGen,- in :: S.UGen+ input :: S.UGen } deriving (Show) indexInBetween :: IndexInBetween indexInBetween = IndexInBetween { rate = S.AR, bufnum = 0.0,- in = 0.0+ input = 0.0 } mkIndexInBetween :: IndexInBetween -> S.UGen mkIndexInBetween (IndexInBetween r a' b') = S.mkOsc r "IndexInBetween" [a',b'] 1
Sound/SC3/UGen/Record/IndexL.hs view
@@ -5,13 +5,13 @@ data IndexL = IndexL { rate :: S.Rate, bufnum :: S.UGen,- in :: S.UGen+ input :: S.UGen } deriving (Show) indexL :: IndexL indexL = IndexL { rate = S.AR, bufnum = 0.0,- in = 0.0+ input = 0.0 } mkIndexL :: IndexL -> S.UGen mkIndexL (IndexL r a' b') = S.mkOsc r "IndexL" [a',b'] 1
Sound/SC3/UGen/Record/InsideOut.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data InsideOut = InsideOut { rate :: S.Rate,- in :: S.UGen+ input :: S.UGen } deriving (Show) insideOut :: InsideOut insideOut = InsideOut { rate = S.AR,- in = 0.0+ input = 0.0 } mkInsideOut :: InsideOut -> S.UGen mkInsideOut (InsideOut r a') = S.mkOsc r "InsideOut" [a'] 1
Sound/SC3/UGen/Record/Integrator.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data Integrator = Integrator { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, coef :: S.UGen } deriving (Show) integrator :: Integrator integrator = Integrator { rate = S.AR,- in = 0.0,+ input = 0.0, coef = 1.0 } mkIntegrator :: Integrator -> S.UGen
Sound/SC3/UGen/Record/K2A.hs view
@@ -3,11 +3,11 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data K2A = K2A {- in :: S.UGen+ input :: S.UGen } deriving (Show) k2A :: K2A k2A = K2A {- in = 0.0+ input = 0.0 } mkK2A :: K2A -> S.UGen mkK2A (K2A a') = S.mkOsc S.AR "K2A" [a'] 1
Sound/SC3/UGen/Record/LFBrownNoise0.hs view
@@ -8,8 +8,8 @@ dev :: S.UGen, dist :: S.UGen } deriving (Show)-lFBrownNoise0 :: LFBrownNoise0-lFBrownNoise0 = LFBrownNoise0 {+lfBrownNoise0 :: LFBrownNoise0+lfBrownNoise0 = LFBrownNoise0 { rate = S.AR, freq = 20.0, dev = 1.0,
Sound/SC3/UGen/Record/LFBrownNoise1.hs view
@@ -8,8 +8,8 @@ dev :: S.UGen, dist :: S.UGen } deriving (Show)-lFBrownNoise1 :: LFBrownNoise1-lFBrownNoise1 = LFBrownNoise1 {+lfBrownNoise1 :: LFBrownNoise1+lfBrownNoise1 = LFBrownNoise1 { rate = S.AR, freq = 20.0, dev = 1.0,
Sound/SC3/UGen/Record/LFBrownNoise2.hs view
@@ -8,8 +8,8 @@ dev :: S.UGen, dist :: S.UGen } deriving (Show)-lFBrownNoise2 :: LFBrownNoise2-lFBrownNoise2 = LFBrownNoise2 {+lfBrownNoise2 :: LFBrownNoise2+lfBrownNoise2 = LFBrownNoise2 { rate = S.AR, freq = 20.0, dev = 1.0,
Sound/SC3/UGen/Record/LFClipNoise.hs view
@@ -6,8 +6,8 @@ rate :: S.Rate, freq :: S.UGen } deriving (Show)-lFClipNoise :: LFClipNoise-lFClipNoise = LFClipNoise {+lfClipNoise :: LFClipNoise+lfClipNoise = LFClipNoise { rate = S.AR, freq = 500.0 }
Sound/SC3/UGen/Record/LFCub.hs view
@@ -7,8 +7,8 @@ freq :: S.UGen, iphase :: S.UGen } deriving (Show)-lFCub :: LFCub-lFCub = LFCub {+lfCub :: LFCub+lfCub = LFCub { rate = S.AR, freq = 440.0, iphase = 0.0
Sound/SC3/UGen/Record/LFDClipNoise.hs view
@@ -6,8 +6,8 @@ rate :: S.Rate, freq :: S.UGen } deriving (Show)-lFDClipNoise :: LFDClipNoise-lFDClipNoise = LFDClipNoise {+lfDClipNoise :: LFDClipNoise+lfDClipNoise = LFDClipNoise { rate = S.AR, freq = 500.0 }
Sound/SC3/UGen/Record/LFDNoise0.hs view
@@ -6,8 +6,8 @@ rate :: S.Rate, freq :: S.UGen } deriving (Show)-lFDNoise0 :: LFDNoise0-lFDNoise0 = LFDNoise0 {+lfDNoise0 :: LFDNoise0+lfDNoise0 = LFDNoise0 { rate = S.AR, freq = 500.0 }
Sound/SC3/UGen/Record/LFDNoise1.hs view
@@ -6,8 +6,8 @@ rate :: S.Rate, freq :: S.UGen } deriving (Show)-lFDNoise1 :: LFDNoise1-lFDNoise1 = LFDNoise1 {+lfDNoise1 :: LFDNoise1+lfDNoise1 = LFDNoise1 { rate = S.AR, freq = 500.0 }
Sound/SC3/UGen/Record/LFDNoise3.hs view
@@ -6,8 +6,8 @@ rate :: S.Rate, freq :: S.UGen } deriving (Show)-lFDNoise3 :: LFDNoise3-lFDNoise3 = LFDNoise3 {+lfDNoise3 :: LFDNoise3+lfDNoise3 = LFDNoise3 { rate = S.AR, freq = 500.0 }
Sound/SC3/UGen/Record/LFGauss.hs view
@@ -10,8 +10,8 @@ loop :: S.UGen, doneAction :: S.UGen } deriving (Show)-lFGauss :: LFGauss-lFGauss = LFGauss {+lfGauss :: LFGauss+lfGauss = LFGauss { rate = S.AR, duration = 1.0, width = 0.1,
Sound/SC3/UGen/Record/LFNoise0.hs view
@@ -6,8 +6,8 @@ rate :: S.Rate, freq :: S.UGen } deriving (Show)-lFNoise0 :: LFNoise0-lFNoise0 = LFNoise0 {+lfNoise0 :: LFNoise0+lfNoise0 = LFNoise0 { rate = S.AR, freq = 500.0 }
Sound/SC3/UGen/Record/LFNoise1.hs view
@@ -6,8 +6,8 @@ rate :: S.Rate, freq :: S.UGen } deriving (Show)-lFNoise1 :: LFNoise1-lFNoise1 = LFNoise1 {+lfNoise1 :: LFNoise1+lfNoise1 = LFNoise1 { rate = S.AR, freq = 500.0 }
Sound/SC3/UGen/Record/LFNoise2.hs view
@@ -6,8 +6,8 @@ rate :: S.Rate, freq :: S.UGen } deriving (Show)-lFNoise2 :: LFNoise2-lFNoise2 = LFNoise2 {+lfNoise2 :: LFNoise2+lfNoise2 = LFNoise2 { rate = S.AR, freq = 500.0 }
Sound/SC3/UGen/Record/LFPar.hs view
@@ -7,8 +7,8 @@ freq :: S.UGen, iphase :: S.UGen } deriving (Show)-lFPar :: LFPar-lFPar = LFPar {+lfPar :: LFPar+lfPar = LFPar { rate = S.AR, freq = 440.0, iphase = 0.0
Sound/SC3/UGen/Record/LFPulse.hs view
@@ -8,8 +8,8 @@ iphase :: S.UGen, width :: S.UGen } deriving (Show)-lFPulse :: LFPulse-lFPulse = LFPulse {+lfPulse :: LFPulse+lfPulse = LFPulse { rate = S.AR, freq = 440.0, iphase = 0.0,
Sound/SC3/UGen/Record/LFSaw.hs view
@@ -7,8 +7,8 @@ freq :: S.UGen, iphase :: S.UGen } deriving (Show)-lFSaw :: LFSaw-lFSaw = LFSaw {+lfSaw :: LFSaw+lfSaw = LFSaw { rate = S.AR, freq = 440.0, iphase = 0.0
Sound/SC3/UGen/Record/LFTri.hs view
@@ -7,8 +7,8 @@ freq :: S.UGen, iphase :: S.UGen } deriving (Show)-lFTri :: LFTri-lFTri = LFTri {+lfTri :: LFTri+lfTri = LFTri { rate = S.AR, freq = 440.0, iphase = 0.0
Sound/SC3/UGen/Record/LPF.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data LPF = LPF { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen } deriving (Show)-lPF :: LPF-lPF = LPF {+lpf :: LPF+lpf = LPF { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0 } mkLPF :: LPF -> S.UGen
Sound/SC3/UGen/Record/LPF1.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data LPF1 = LPF1 { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen } deriving (Show) lPF1 :: LPF1 lPF1 = LPF1 { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 1000.0 } mkLPF1 :: LPF1 -> S.UGen
Sound/SC3/UGen/Record/LPF18.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data LPF18 = LPF18 {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, res :: S.UGen, dist :: S.UGen } deriving (Show) lPF18 :: LPF18 lPF18 = LPF18 {- in = 0.0,+ input = 0.0, freq = 100.0, res = 1.0, dist = 0.4
Sound/SC3/UGen/Record/LPFVS6.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data LPFVS6 = LPFVS6 { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, slope :: S.UGen } deriving (Show) lPFVS6 :: LPFVS6 lPFVS6 = LPFVS6 { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 1000.0, slope = 0.5 }
Sound/SC3/UGen/Record/LPZ1.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data LPZ1 = LPZ1 { rate :: S.Rate,- in :: S.UGen+ input :: S.UGen } deriving (Show) lPZ1 :: LPZ1 lPZ1 = LPZ1 { rate = S.AR,- in = 0.0+ input = 0.0 } mkLPZ1 :: LPZ1 -> S.UGen mkLPZ1 (LPZ1 r a') = S.mkOsc r "LPZ1" [a'] 1
Sound/SC3/UGen/Record/LPZ2.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data LPZ2 = LPZ2 { rate :: S.Rate,- in :: S.UGen+ input :: S.UGen } deriving (Show) lPZ2 :: LPZ2 lPZ2 = LPZ2 { rate = S.AR,- in = 0.0+ input = 0.0 } mkLPZ2 :: LPZ2 -> S.UGen mkLPZ2 (LPZ2 r a') = S.mkOsc r "LPZ2" [a'] 1
Sound/SC3/UGen/Record/LTI.hs view
@@ -7,8 +7,8 @@ bufnuma :: S.UGen, bufnumb :: S.UGen } deriving (Show)-lTI :: LTI-lTI = LTI {+lti :: LTI+lti = LTI { input = 0.0, bufnuma = 0.0, bufnumb = 1.0
Sound/SC3/UGen/Record/Lag.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data Lag = Lag { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, lagTime :: S.UGen } deriving (Show) lag :: Lag lag = Lag { rate = S.AR,- in = 0.0,+ input = 0.0, lagTime = 0.1 } mkLag :: Lag -> S.UGen
Sound/SC3/UGen/Record/Lag2.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data Lag2 = Lag2 { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, lagTime :: S.UGen } deriving (Show) lag2 :: Lag2 lag2 = Lag2 { rate = S.AR,- in = 0.0,+ input = 0.0, lagTime = 0.1 } mkLag2 :: Lag2 -> S.UGen
Sound/SC3/UGen/Record/Lag2UD.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data Lag2UD = Lag2UD { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, lagTimeU :: S.UGen, lagTimeD :: S.UGen } deriving (Show) lag2UD :: Lag2UD lag2UD = Lag2UD { rate = S.AR,- in = 0.0,+ input = 0.0, lagTimeU = 0.1, lagTimeD = 0.1 }
Sound/SC3/UGen/Record/Lag3.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data Lag3 = Lag3 { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, lagTime :: S.UGen } deriving (Show) lag3 :: Lag3 lag3 = Lag3 { rate = S.AR,- in = 0.0,+ input = 0.0, lagTime = 0.1 } mkLag3 :: Lag3 -> S.UGen
Sound/SC3/UGen/Record/Lag3UD.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data Lag3UD = Lag3UD { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, lagTimeU :: S.UGen, lagTimeD :: S.UGen } deriving (Show) lag3UD :: Lag3UD lag3UD = Lag3UD { rate = S.AR,- in = 0.0,+ input = 0.0, lagTimeU = 0.1, lagTimeD = 0.1 }
Sound/SC3/UGen/Record/LagUD.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data LagUD = LagUD { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, lagTimeU :: S.UGen, lagTimeD :: S.UGen } deriving (Show) lagUD :: LagUD lagUD = LagUD { rate = S.AR,- in = 0.0,+ input = 0.0, lagTimeU = 0.1, lagTimeD = 0.1 }
Sound/SC3/UGen/Record/LastValue.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data LastValue = LastValue { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, diff :: S.UGen } deriving (Show) lastValue :: LastValue lastValue = LastValue { rate = S.AR,- in = 0.0,+ input = 0.0, diff = 0.01 } mkLastValue :: LastValue -> S.UGen
Sound/SC3/UGen/Record/Latch.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data Latch = Latch { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, trig :: S.UGen } deriving (Show) latch :: Latch latch = Latch { rate = S.AR,- in = 0.0,+ input = 0.0, trig = 0.0 } mkLatch :: Latch -> S.UGen
Sound/SC3/UGen/Record/LeakDC.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data LeakDC = LeakDC { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, coef :: S.UGen } deriving (Show) leakDC :: LeakDC leakDC = LeakDC { rate = S.AR,- in = 0.0,+ input = 0.0, coef = 0.995 } mkLeakDC :: LeakDC -> S.UGen
Sound/SC3/UGen/Record/Limiter.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Limiter = Limiter {- in :: S.UGen,+ input :: S.UGen, level :: S.UGen, dur :: S.UGen } deriving (Show) limiter :: Limiter limiter = Limiter {- in = 0.0,+ input = 0.0, level = 1.0, dur = 0.01 }
Sound/SC3/UGen/Record/LinExp.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data LinExp = LinExp { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, srclo :: S.UGen, srchi :: S.UGen, dstlo :: S.UGen,@@ -13,7 +13,7 @@ linExp :: LinExp linExp = LinExp { rate = S.AR,- in = 0.0,+ input = 0.0, srclo = 0.0, srchi = 1.0, dstlo = 1.0,
Sound/SC3/UGen/Record/LinPan2.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data LinPan2 = LinPan2 { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, pos :: S.UGen, level :: S.UGen } deriving (Show) linPan2 :: LinPan2 linPan2 = LinPan2 { rate = S.AR,- in = 0.0,+ input = 0.0, pos = 0.0, level = 1.0 }
Sound/SC3/UGen/Record/LocalOut.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data LocalOut = LocalOut { rate :: S.Rate,- channelsArray :: S.UGen+ input :: S.UGen } deriving (Show) localOut :: LocalOut localOut = LocalOut { rate = S.AR,- channelsArray = 0.0+ input = 0.0 } mkLocalOut :: LocalOut -> S.UGen mkLocalOut (LocalOut r a') = S.mkOsc r "LocalOut" [a'] 1
Sound/SC3/UGen/Record/Logistic.hs view
@@ -6,14 +6,14 @@ rate :: S.Rate, chaosParam :: S.UGen, freq :: S.UGen,- init :: S.UGen+ init_ :: S.UGen } deriving (Show) logistic :: Logistic logistic = Logistic { rate = S.AR, chaosParam = 3.0, freq = 1000.0,- init = 0.5+ init_ = 0.5 } mkLogistic :: Logistic -> S.UGen mkLogistic (Logistic r a' b' c') = S.mkOsc r "Logistic" [a',b',c'] 1
Sound/SC3/UGen/Record/LoopBuf.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data LoopBuf = LoopBuf { bufnum :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, gate :: S.UGen, startPos :: S.UGen, startLoop :: S.UGen,@@ -14,7 +14,7 @@ loopBuf :: LoopBuf loopBuf = LoopBuf { bufnum = 0.0,- rate = 1.0,+ rate_ = 1.0, gate = 1.0, startPos = 0.0, startLoop = 0.0,
Sound/SC3/UGen/Record/MantissaMask.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data MantissaMask = MantissaMask { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, bits :: S.UGen } deriving (Show) mantissaMask :: MantissaMask mantissaMask = MantissaMask { rate = S.AR,- in = 0.0,+ input = 0.0, bits = 3.0 } mkMantissaMask :: MantissaMask -> S.UGen
Sound/SC3/UGen/Record/MarkovSynth.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data MarkovSynth = MarkovSynth {- in :: S.UGen,+ input :: S.UGen, isRecording :: S.UGen, waitTime :: S.UGen, tableSize :: S.UGen } deriving (Show) markovSynth :: MarkovSynth markovSynth = MarkovSynth {- in = 0.0,+ input = 0.0, isRecording = 1.0, waitTime = 2.0, tableSize = 10.0
Sound/SC3/UGen/Record/Max.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Max = Max {- in :: S.UGen,+ input :: S.UGen, numsamp :: S.UGen } deriving (Show) max :: Max max = Max {- in = 0.0,+ input = 0.0, numsamp = 64.0 } mkMax :: Max -> S.UGen
Sound/SC3/UGen/Record/Maxamp.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Maxamp = Maxamp {- in :: S.UGen,+ input :: S.UGen, numSamps :: S.UGen } deriving (Show) maxamp :: Maxamp maxamp = Maxamp {- in = 0.0,+ input = 0.0, numSamps = 1000.0 } mkMaxamp :: Maxamp -> S.UGen
Sound/SC3/UGen/Record/MeanTriggered.hs view
@@ -4,16 +4,16 @@ import Sound.SC3.UGen.Record data MeanTriggered = MeanTriggered { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, trig :: S.UGen,- length :: S.UGen+ length_ :: S.UGen } deriving (Show) meanTriggered :: MeanTriggered meanTriggered = MeanTriggered { rate = S.AR,- in = 0.0,+ input = 0.0, trig = 0.0,- length = 10.0+ length_ = 10.0 } mkMeanTriggered :: MeanTriggered -> S.UGen mkMeanTriggered (MeanTriggered r a' b' c') = S.mkOsc r "MeanTriggered" [a',b',c'] 1
Sound/SC3/UGen/Record/Median.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data Median = Median { rate :: S.Rate,- length :: S.UGen,- in :: S.UGen+ length_ :: S.UGen,+ input :: S.UGen } deriving (Show) median :: Median median = Median { rate = S.AR,- length = 3.0,- in = 0.0+ length_ = 3.0,+ input = 0.0 } mkMedian :: Median -> S.UGen mkMedian (Median r a' b') = S.mkOsc r "Median" [a',b'] 1
Sound/SC3/UGen/Record/MedianTriggered.hs view
@@ -4,16 +4,16 @@ import Sound.SC3.UGen.Record data MedianTriggered = MedianTriggered { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, trig :: S.UGen,- length :: S.UGen+ length_ :: S.UGen } deriving (Show) medianTriggered :: MedianTriggered medianTriggered = MedianTriggered { rate = S.AR,- in = 0.0,+ input = 0.0, trig = 0.0,- length = 10.0+ length_ = 10.0 } mkMedianTriggered :: MedianTriggered -> S.UGen mkMedianTriggered (MedianTriggered r a' b' c') = S.mkOsc r "MedianTriggered" [a',b',c'] 1
Sound/SC3/UGen/Record/MidEQ.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data MidEQ = MidEQ { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen, db :: S.UGen@@ -12,7 +12,7 @@ midEQ :: MidEQ midEQ = MidEQ { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0, rq = 1.0, db = 0.0
Sound/SC3/UGen/Record/MonoGrain.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data MonoGrain = MonoGrain {- in :: S.UGen,+ input :: S.UGen, winsize :: S.UGen, grainrate :: S.UGen, winrandpct :: S.UGen } deriving (Show) monoGrain :: MonoGrain monoGrain = MonoGrain {- in = 0.0,+ input = 0.0, winsize = 0.1, grainrate = 10.0, winrandpct = 0.0
Sound/SC3/UGen/Record/MonoGrainBF.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data MonoGrainBF = MonoGrainBF {- in :: S.UGen,+ input :: S.UGen, winsize :: S.UGen, grainrate :: S.UGen, winrandpct :: S.UGen,@@ -15,7 +15,7 @@ } deriving (Show) monoGrainBF :: MonoGrainBF monoGrainBF = MonoGrainBF {- in = 0.0,+ input = 0.0, winsize = 0.1, grainrate = 10.0, winrandpct = 0.0,
Sound/SC3/UGen/Record/MoogFF.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data MoogFF = MoogFF { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, gain :: S.UGen, reset :: S.UGen@@ -12,7 +12,7 @@ moogFF :: MoogFF moogFF = MoogFF { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 100.0, gain = 2.0, reset = 0.0
Sound/SC3/UGen/Record/MoogLadder.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data MoogLadder = MoogLadder { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, ffreq :: S.UGen, res :: S.UGen } deriving (Show) moogLadder :: MoogLadder moogLadder = MoogLadder { rate = S.AR,- in = 0.0,+ input = 0.0, ffreq = 440.0, res = 0.0 }
Sound/SC3/UGen/Record/MoogVCF.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data MoogVCF = MoogVCF {- in :: S.UGen,+ input :: S.UGen, fco :: S.UGen, res :: S.UGen } deriving (Show) moogVCF :: MoogVCF moogVCF = MoogVCF {- in = 0.0,+ input = 0.0, fco = 0.0, res = 0.0 }
Sound/SC3/UGen/Record/NL.hs view
@@ -9,8 +9,8 @@ guard1 :: S.UGen, guard2 :: S.UGen } deriving (Show)-nL :: NL-nL = NL {+nl :: NL+nl = NL { input = 0.0, bufnuma = 0.0, bufnumb = 1.0,
Sound/SC3/UGen/Record/NeedleRect.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data NeedleRect = NeedleRect {- rate :: S.UGen,+ rate_ :: S.UGen, imgWidth :: S.UGen, imgHeight :: S.UGen, rectX :: S.UGen,@@ -13,7 +13,7 @@ } deriving (Show) needleRect :: NeedleRect needleRect = NeedleRect {- rate = 1.0,+ rate_ = 1.0, imgWidth = 100.0, imgHeight = 100.0, rectX = 0.0,
Sound/SC3/UGen/Record/NestedAllpassC.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data NestedAllpassC = NestedAllpassC {- in :: S.UGen,+ input :: S.UGen, maxdelay1 :: S.UGen, delay1 :: S.UGen, gain1 :: S.UGen,@@ -13,7 +13,7 @@ } deriving (Show) nestedAllpassC :: NestedAllpassC nestedAllpassC = NestedAllpassC {- in = 0.0,+ input = 0.0, maxdelay1 = 0.036, delay1 = 0.036, gain1 = 0.08,
Sound/SC3/UGen/Record/NestedAllpassL.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data NestedAllpassL = NestedAllpassL {- in :: S.UGen,+ input :: S.UGen, maxdelay1 :: S.UGen, delay1 :: S.UGen, gain1 :: S.UGen,@@ -13,7 +13,7 @@ } deriving (Show) nestedAllpassL :: NestedAllpassL nestedAllpassL = NestedAllpassL {- in = 0.0,+ input = 0.0, maxdelay1 = 0.036, delay1 = 0.036, gain1 = 0.08,
Sound/SC3/UGen/Record/NestedAllpassN.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data NestedAllpassN = NestedAllpassN {- in :: S.UGen,+ input :: S.UGen, maxdelay1 :: S.UGen, delay1 :: S.UGen, gain1 :: S.UGen,@@ -13,7 +13,7 @@ } deriving (Show) nestedAllpassN :: NestedAllpassN nestedAllpassN = NestedAllpassN {- in = 0.0,+ input = 0.0, maxdelay1 = 0.036, delay1 = 0.036, gain1 = 0.08,
Sound/SC3/UGen/Record/Normalizer.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Normalizer = Normalizer {- in :: S.UGen,+ input :: S.UGen, level :: S.UGen, dur :: S.UGen } deriving (Show) normalizer :: Normalizer normalizer = Normalizer {- in = 0.0,+ input = 0.0, level = 1.0, dur = 0.01 }
Sound/SC3/UGen/Record/OSFold4.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data OSFold4 = OSFold4 {- in :: S.UGen,+ input :: S.UGen, lo :: S.UGen, hi :: S.UGen } deriving (Show) oSFold4 :: OSFold4 oSFold4 = OSFold4 {- in = 0.0,+ input = 0.0, lo = 0.0, hi = 0.0 }
Sound/SC3/UGen/Record/OSFold8.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data OSFold8 = OSFold8 {- in :: S.UGen,+ input :: S.UGen, lo :: S.UGen, hi :: S.UGen } deriving (Show) oSFold8 :: OSFold8 oSFold8 = OSFold8 {- in = 0.0,+ input = 0.0, lo = 0.0, hi = 0.0 }
Sound/SC3/UGen/Record/OSTrunc4.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data OSTrunc4 = OSTrunc4 {- in :: S.UGen,+ input :: S.UGen, quant :: S.UGen } deriving (Show) oSTrunc4 :: OSTrunc4 oSTrunc4 = OSTrunc4 {- in = 0.0,+ input = 0.0, quant = 0.5 } mkOSTrunc4 :: OSTrunc4 -> S.UGen
Sound/SC3/UGen/Record/OSTrunc8.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data OSTrunc8 = OSTrunc8 {- in :: S.UGen,+ input :: S.UGen, quant :: S.UGen } deriving (Show) oSTrunc8 :: OSTrunc8 oSTrunc8 = OSTrunc8 {- in = 0.0,+ input = 0.0, quant = 0.5 } mkOSTrunc8 :: OSTrunc8 -> S.UGen
Sound/SC3/UGen/Record/OSWrap4.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data OSWrap4 = OSWrap4 {- in :: S.UGen,+ input :: S.UGen, lo :: S.UGen, hi :: S.UGen } deriving (Show) oSWrap4 :: OSWrap4 oSWrap4 = OSWrap4 {- in = 0.0,+ input = 0.0, lo = 0.0, hi = 0.0 }
Sound/SC3/UGen/Record/OSWrap8.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data OSWrap8 = OSWrap8 {- in :: S.UGen,+ input :: S.UGen, lo :: S.UGen, hi :: S.UGen } deriving (Show) oSWrap8 :: OSWrap8 oSWrap8 = OSWrap8 {- in = 0.0,+ input = 0.0, lo = 0.0, hi = 0.0 }
Sound/SC3/UGen/Record/OffsetOut.hs view
@@ -5,13 +5,13 @@ data OffsetOut = OffsetOut { rate :: S.Rate, bus :: S.UGen,- channelsArray :: S.UGen+ input :: S.UGen } deriving (Show) offsetOut :: OffsetOut offsetOut = OffsetOut { rate = S.AR, bus = 0.0,- channelsArray = 0.0+ input = 0.0 } mkOffsetOut :: OffsetOut -> S.UGen mkOffsetOut (OffsetOut r a' b') = S.mkOsc r "OffsetOut" [a',b'] 1
Sound/SC3/UGen/Record/OnePole.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data OnePole = OnePole { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, coef :: S.UGen } deriving (Show) onePole :: OnePole onePole = OnePole { rate = S.AR,- in = 0.0,+ input = 0.0, coef = 0.5 } mkOnePole :: OnePole -> S.UGen
Sound/SC3/UGen/Record/OneZero.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data OneZero = OneZero { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, coef :: S.UGen } deriving (Show) oneZero :: OneZero oneZero = OneZero { rate = S.AR,- in = 0.0,+ input = 0.0, coef = 0.5 } mkOneZero :: OneZero -> S.UGen
Sound/SC3/UGen/Record/Onsets.hs view
@@ -7,7 +7,7 @@ threshold :: S.UGen, odftype :: S.UGen, relaxtime :: S.UGen,- floor :: S.UGen,+ floor_ :: S.UGen, mingap :: S.UGen, medianspan :: S.UGen, whtype :: S.UGen,@@ -19,7 +19,7 @@ threshold = 0.5, odftype = 3.0, relaxtime = 1.0,- floor = 0.1,+ floor_ = 0.1, mingap = 10.0, medianspan = 11.0, whtype = 1.0,
Sound/SC3/UGen/Record/Oregonator.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data Oregonator = Oregonator { reset :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, epsilon :: S.UGen, mu :: S.UGen, q :: S.UGen,@@ -15,7 +15,7 @@ oregonator :: Oregonator oregonator = Oregonator { reset = 0.0,- rate = 0.01,+ rate_ = 0.01, epsilon = 1.0, mu = 1.0, q = 1.0,
Sound/SC3/UGen/Record/Out.hs view
@@ -5,13 +5,13 @@ data Out = Out { rate :: S.Rate, bus :: S.UGen,- channelsArray :: S.UGen+ input :: S.UGen } deriving (Show) out :: Out out = Out { rate = S.AR, bus = 0.0,- channelsArray = 0.0+ input = 0.0 } mkOut :: Out -> S.UGen mkOut (Out r a' b') = S.mkOsc r "Out" [a',b'] 1
Sound/SC3/UGen/Record/PV_Add.hs view
@@ -6,8 +6,8 @@ bufferA :: S.UGen, bufferB :: S.UGen } deriving (Show)-pV_Add :: PV_Add-pV_Add = PV_Add {+pv_Add :: PV_Add+pv_Add = PV_Add { bufferA = 0.0, bufferB = 0.0 }
Sound/SC3/UGen/Record/PV_BinBufRd.hs view
@@ -11,8 +11,8 @@ numBins :: S.UGen, clear :: S.UGen } deriving (Show)-pV_BinBufRd :: PV_BinBufRd-pV_BinBufRd = PV_BinBufRd {+pv_BinBufRd :: PV_BinBufRd+pv_BinBufRd = PV_BinBufRd { buffer = 0.0, playbuf = 0.0, point = 1.0,
Sound/SC3/UGen/Record/PV_BinDelay.hs view
@@ -9,8 +9,8 @@ fbbuf :: S.UGen, hop :: S.UGen } deriving (Show)-pV_BinDelay :: PV_BinDelay-pV_BinDelay = PV_BinDelay {+pv_BinDelay :: PV_BinDelay+pv_BinDelay = PV_BinDelay { buffer = 0.0, maxdelay = 0.0, delaybuf = 0.0,
Sound/SC3/UGen/Record/PV_BinFilter.hs view
@@ -7,8 +7,8 @@ start :: S.UGen, end :: S.UGen } deriving (Show)-pV_BinFilter :: PV_BinFilter-pV_BinFilter = PV_BinFilter {+pv_BinFilter :: PV_BinFilter+pv_BinFilter = PV_BinFilter { buffer = 0.0, start = 0.0, end = 0.0
Sound/SC3/UGen/Record/PV_BinPlayBuf.hs view
@@ -5,7 +5,7 @@ data PV_BinPlayBuf = PV_BinPlayBuf { buffer :: S.UGen, playbuf :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, offset :: S.UGen, binStart :: S.UGen, binSkip :: S.UGen,@@ -13,11 +13,11 @@ loop :: S.UGen, clear :: S.UGen } deriving (Show)-pV_BinPlayBuf :: PV_BinPlayBuf-pV_BinPlayBuf = PV_BinPlayBuf {+pv_BinPlayBuf :: PV_BinPlayBuf+pv_BinPlayBuf = PV_BinPlayBuf { buffer = 0.0, playbuf = 0.0,- rate = 1.0,+ rate_ = 1.0, offset = 0.0, binStart = 0.0, binSkip = 1.0,
Sound/SC3/UGen/Record/PV_BinScramble.hs view
@@ -8,8 +8,8 @@ width :: S.UGen, trig :: S.UGen } deriving (Show)-pV_BinScramble :: PV_BinScramble-pV_BinScramble = PV_BinScramble {+pv_BinScramble :: PV_BinScramble+pv_BinScramble = PV_BinScramble { buffer = 0.0, wipe = 0.0, width = 0.2,
Sound/SC3/UGen/Record/PV_BinShift.hs view
@@ -8,8 +8,8 @@ shift :: S.UGen, interp :: S.UGen } deriving (Show)-pV_BinShift :: PV_BinShift-pV_BinShift = PV_BinShift {+pv_BinShift :: PV_BinShift+pv_BinShift = PV_BinShift { buffer = 0.0, stretch = 1.0, shift = 0.0,
Sound/SC3/UGen/Record/PV_BinWipe.hs view
@@ -7,8 +7,8 @@ bufferB :: S.UGen, wipe :: S.UGen } deriving (Show)-pV_BinWipe :: PV_BinWipe-pV_BinWipe = PV_BinWipe {+pv_BinWipe :: PV_BinWipe+pv_BinWipe = PV_BinWipe { bufferA = 0.0, bufferB = 0.0, wipe = 0.0
Sound/SC3/UGen/Record/PV_BrickWall.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, wipe :: S.UGen } deriving (Show)-pV_BrickWall :: PV_BrickWall-pV_BrickWall = PV_BrickWall {+pv_BrickWall :: PV_BrickWall+pv_BrickWall = PV_BrickWall { buffer = 0.0, wipe = 0.0 }
Sound/SC3/UGen/Record/PV_BufRd.hs view
@@ -7,8 +7,8 @@ playbuf :: S.UGen, point :: S.UGen } deriving (Show)-pV_BufRd :: PV_BufRd-pV_BufRd = PV_BufRd {+pv_BufRd :: PV_BufRd+pv_BufRd = PV_BufRd { buffer = 0.0, playbuf = 0.0, point = 1.0
Sound/SC3/UGen/Record/PV_ChainUGen.hs view
@@ -5,8 +5,8 @@ data PV_ChainUGen = PV_ChainUGen { maxSize :: S.UGen } deriving (Show)-pV_ChainUGen :: PV_ChainUGen-pV_ChainUGen = PV_ChainUGen {+pv_ChainUGen :: PV_ChainUGen+pv_ChainUGen = PV_ChainUGen { maxSize = 0.0 } mkPV_ChainUGen :: PV_ChainUGen -> S.UGen
Sound/SC3/UGen/Record/PV_CommonMag.hs view
@@ -8,8 +8,8 @@ tolerance :: S.UGen, remove :: S.UGen } deriving (Show)-pV_CommonMag :: PV_CommonMag-pV_CommonMag = PV_CommonMag {+pv_CommonMag :: PV_CommonMag+pv_CommonMag = PV_CommonMag { bufferA = 0.0, bufferB = 0.0, tolerance = 0.0,
Sound/SC3/UGen/Record/PV_CommonMul.hs view
@@ -8,8 +8,8 @@ tolerance :: S.UGen, remove :: S.UGen } deriving (Show)-pV_CommonMul :: PV_CommonMul-pV_CommonMul = PV_CommonMul {+pv_CommonMul :: PV_CommonMul+pv_CommonMul = PV_CommonMul { bufferA = 0.0, bufferB = 0.0, tolerance = 0.0,
Sound/SC3/UGen/Record/PV_Compander.hs view
@@ -8,8 +8,8 @@ slopeBelow :: S.UGen, slopeAbove :: S.UGen } deriving (Show)-pV_Compander :: PV_Compander-pV_Compander = PV_Compander {+pv_Compander :: PV_Compander+pv_Compander = PV_Compander { buffer = 0.0, thresh = 50.0, slopeBelow = 1.0,
Sound/SC3/UGen/Record/PV_ConformalMap.hs view
@@ -7,8 +7,8 @@ areal :: S.UGen, aimag :: S.UGen } deriving (Show)-pV_ConformalMap :: PV_ConformalMap-pV_ConformalMap = PV_ConformalMap {+pv_ConformalMap :: PV_ConformalMap+pv_ConformalMap = PV_ConformalMap { buffer = 0.0, areal = 0.0, aimag = 0.0
Sound/SC3/UGen/Record/PV_Conj.hs view
@@ -5,8 +5,8 @@ data PV_Conj = PV_Conj { buffer :: S.UGen } deriving (Show)-pV_Conj :: PV_Conj-pV_Conj = PV_Conj {+pv_Conj :: PV_Conj+pv_Conj = PV_Conj { buffer = 0.0 } mkPV_Conj :: PV_Conj -> S.UGen
Sound/SC3/UGen/Record/PV_Copy.hs view
@@ -6,8 +6,8 @@ bufferA :: S.UGen, bufferB :: S.UGen } deriving (Show)-pV_Copy :: PV_Copy-pV_Copy = PV_Copy {+pv_Copy :: PV_Copy+pv_Copy = PV_Copy { bufferA = 0.0, bufferB = 0.0 }
Sound/SC3/UGen/Record/PV_CopyPhase.hs view
@@ -6,8 +6,8 @@ bufferA :: S.UGen, bufferB :: S.UGen } deriving (Show)-pV_CopyPhase :: PV_CopyPhase-pV_CopyPhase = PV_CopyPhase {+pv_CopyPhase :: PV_CopyPhase+pv_CopyPhase = PV_CopyPhase { bufferA = 0.0, bufferB = 0.0 }
Sound/SC3/UGen/Record/PV_Cutoff.hs view
@@ -7,8 +7,8 @@ bufferB :: S.UGen, wipe :: S.UGen } deriving (Show)-pV_Cutoff :: PV_Cutoff-pV_Cutoff = PV_Cutoff {+pv_Cutoff :: PV_Cutoff+pv_Cutoff = PV_Cutoff { bufferA = 0.0, bufferB = 0.0, wipe = 0.0
Sound/SC3/UGen/Record/PV_DiffMags.hs view
@@ -6,8 +6,8 @@ bufferA :: S.UGen, bufferB :: S.UGen } deriving (Show)-pV_DiffMags :: PV_DiffMags-pV_DiffMags = PV_DiffMags {+pv_DiffMags :: PV_DiffMags+pv_DiffMags = PV_DiffMags { bufferA = 0.0, bufferB = 0.0 }
Sound/SC3/UGen/Record/PV_Diffuser.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, trig :: S.UGen } deriving (Show)-pV_Diffuser :: PV_Diffuser-pV_Diffuser = PV_Diffuser {+pv_Diffuser :: PV_Diffuser+pv_Diffuser = PV_Diffuser { buffer = 0.0, trig = 0.0 }
Sound/SC3/UGen/Record/PV_Div.hs view
@@ -6,8 +6,8 @@ bufferA :: S.UGen, bufferB :: S.UGen } deriving (Show)-pV_Div :: PV_Div-pV_Div = PV_Div {+pv_Div :: PV_Div+pv_Div = PV_Div { bufferA = 0.0, bufferB = 0.0 }
Sound/SC3/UGen/Record/PV_EvenBin.hs view
@@ -5,8 +5,8 @@ data PV_EvenBin = PV_EvenBin { buffer :: S.UGen } deriving (Show)-pV_EvenBin :: PV_EvenBin-pV_EvenBin = PV_EvenBin {+pv_EvenBin :: PV_EvenBin+pv_EvenBin = PV_EvenBin { buffer = 0.0 } mkPV_EvenBin :: PV_EvenBin -> S.UGen
Sound/SC3/UGen/Record/PV_ExtractRepeat.hs view
@@ -11,8 +11,8 @@ ffthop :: S.UGen, thresh :: S.UGen } deriving (Show)-pV_ExtractRepeat :: PV_ExtractRepeat-pV_ExtractRepeat = PV_ExtractRepeat {+pv_ExtractRepeat :: PV_ExtractRepeat+pv_ExtractRepeat = PV_ExtractRepeat { buffer = 0.0, loopbuf = 0.0, loopdur = 0.0,
Sound/SC3/UGen/Record/PV_Freeze.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, freeze :: S.UGen } deriving (Show)-pV_Freeze :: PV_Freeze-pV_Freeze = PV_Freeze {+pv_Freeze :: PV_Freeze+pv_Freeze = PV_Freeze { buffer = 0.0, freeze = 0.0 }
Sound/SC3/UGen/Record/PV_FreqBuffer.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, databuffer :: S.UGen } deriving (Show)-pV_FreqBuffer :: PV_FreqBuffer-pV_FreqBuffer = PV_FreqBuffer {+pv_FreqBuffer :: PV_FreqBuffer+pv_FreqBuffer = PV_FreqBuffer { buffer = 0.0, databuffer = 0.0 }
Sound/SC3/UGen/Record/PV_HainsworthFoote.hs view
@@ -9,8 +9,8 @@ threshold :: S.UGen, waittime :: S.UGen } deriving (Show)-pV_HainsworthFoote :: PV_HainsworthFoote-pV_HainsworthFoote = PV_HainsworthFoote {+pv_HainsworthFoote :: PV_HainsworthFoote+pv_HainsworthFoote = PV_HainsworthFoote { buffer = 0.0, proph = 0.0, propf = 0.0,
Sound/SC3/UGen/Record/PV_Invert.hs view
@@ -5,8 +5,8 @@ data PV_Invert = PV_Invert { buffer :: S.UGen } deriving (Show)-pV_Invert :: PV_Invert-pV_Invert = PV_Invert {+pv_Invert :: PV_Invert+pv_Invert = PV_Invert { buffer = 0.0 } mkPV_Invert :: PV_Invert -> S.UGen
Sound/SC3/UGen/Record/PV_JensenAndersen.hs view
@@ -11,8 +11,8 @@ threshold :: S.UGen, waittime :: S.UGen } deriving (Show)-pV_JensenAndersen :: PV_JensenAndersen-pV_JensenAndersen = PV_JensenAndersen {+pv_JensenAndersen :: PV_JensenAndersen+pv_JensenAndersen = PV_JensenAndersen { buffer = 0.0, propsc = 0.25, prophfe = 0.25,
Sound/SC3/UGen/Record/PV_LocalMax.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, threshold :: S.UGen } deriving (Show)-pV_LocalMax :: PV_LocalMax-pV_LocalMax = PV_LocalMax {+pv_LocalMax :: PV_LocalMax+pv_LocalMax = PV_LocalMax { buffer = 0.0, threshold = 0.0 }
Sound/SC3/UGen/Record/PV_MagAbove.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, threshold :: S.UGen } deriving (Show)-pV_MagAbove :: PV_MagAbove-pV_MagAbove = PV_MagAbove {+pv_MagAbove :: PV_MagAbove+pv_MagAbove = PV_MagAbove { buffer = 0.0, threshold = 0.0 }
Sound/SC3/UGen/Record/PV_MagBelow.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, threshold :: S.UGen } deriving (Show)-pV_MagBelow :: PV_MagBelow-pV_MagBelow = PV_MagBelow {+pv_MagBelow :: PV_MagBelow+pv_MagBelow = PV_MagBelow { buffer = 0.0, threshold = 0.0 }
Sound/SC3/UGen/Record/PV_MagBuffer.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, databuffer :: S.UGen } deriving (Show)-pV_MagBuffer :: PV_MagBuffer-pV_MagBuffer = PV_MagBuffer {+pv_MagBuffer :: PV_MagBuffer+pv_MagBuffer = PV_MagBuffer { buffer = 0.0, databuffer = 0.0 }
Sound/SC3/UGen/Record/PV_MagClip.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, threshold :: S.UGen } deriving (Show)-pV_MagClip :: PV_MagClip-pV_MagClip = PV_MagClip {+pv_MagClip :: PV_MagClip+pv_MagClip = PV_MagClip { buffer = 0.0, threshold = 0.0 }
Sound/SC3/UGen/Record/PV_MagDiv.hs view
@@ -7,8 +7,8 @@ bufferB :: S.UGen, zeroed :: S.UGen } deriving (Show)-pV_MagDiv :: PV_MagDiv-pV_MagDiv = PV_MagDiv {+pv_MagDiv :: PV_MagDiv+pv_MagDiv = PV_MagDiv { bufferA = 0.0, bufferB = 0.0, zeroed = 0.0001
Sound/SC3/UGen/Record/PV_MagExp.hs view
@@ -5,8 +5,8 @@ data PV_MagExp = PV_MagExp { buffer :: S.UGen } deriving (Show)-pV_MagExp :: PV_MagExp-pV_MagExp = PV_MagExp {+pv_MagExp :: PV_MagExp+pv_MagExp = PV_MagExp { buffer = 0.0 } mkPV_MagExp :: PV_MagExp -> S.UGen
Sound/SC3/UGen/Record/PV_MagFreeze.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, freeze :: S.UGen } deriving (Show)-pV_MagFreeze :: PV_MagFreeze-pV_MagFreeze = PV_MagFreeze {+pv_MagFreeze :: PV_MagFreeze+pv_MagFreeze = PV_MagFreeze { buffer = 0.0, freeze = 0.0 }
Sound/SC3/UGen/Record/PV_MagGate.hs view
@@ -7,8 +7,8 @@ thresh :: S.UGen, remove :: S.UGen } deriving (Show)-pV_MagGate :: PV_MagGate-pV_MagGate = PV_MagGate {+pv_MagGate :: PV_MagGate+pv_MagGate = PV_MagGate { buffer = 0.0, thresh = 1.0, remove = 0.0
Sound/SC3/UGen/Record/PV_MagLog.hs view
@@ -5,8 +5,8 @@ data PV_MagLog = PV_MagLog { buffer :: S.UGen } deriving (Show)-pV_MagLog :: PV_MagLog-pV_MagLog = PV_MagLog {+pv_MagLog :: PV_MagLog+pv_MagLog = PV_MagLog { buffer = 0.0 } mkPV_MagLog :: PV_MagLog -> S.UGen
Sound/SC3/UGen/Record/PV_MagMap.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, mapbuf :: S.UGen } deriving (Show)-pV_MagMap :: PV_MagMap-pV_MagMap = PV_MagMap {+pv_MagMap :: PV_MagMap+pv_MagMap = PV_MagMap { buffer = 0.0, mapbuf = 0.0 }
Sound/SC3/UGen/Record/PV_MagMinus.hs view
@@ -7,8 +7,8 @@ bufferB :: S.UGen, remove :: S.UGen } deriving (Show)-pV_MagMinus :: PV_MagMinus-pV_MagMinus = PV_MagMinus {+pv_MagMinus :: PV_MagMinus+pv_MagMinus = PV_MagMinus { bufferA = 0.0, bufferB = 0.0, remove = 1.0
Sound/SC3/UGen/Record/PV_MagMul.hs view
@@ -6,8 +6,8 @@ bufferA :: S.UGen, bufferB :: S.UGen } deriving (Show)-pV_MagMul :: PV_MagMul-pV_MagMul = PV_MagMul {+pv_MagMul :: PV_MagMul+pv_MagMul = PV_MagMul { bufferA = 0.0, bufferB = 0.0 }
Sound/SC3/UGen/Record/PV_MagMulAdd.hs view
@@ -5,8 +5,8 @@ data PV_MagMulAdd = PV_MagMulAdd { buffer :: S.UGen } deriving (Show)-pV_MagMulAdd :: PV_MagMulAdd-pV_MagMulAdd = PV_MagMulAdd {+pv_MagMulAdd :: PV_MagMulAdd+pv_MagMulAdd = PV_MagMulAdd { buffer = 0.0 } mkPV_MagMulAdd :: PV_MagMulAdd -> S.UGen
Sound/SC3/UGen/Record/PV_MagNoise.hs view
@@ -5,8 +5,8 @@ data PV_MagNoise = PV_MagNoise { buffer :: S.UGen } deriving (Show)-pV_MagNoise :: PV_MagNoise-pV_MagNoise = PV_MagNoise {+pv_MagNoise :: PV_MagNoise+pv_MagNoise = PV_MagNoise { buffer = 0.0 } mkPV_MagNoise :: PV_MagNoise -> S.UGen
Sound/SC3/UGen/Record/PV_MagScale.hs view
@@ -6,8 +6,8 @@ bufferA :: S.UGen, bufferB :: S.UGen } deriving (Show)-pV_MagScale :: PV_MagScale-pV_MagScale = PV_MagScale {+pv_MagScale :: PV_MagScale+pv_MagScale = PV_MagScale { bufferA = 0.0, bufferB = 0.0 }
Sound/SC3/UGen/Record/PV_MagShift.hs view
@@ -7,8 +7,8 @@ stretch :: S.UGen, shift :: S.UGen } deriving (Show)-pV_MagShift :: PV_MagShift-pV_MagShift = PV_MagShift {+pv_MagShift :: PV_MagShift+pv_MagShift = PV_MagShift { buffer = 0.0, stretch = 1.0, shift = 0.0
Sound/SC3/UGen/Record/PV_MagSmear.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, bins :: S.UGen } deriving (Show)-pV_MagSmear :: PV_MagSmear-pV_MagSmear = PV_MagSmear {+pv_MagSmear :: PV_MagSmear+pv_MagSmear = PV_MagSmear { buffer = 0.0, bins = 0.0 }
Sound/SC3/UGen/Record/PV_MagSmooth.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, factor :: S.UGen } deriving (Show)-pV_MagSmooth :: PV_MagSmooth-pV_MagSmooth = PV_MagSmooth {+pv_MagSmooth :: PV_MagSmooth+pv_MagSmooth = PV_MagSmooth { buffer = 0.0, factor = 0.1 }
Sound/SC3/UGen/Record/PV_MagSquared.hs view
@@ -5,8 +5,8 @@ data PV_MagSquared = PV_MagSquared { buffer :: S.UGen } deriving (Show)-pV_MagSquared :: PV_MagSquared-pV_MagSquared = PV_MagSquared {+pv_MagSquared :: PV_MagSquared+pv_MagSquared = PV_MagSquared { buffer = 0.0 } mkPV_MagSquared :: PV_MagSquared -> S.UGen
Sound/SC3/UGen/Record/PV_MagSubtract.hs view
@@ -7,8 +7,8 @@ bufferB :: S.UGen, zerolimit :: S.UGen } deriving (Show)-pV_MagSubtract :: PV_MagSubtract-pV_MagSubtract = PV_MagSubtract {+pv_MagSubtract :: PV_MagSubtract+pv_MagSubtract = PV_MagSubtract { bufferA = 0.0, bufferB = 0.0, zerolimit = 0.0
Sound/SC3/UGen/Record/PV_Max.hs view
@@ -6,8 +6,8 @@ bufferA :: S.UGen, bufferB :: S.UGen } deriving (Show)-pV_Max :: PV_Max-pV_Max = PV_Max {+pv_Max :: PV_Max+pv_Max = PV_Max { bufferA = 0.0, bufferB = 0.0 }
Sound/SC3/UGen/Record/PV_MaxMagN.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, numbins :: S.UGen } deriving (Show)-pV_MaxMagN :: PV_MaxMagN-pV_MaxMagN = PV_MaxMagN {+pv_MaxMagN :: PV_MaxMagN+pv_MaxMagN = PV_MaxMagN { buffer = 0.0, numbins = 0.0 }
Sound/SC3/UGen/Record/PV_Min.hs view
@@ -6,8 +6,8 @@ bufferA :: S.UGen, bufferB :: S.UGen } deriving (Show)-pV_Min :: PV_Min-pV_Min = PV_Min {+pv_Min :: PV_Min+pv_Min = PV_Min { bufferA = 0.0, bufferB = 0.0 }
Sound/SC3/UGen/Record/PV_MinMagN.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, numbins :: S.UGen } deriving (Show)-pV_MinMagN :: PV_MinMagN-pV_MinMagN = PV_MinMagN {+pv_MinMagN :: PV_MinMagN+pv_MinMagN = PV_MinMagN { buffer = 0.0, numbins = 0.0 }
Sound/SC3/UGen/Record/PV_Morph.hs view
@@ -7,8 +7,8 @@ bufferB :: S.UGen, morph :: S.UGen } deriving (Show)-pV_Morph :: PV_Morph-pV_Morph = PV_Morph {+pv_Morph :: PV_Morph+pv_Morph = PV_Morph { bufferA = 0.0, bufferB = 0.0, morph = 0.0
Sound/SC3/UGen/Record/PV_Mul.hs view
@@ -6,8 +6,8 @@ bufferA :: S.UGen, bufferB :: S.UGen } deriving (Show)-pV_Mul :: PV_Mul-pV_Mul = PV_Mul {+pv_Mul :: PV_Mul+pv_Mul = PV_Mul { bufferA = 0.0, bufferB = 0.0 }
Sound/SC3/UGen/Record/PV_NoiseSynthF.hs view
@@ -8,8 +8,8 @@ numFrames :: S.UGen, initflag :: S.UGen } deriving (Show)-pV_NoiseSynthF :: PV_NoiseSynthF-pV_NoiseSynthF = PV_NoiseSynthF {+pv_NoiseSynthF :: PV_NoiseSynthF+pv_NoiseSynthF = PV_NoiseSynthF { buffer = 0.0, threshold = 0.1, numFrames = 2.0,
Sound/SC3/UGen/Record/PV_NoiseSynthP.hs view
@@ -8,8 +8,8 @@ numFrames :: S.UGen, initflag :: S.UGen } deriving (Show)-pV_NoiseSynthP :: PV_NoiseSynthP-pV_NoiseSynthP = PV_NoiseSynthP {+pv_NoiseSynthP :: PV_NoiseSynthP+pv_NoiseSynthP = PV_NoiseSynthP { buffer = 0.0, threshold = 0.1, numFrames = 2.0,
Sound/SC3/UGen/Record/PV_OddBin.hs view
@@ -5,8 +5,8 @@ data PV_OddBin = PV_OddBin { buffer :: S.UGen } deriving (Show)-pV_OddBin :: PV_OddBin-pV_OddBin = PV_OddBin {+pv_OddBin :: PV_OddBin+pv_OddBin = PV_OddBin { buffer = 0.0 } mkPV_OddBin :: PV_OddBin -> S.UGen
Sound/SC3/UGen/Record/PV_PartialSynthF.hs view
@@ -8,8 +8,8 @@ numFrames :: S.UGen, initflag :: S.UGen } deriving (Show)-pV_PartialSynthF :: PV_PartialSynthF-pV_PartialSynthF = PV_PartialSynthF {+pv_PartialSynthF :: PV_PartialSynthF+pv_PartialSynthF = PV_PartialSynthF { buffer = 0.0, threshold = 0.1, numFrames = 2.0,
Sound/SC3/UGen/Record/PV_PartialSynthP.hs view
@@ -8,8 +8,8 @@ numFrames :: S.UGen, initflag :: S.UGen } deriving (Show)-pV_PartialSynthP :: PV_PartialSynthP-pV_PartialSynthP = PV_PartialSynthP {+pv_PartialSynthP :: PV_PartialSynthP+pv_PartialSynthP = PV_PartialSynthP { buffer = 0.0, threshold = 0.1, numFrames = 2.0,
Sound/SC3/UGen/Record/PV_PhaseShift.hs view
@@ -7,8 +7,8 @@ shift :: S.UGen, integrate :: S.UGen } deriving (Show)-pV_PhaseShift :: PV_PhaseShift-pV_PhaseShift = PV_PhaseShift {+pv_PhaseShift :: PV_PhaseShift+pv_PhaseShift = PV_PhaseShift { buffer = 0.0, shift = 0.0, integrate = 0.0
Sound/SC3/UGen/Record/PV_PhaseShift270.hs view
@@ -5,8 +5,8 @@ data PV_PhaseShift270 = PV_PhaseShift270 { buffer :: S.UGen } deriving (Show)-pV_PhaseShift270 :: PV_PhaseShift270-pV_PhaseShift270 = PV_PhaseShift270 {+pv_PhaseShift270 :: PV_PhaseShift270+pv_PhaseShift270 = PV_PhaseShift270 { buffer = 0.0 } mkPV_PhaseShift270 :: PV_PhaseShift270 -> S.UGen
Sound/SC3/UGen/Record/PV_PhaseShift90.hs view
@@ -5,8 +5,8 @@ data PV_PhaseShift90 = PV_PhaseShift90 { buffer :: S.UGen } deriving (Show)-pV_PhaseShift90 :: PV_PhaseShift90-pV_PhaseShift90 = PV_PhaseShift90 {+pv_PhaseShift90 :: PV_PhaseShift90+pv_PhaseShift90 = PV_PhaseShift90 { buffer = 0.0 } mkPV_PhaseShift90 :: PV_PhaseShift90 -> S.UGen
Sound/SC3/UGen/Record/PV_PitchShift.hs view
@@ -6,8 +6,8 @@ buffer :: S.UGen, ratio :: S.UGen } deriving (Show)-pV_PitchShift :: PV_PitchShift-pV_PitchShift = PV_PitchShift {+pv_PitchShift :: PV_PitchShift+pv_PitchShift = PV_PitchShift { buffer = 0.0, ratio = 0.0 }
Sound/SC3/UGen/Record/PV_PlayBuf.hs view
@@ -5,15 +5,15 @@ data PV_PlayBuf = PV_PlayBuf { buffer :: S.UGen, playbuf :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, offset :: S.UGen, loop :: S.UGen } deriving (Show)-pV_PlayBuf :: PV_PlayBuf-pV_PlayBuf = PV_PlayBuf {+pv_PlayBuf :: PV_PlayBuf+pv_PlayBuf = PV_PlayBuf { buffer = 0.0, playbuf = 0.0,- rate = 1.0,+ rate_ = 1.0, offset = 0.0, loop = 0.0 }
Sound/SC3/UGen/Record/PV_RandComb.hs view
@@ -7,8 +7,8 @@ wipe :: S.UGen, trig :: S.UGen } deriving (Show)-pV_RandComb :: PV_RandComb-pV_RandComb = PV_RandComb {+pv_RandComb :: PV_RandComb+pv_RandComb = PV_RandComb { buffer = 0.0, wipe = 0.0, trig = 0.0
Sound/SC3/UGen/Record/PV_RandWipe.hs view
@@ -8,8 +8,8 @@ wipe :: S.UGen, trig :: S.UGen } deriving (Show)-pV_RandWipe :: PV_RandWipe-pV_RandWipe = PV_RandWipe {+pv_RandWipe :: PV_RandWipe+pv_RandWipe = PV_RandWipe { bufferA = 0.0, bufferB = 0.0, wipe = 0.0,
Sound/SC3/UGen/Record/PV_RecordBuf.hs view
@@ -11,8 +11,8 @@ hop :: S.UGen, wintype :: S.UGen } deriving (Show)-pV_RecordBuf :: PV_RecordBuf-pV_RecordBuf = PV_RecordBuf {+pv_RecordBuf :: PV_RecordBuf+pv_RecordBuf = PV_RecordBuf { buffer = 0.0, recbuf = 0.0, offset = 0.0,
Sound/SC3/UGen/Record/PV_RectComb.hs view
@@ -8,8 +8,8 @@ phase :: S.UGen, width :: S.UGen } deriving (Show)-pV_RectComb :: PV_RectComb-pV_RectComb = PV_RectComb {+pv_RectComb :: PV_RectComb+pv_RectComb = PV_RectComb { buffer = 0.0, numTeeth = 0.0, phase = 0.0,
Sound/SC3/UGen/Record/PV_RectComb2.hs view
@@ -9,8 +9,8 @@ phase :: S.UGen, width :: S.UGen } deriving (Show)-pV_RectComb2 :: PV_RectComb2-pV_RectComb2 = PV_RectComb2 {+pv_RectComb2 :: PV_RectComb2+pv_RectComb2 = PV_RectComb2 { bufferA = 0.0, bufferB = 0.0, numTeeth = 0.0,
Sound/SC3/UGen/Record/PV_SoftWipe.hs view
@@ -7,8 +7,8 @@ bufferB :: S.UGen, wipe :: S.UGen } deriving (Show)-pV_SoftWipe :: PV_SoftWipe-pV_SoftWipe = PV_SoftWipe {+pv_SoftWipe :: PV_SoftWipe+pv_SoftWipe = PV_SoftWipe { bufferA = 0.0, bufferB = 0.0, wipe = 0.0
Sound/SC3/UGen/Record/PV_SpectralEnhance.hs view
@@ -8,8 +8,8 @@ ratio :: S.UGen, strength :: S.UGen } deriving (Show)-pV_SpectralEnhance :: PV_SpectralEnhance-pV_SpectralEnhance = PV_SpectralEnhance {+pv_SpectralEnhance :: PV_SpectralEnhance+pv_SpectralEnhance = PV_SpectralEnhance { buffer = 0.0, numPartials = 8.0, ratio = 2.0,
Sound/SC3/UGen/Record/PV_SpectralMap.hs view
@@ -5,17 +5,17 @@ data PV_SpectralMap = PV_SpectralMap { buffer :: S.UGen, specBuffer :: S.UGen,- floor :: S.UGen,+ floor_ :: S.UGen, freeze :: S.UGen, mode :: S.UGen, norm :: S.UGen, window :: S.UGen } deriving (Show)-pV_SpectralMap :: PV_SpectralMap-pV_SpectralMap = PV_SpectralMap {+pv_SpectralMap :: PV_SpectralMap+pv_SpectralMap = PV_SpectralMap { buffer = 0.0, specBuffer = 0.0,- floor = 0.0,+ floor_ = 0.0, freeze = 0.0, mode = 0.0, norm = 0.0,
Sound/SC3/UGen/Record/PV_Whiten.hs view
@@ -6,16 +6,16 @@ chain :: S.UGen, trackbufnum :: S.UGen, relaxtime :: S.UGen,- floor :: S.UGen,+ floor_ :: S.UGen, smear :: S.UGen, bindownsample :: S.UGen } deriving (Show)-pV_Whiten :: PV_Whiten-pV_Whiten = PV_Whiten {+pv_Whiten :: PV_Whiten+pv_Whiten = PV_Whiten { chain = 0.0, trackbufnum = 0.0, relaxtime = 2.0,- floor = 0.1,+ floor_ = 0.1, smear = 0.0, bindownsample = 0.0 }
Sound/SC3/UGen/Record/PV_XFade.hs view
@@ -7,8 +7,8 @@ bufferB :: S.UGen, fade :: S.UGen } deriving (Show)-pV_XFade :: PV_XFade-pV_XFade = PV_XFade {+pv_XFade :: PV_XFade+pv_XFade = PV_XFade { bufferA = 0.0, bufferB = 0.0, fade = 0.0
Sound/SC3/UGen/Record/Pan2.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data Pan2 = Pan2 { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, pos :: S.UGen, level :: S.UGen } deriving (Show) pan2 :: Pan2 pan2 = Pan2 { rate = S.AR,- in = 0.0,+ input = 0.0, pos = 0.0, level = 1.0 }
Sound/SC3/UGen/Record/Pan4.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data Pan4 = Pan4 { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, xpos :: S.UGen, ypos :: S.UGen, level :: S.UGen@@ -12,7 +12,7 @@ pan4 :: Pan4 pan4 = Pan4 { rate = S.AR,- in = 0.0,+ input = 0.0, xpos = 0.0, ypos = 0.0, level = 1.0
Sound/SC3/UGen/Record/PanAz.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data PanAz = PanAz { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, pos :: S.UGen, level :: S.UGen, width :: S.UGen,@@ -13,7 +13,7 @@ panAz :: PanAz panAz = PanAz { rate = S.AR,- in = 0.0,+ input = 0.0, pos = 0.0, level = 1.0, width = 2.0,
Sound/SC3/UGen/Record/PanB.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data PanB = PanB { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, azimuth :: S.UGen, elevation :: S.UGen, gain :: S.UGen@@ -12,7 +12,7 @@ panB :: PanB panB = PanB { rate = S.AR,- in = 0.0,+ input = 0.0, azimuth = 0.0, elevation = 0.0, gain = 1.0
Sound/SC3/UGen/Record/PanB2.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data PanB2 = PanB2 { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, azimuth :: S.UGen, gain :: S.UGen } deriving (Show) panB2 :: PanB2 panB2 = PanB2 { rate = S.AR,- in = 0.0,+ input = 0.0, azimuth = 0.0, gain = 1.0 }
Sound/SC3/UGen/Record/PanX.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data PanX = PanX { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, pos :: S.UGen, level :: S.UGen, width :: S.UGen@@ -12,7 +12,7 @@ panX :: PanX panX = PanX { rate = S.AR,- in = 0.0,+ input = 0.0, pos = 0.0, level = 1.0, width = 2.0
Sound/SC3/UGen/Record/PanX2D.hs view
@@ -6,7 +6,7 @@ rate :: S.Rate, numChansX :: S.UGen, numChansY :: S.UGen,- in :: S.UGen,+ input :: S.UGen, posX :: S.UGen, posY :: S.UGen, level :: S.UGen,@@ -18,7 +18,7 @@ rate = S.AR, numChansX = 0.0, numChansY = 0.0,- in = 0.0,+ input = 0.0, posX = 0.0, posY = 0.0, level = 1.0,
Sound/SC3/UGen/Record/PartConv.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data PartConv = PartConv {- in :: S.UGen,+ input :: S.UGen, fftsize :: S.UGen, irbufnum :: S.UGen } deriving (Show) partConv :: PartConv partConv = PartConv {- in = 0.0,+ input = 0.0, fftsize = 0.0, irbufnum = 0.0 }
Sound/SC3/UGen/Record/Pause.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data Pause = Pause { gate :: S.UGen,- id :: S.UGen+ id_ :: S.UGen } deriving (Show) pause :: Pause pause = Pause { gate = 0.0,- id = 0.0+ id_ = 0.0 } mkPause :: Pause -> S.UGen mkPause (Pause a' b') = S.mkOsc S.KR "Pause" [a',b'] 1
Sound/SC3/UGen/Record/PauseSelf.hs view
@@ -3,11 +3,11 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data PauseSelf = PauseSelf {- in :: S.UGen+ input :: S.UGen } deriving (Show) pauseSelf :: PauseSelf pauseSelf = PauseSelf {- in = 0.0+ input = 0.0 } mkPauseSelf :: PauseSelf -> S.UGen mkPauseSelf (PauseSelf a') = S.mkOsc S.KR "PauseSelf" [a'] 1
Sound/SC3/UGen/Record/Peak.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data Peak = Peak { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, trig :: S.UGen } deriving (Show) peak :: Peak peak = Peak { rate = S.AR,- in = 0.0,+ input = 0.0, trig = 0.0 } mkPeak :: Peak -> S.UGen
Sound/SC3/UGen/Record/PeakEQ2.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data PeakEQ2 = PeakEQ2 {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rs :: S.UGen, db :: S.UGen } deriving (Show) peakEQ2 :: PeakEQ2 peakEQ2 = PeakEQ2 {- in = 0.0,+ input = 0.0, freq = 1200.0, rs = 1.0, db = 0.0
Sound/SC3/UGen/Record/PeakEQ4.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data PeakEQ4 = PeakEQ4 {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rs :: S.UGen, db :: S.UGen } deriving (Show) peakEQ4 :: PeakEQ4 peakEQ4 = PeakEQ4 {- in = 0.0,+ input = 0.0, freq = 1200.0, rs = 1.0, db = 0.0
Sound/SC3/UGen/Record/PeakFollower.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data PeakFollower = PeakFollower { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, decay :: S.UGen } deriving (Show) peakFollower :: PeakFollower peakFollower = PeakFollower { rate = S.AR,- in = 0.0,+ input = 0.0, decay = 0.999 } mkPeakFollower :: PeakFollower -> S.UGen
Sound/SC3/UGen/Record/Phasor.hs view
@@ -5,7 +5,7 @@ data Phasor = Phasor { rate :: S.Rate, trig :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, start :: S.UGen, end :: S.UGen, resetPos :: S.UGen@@ -14,7 +14,7 @@ phasor = Phasor { rate = S.AR, trig = 0.0,- rate = 1.0,+ rate_ = 1.0, start = 0.0, end = 1.0, resetPos = 0.0
Sound/SC3/UGen/Record/Pitch.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Pitch = Pitch {- in :: S.UGen,+ input :: S.UGen, initFreq :: S.UGen, minFreq :: S.UGen, maxFreq :: S.UGen,@@ -17,7 +17,7 @@ } deriving (Show) pitch :: Pitch pitch = Pitch {- in = 0.0,+ input = 0.0, initFreq = 440.0, minFreq = 60.0, maxFreq = 4000.0,
Sound/SC3/UGen/Record/PitchShift.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data PitchShift = PitchShift {- in :: S.UGen,+ input :: S.UGen, windowSize :: S.UGen, pitchRatio :: S.UGen, pitchDispersion :: S.UGen,@@ -11,7 +11,7 @@ } deriving (Show) pitchShift :: PitchShift pitchShift = PitchShift {- in = 0.0,+ input = 0.0, windowSize = 0.2, pitchRatio = 1.0, pitchDispersion = 0.0,
Sound/SC3/UGen/Record/PlaneTree.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data PlaneTree = PlaneTree { treebuf :: S.UGen,- in :: S.UGen,+ input :: S.UGen, gate :: S.UGen } deriving (Show) planeTree :: PlaneTree planeTree = PlaneTree { treebuf = 0.0,- in = 0.0,+ input = 0.0, gate = 1.0 } mkPlaneTree :: PlaneTree -> S.UGen
Sound/SC3/UGen/Record/PlayBuf.hs view
@@ -5,7 +5,7 @@ data PlayBuf = PlayBuf { rate :: S.Rate, bufnum :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, trigger :: S.UGen, startPos :: S.UGen, loop :: S.UGen,@@ -15,7 +15,7 @@ playBuf = PlayBuf { rate = S.AR, bufnum = 0.0,- rate = 1.0,+ rate_ = 1.0, trigger = 1.0, startPos = 0.0, loop = 0.0,
Sound/SC3/UGen/Record/Pluck.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Pluck = Pluck {- in :: S.UGen,+ input :: S.UGen, trig :: S.UGen, maxdelaytime :: S.UGen, delaytime :: S.UGen,@@ -12,7 +12,7 @@ } deriving (Show) pluck :: Pluck pluck = Pluck {- in = 0.0,+ input = 0.0, trig = 1.0, maxdelaytime = 0.2, delaytime = 0.2,
Sound/SC3/UGen/Record/PosRatio.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data PosRatio = PosRatio {- in :: S.UGen,+ input :: S.UGen, period :: S.UGen, thresh :: S.UGen } deriving (Show) posRatio :: PosRatio posRatio = PosRatio {- in = 0.0,+ input = 0.0, period = 100.0, thresh = 0.1 }
Sound/SC3/UGen/Record/PrintVal.hs view
@@ -3,15 +3,15 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data PrintVal = PrintVal {- in :: S.UGen,+ input :: S.UGen, numblocks :: S.UGen,- id :: S.UGen+ id_ :: S.UGen } deriving (Show) printVal :: PrintVal printVal = PrintVal {- in = 0.0,+ input = 0.0, numblocks = 100.0,- id = 0.0+ id_ = 0.0 } mkPrintVal :: PrintVal -> S.UGen mkPrintVal (PrintVal a' b' c') = S.mkOsc S.KR "PrintVal" [a',b',c'] 1
Sound/SC3/UGen/Record/PulseDivider.hs view
@@ -5,14 +5,14 @@ data PulseDivider = PulseDivider { rate :: S.Rate, trig :: S.UGen,- div :: S.UGen,+ div_ :: S.UGen, start :: S.UGen } deriving (Show) pulseDivider :: PulseDivider pulseDivider = PulseDivider { rate = S.AR, trig = 0.0,- div = 2.0,+ div_ = 2.0, start = 0.0 } mkPulseDivider :: PulseDivider -> S.UGen
Sound/SC3/UGen/Record/Qitch.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Qitch = Qitch {- in :: S.UGen,+ input :: S.UGen, databufnum :: S.UGen, ampThreshold :: S.UGen, algoflag :: S.UGen,@@ -13,7 +13,7 @@ } deriving (Show) qitch :: Qitch qitch = Qitch {- in = 0.0,+ input = 0.0, databufnum = 0.0, ampThreshold = 0.01, algoflag = 1.0,
Sound/SC3/UGen/Record/RDelayMap.hs view
@@ -5,7 +5,7 @@ data RDelayMap = RDelayMap { rate :: S.Rate, bufnum :: S.UGen,- in :: S.UGen,+ input :: S.UGen, dynamic :: S.UGen, spec :: S.UGen } deriving (Show)@@ -13,7 +13,7 @@ rDelayMap = RDelayMap { rate = S.AR, bufnum = 0.0,- in = 0.0,+ input = 0.0, dynamic = 0.0, spec = 0.0 }
Sound/SC3/UGen/Record/RDelaySet.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data RDelaySet = RDelaySet { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, spec :: S.UGen } deriving (Show) rDelaySet :: RDelaySet rDelaySet = RDelaySet { rate = S.AR,- in = 0.0,+ input = 0.0, spec = 0.0 } mkRDelaySet :: RDelaySet -> S.UGen
Sound/SC3/UGen/Record/RDelaySetB.hs view
@@ -5,14 +5,14 @@ data RDelaySetB = RDelaySetB { rate :: S.Rate, bufnum :: S.UGen,- in :: S.UGen,+ input :: S.UGen, spec :: S.UGen } deriving (Show) rDelaySetB :: RDelaySetB rDelaySetB = RDelaySetB { rate = S.AR, bufnum = 0.0,- in = 0.0,+ input = 0.0, spec = 0.0 } mkRDelaySetB :: RDelaySetB -> S.UGen
Sound/SC3/UGen/Record/RHPF.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data RHPF = RHPF { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen } deriving (Show) rHPF :: RHPF rHPF = RHPF { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0, rq = 1.0 }
Sound/SC3/UGen/Record/RLPF.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data RLPF = RLPF { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen } deriving (Show) rLPF :: RLPF rLPF = RLPF { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0, rq = 1.0 }
Sound/SC3/UGen/Record/RLPFD.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data RLPFD = RLPFD { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, ffreq :: S.UGen, res :: S.UGen, dist :: S.UGen@@ -12,7 +12,7 @@ rLPFD :: RLPFD rLPFD = RLPFD { rate = S.AR,- in = 0.0,+ input = 0.0, ffreq = 440.0, res = 0.0, dist = 0.0
Sound/SC3/UGen/Record/RMEQ.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data RMEQ = RMEQ {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen, k :: S.UGen } deriving (Show) rMEQ :: RMEQ rMEQ = RMEQ {- in = 0.0,+ input = 0.0, freq = 440.0, rq = 0.1, k = 0.0
Sound/SC3/UGen/Record/RMShelf.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data RMShelf = RMShelf {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, k :: S.UGen } deriving (Show) rMShelf :: RMShelf rMShelf = RMShelf {- in = 0.0,+ input = 0.0, freq = 440.0, k = 0.0 }
Sound/SC3/UGen/Record/RMShelf2.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data RMShelf2 = RMShelf2 {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, k :: S.UGen } deriving (Show) rMShelf2 :: RMShelf2 rMShelf2 = RMShelf2 {- in = 0.0,+ input = 0.0, freq = 440.0, k = 0.0 }
Sound/SC3/UGen/Record/RPlayTrace.hs view
@@ -6,7 +6,7 @@ rate :: S.Rate, bufnum :: S.UGen, degree :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, axis :: S.UGen } deriving (Show) rPlayTrace :: RPlayTrace@@ -14,7 +14,7 @@ rate = S.AR, bufnum = 0.0, degree = 4.0,- rate = 0.0,+ rate_ = 0.0, axis = 1.0 } mkRPlayTrace :: RPlayTrace -> S.UGen
Sound/SC3/UGen/Record/RShufflerL.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data RShufflerL = RShufflerL { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, fragmentSize :: S.UGen, maxDelay :: S.UGen } deriving (Show) rShufflerL :: RShufflerL rShufflerL = RShufflerL { rate = S.AR,- in = 0.0,+ input = 0.0, fragmentSize = 0.01, maxDelay = 0.01 }
Sound/SC3/UGen/Record/Ramp.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data Ramp = Ramp { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, lagTime :: S.UGen } deriving (Show) ramp :: Ramp ramp = Ramp { rate = S.AR,- in = 0.0,+ input = 0.0, lagTime = 0.1 } mkRamp :: Ramp -> S.UGen
Sound/SC3/UGen/Record/RandID.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data RandID = RandID { rate :: S.Rate,- id :: S.UGen+ id_ :: S.UGen } deriving (Show) randID :: RandID randID = RandID { rate = S.AR,- id = 0.0+ id_ = 0.0 } mkRandID :: RandID -> S.UGen mkRandID (RandID r a') = S.mkOsc r "RandID" [a'] 1
Sound/SC3/UGen/Record/RedDPCMdecode.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data RedDPCMdecode = RedDPCMdecode { rate :: S.Rate,- in :: S.UGen+ input :: S.UGen } deriving (Show) redDPCMdecode :: RedDPCMdecode redDPCMdecode = RedDPCMdecode { rate = S.AR,- in = 0.0+ input = 0.0 } mkRedDPCMdecode :: RedDPCMdecode -> S.UGen mkRedDPCMdecode (RedDPCMdecode r a') = S.mkOsc r "RedDPCMdecode" [a'] 1
Sound/SC3/UGen/Record/RedDPCMencode.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data RedDPCMencode = RedDPCMencode { rate :: S.Rate,- in :: S.UGen,- round :: S.UGen+ input :: S.UGen,+ round_ :: S.UGen } deriving (Show) redDPCMencode :: RedDPCMencode redDPCMencode = RedDPCMencode { rate = S.AR,- in = 0.0,- round = 0.0+ input = 0.0,+ round_ = 0.0 } mkRedDPCMencode :: RedDPCMencode -> S.UGen mkRedDPCMencode (RedDPCMencode r a' b') = S.mkOsc r "RedDPCMencode" [a',b'] 1
Sound/SC3/UGen/Record/RedLbyl.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data RedLbyl = RedLbyl { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, thresh :: S.UGen, samples :: S.UGen } deriving (Show) redLbyl :: RedLbyl redLbyl = RedLbyl { rate = S.AR,- in = 0.0,+ input = 0.0, thresh = 0.5, samples = 2.0 }
Sound/SC3/UGen/Record/RedPhasor.hs view
@@ -5,7 +5,7 @@ data RedPhasor = RedPhasor { rate :: S.Rate, trig :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, start :: S.UGen, end :: S.UGen, loop :: S.UGen,@@ -16,7 +16,7 @@ redPhasor = RedPhasor { rate = S.AR, trig = 0.0,- rate = 1.0,+ rate_ = 1.0, start = 0.0, end = 1.0, loop = 0.0,
Sound/SC3/UGen/Record/RedPhasor2.hs view
@@ -5,7 +5,7 @@ data RedPhasor2 = RedPhasor2 { rate :: S.Rate, trig :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, start :: S.UGen, end :: S.UGen, loop :: S.UGen,@@ -16,7 +16,7 @@ redPhasor2 = RedPhasor2 { rate = S.AR, trig = 0.0,- rate = 1.0,+ rate_ = 1.0, start = 0.0, end = 1.0, loop = 0.0,
Sound/SC3/UGen/Record/RegaliaMitraEQ.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data RegaliaMitraEQ = RegaliaMitraEQ {- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, rq :: S.UGen, k :: S.UGen } deriving (Show) regaliaMitraEQ :: RegaliaMitraEQ regaliaMitraEQ = RegaliaMitraEQ {- in = 0.0,+ input = 0.0, freq = 440.0, rq = 0.1, k = 0.0
Sound/SC3/UGen/Record/ReplaceOut.hs view
@@ -5,13 +5,13 @@ data ReplaceOut = ReplaceOut { rate :: S.Rate, bus :: S.UGen,- channelsArray :: S.UGen+ input :: S.UGen } deriving (Show) replaceOut :: ReplaceOut replaceOut = ReplaceOut { rate = S.AR, bus = 0.0,- channelsArray = 0.0+ input = 0.0 } mkReplaceOut :: ReplaceOut -> S.UGen mkReplaceOut (ReplaceOut r a' b') = S.mkOsc r "ReplaceOut" [a',b'] 1
Sound/SC3/UGen/Record/Resonz.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data Resonz = Resonz { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, bwr :: S.UGen } deriving (Show) resonz :: Resonz resonz = Resonz { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0, bwr = 1.0 }
Sound/SC3/UGen/Record/Ringz.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data Ringz = Ringz { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, freq :: S.UGen, decaytime :: S.UGen } deriving (Show) ringz :: Ringz ringz = Ringz { rate = S.AR,- in = 0.0,+ input = 0.0, freq = 440.0, decaytime = 1.0 }
Sound/SC3/UGen/Record/RosslerResL.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data RosslerResL = RosslerResL {- in :: S.UGen,+ input :: S.UGen, stiff :: S.UGen, freq :: S.UGen, a :: S.UGen,@@ -16,7 +16,7 @@ } deriving (Show) rosslerResL :: RosslerResL rosslerResL = RosslerResL {- in = 0.0,+ input = 0.0, stiff = 1.0, freq = 22050.0, a = 0.2,
Sound/SC3/UGen/Record/Rotate.hs view
@@ -7,7 +7,7 @@ x :: S.UGen, y :: S.UGen, z :: S.UGen,- rotate :: S.UGen+ rotate_ :: S.UGen } deriving (Show) rotate :: Rotate rotate = Rotate {@@ -15,7 +15,7 @@ x = 0.0, y = 0.0, z = 0.0,- rotate = 0.0+ rotate_ = 0.0 } mkRotate :: Rotate -> S.UGen mkRotate (Rotate a' b' c' d' e') = S.mkOsc S.AR "Rotate" [a',b',c',d',e'] 4
Sound/SC3/UGen/Record/RunningMax.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data RunningMax = RunningMax { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, trig :: S.UGen } deriving (Show) runningMax :: RunningMax runningMax = RunningMax { rate = S.AR,- in = 0.0,+ input = 0.0, trig = 0.0 } mkRunningMax :: RunningMax -> S.UGen
Sound/SC3/UGen/Record/RunningMin.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data RunningMin = RunningMin { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, trig :: S.UGen } deriving (Show) runningMin :: RunningMin runningMin = RunningMin { rate = S.AR,- in = 0.0,+ input = 0.0, trig = 0.0 } mkRunningMin :: RunningMin -> S.UGen
Sound/SC3/UGen/Record/RunningSum.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data RunningSum = RunningSum { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, numsamp :: S.UGen } deriving (Show) runningSum :: RunningSum runningSum = RunningSum { rate = S.AR,- in = 0.0,+ input = 0.0, numsamp = 40.0 } mkRunningSum :: RunningSum -> S.UGen
Sound/SC3/UGen/Record/SID6581f.hs view
@@ -28,7 +28,7 @@ fcHi :: S.UGen, resFilt :: S.UGen, modeVol :: S.UGen,- rate :: S.UGen+ rate_ :: S.UGen } deriving (Show) sID6581f :: SID6581f sID6581f = SID6581f {@@ -57,7 +57,7 @@ fcHi = 0.0, resFilt = 0.0, modeVol = 0.0,- rate = 1.0+ rate_ = 1.0 } mkSID6581f :: SID6581f -> S.UGen mkSID6581f (SID6581f a' b' c' d' e' f' g' h' i' j' k' l' m' n' o' p' q' r' s' t' u' v' w' x' y' z') = S.mkOsc S.AR "SID6581f" [a',b',c',d',e',f',g',h',i',j',k',l',m',n',o',p',q',r',s',t',u',v',w',x',y',z'] 1
Sound/SC3/UGen/Record/SMS.hs view
@@ -15,8 +15,8 @@ ampmult :: S.UGen, graphicsbufnum :: S.UGen } deriving (Show)-sMS :: SMS-sMS = SMS {+sms :: SMS+sms = SMS { input = 0.0, maxpeaks = 80.0, currentpeaks = 80.0,
Sound/SC3/UGen/Record/SN76489.hs view
@@ -11,7 +11,7 @@ vol1 :: S.UGen, vol2 :: S.UGen, vol3 :: S.UGen,- rate :: S.UGen+ rate_ :: S.UGen } deriving (Show) sN76489 :: SN76489 sN76489 = SN76489 {@@ -23,7 +23,7 @@ vol1 = 0.0, vol2 = 0.0, vol3 = 0.0,- rate = 1.0+ rate_ = 1.0 } mkSN76489 :: SN76489 -> S.UGen mkSN76489 (SN76489 a' b' c' d' e' f' g' h' i') = S.mkOsc S.AR "SN76489" [a',b',c',d',e',f',g',h',i'] 1
Sound/SC3/UGen/Record/SOS.hs view
@@ -4,17 +4,17 @@ import Sound.SC3.UGen.Record data SOS = SOS { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, a0 :: S.UGen, a1 :: S.UGen, a2 :: S.UGen, b1 :: S.UGen, b2 :: S.UGen } deriving (Show)-sOS :: SOS-sOS = SOS {+sos :: SOS+sos = SOS { rate = S.AR,- in = 0.0,+ input = 0.0, a0 = 0.0, a1 = 0.0, a2 = 0.0,
Sound/SC3/UGen/Record/SVF.hs view
@@ -13,8 +13,8 @@ notch :: S.UGen, peak :: S.UGen } deriving (Show)-sVF :: SVF-sVF = SVF {+svf :: SVF+svf = SVF { rate = S.AR, signal = 0.0, cutoff = 2200.0,
Sound/SC3/UGen/Record/Schmidt.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data Schmidt = Schmidt { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, lo :: S.UGen, hi :: S.UGen } deriving (Show) schmidt :: Schmidt schmidt = Schmidt { rate = S.AR,- in = 0.0,+ input = 0.0, lo = 0.0, hi = 1.0 }
Sound/SC3/UGen/Record/SendTrig.hs view
@@ -4,15 +4,15 @@ import Sound.SC3.UGen.Record data SendTrig = SendTrig { rate :: S.Rate,- in :: S.UGen,- id :: S.UGen,+ input :: S.UGen,+ id_ :: S.UGen, value :: S.UGen } deriving (Show) sendTrig :: SendTrig sendTrig = SendTrig { rate = S.AR,- in = 0.0,- id = 0.0,+ input = 0.0,+ id_ = 0.0, value = 0.0 } mkSendTrig :: SendTrig -> S.UGen
Sound/SC3/UGen/Record/Shaper.hs view
@@ -5,13 +5,13 @@ data Shaper = Shaper { rate :: S.Rate, bufnum :: S.UGen,- in :: S.UGen+ input :: S.UGen } deriving (Show) shaper :: Shaper shaper = Shaper { rate = S.AR, bufnum = 0.0,- in = 0.0+ input = 0.0 } mkShaper :: Shaper -> S.UGen mkShaper (Shaper r a' b') = S.mkOsc r "Shaper" [a',b'] 1
Sound/SC3/UGen/Record/SineShaper.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data SineShaper = SineShaper {- in :: S.UGen,+ input :: S.UGen, limit :: S.UGen } deriving (Show) sineShaper :: SineShaper sineShaper = SineShaper {- in = 0.0,+ input = 0.0, limit = 1.0 } mkSineShaper :: SineShaper -> S.UGen
Sound/SC3/UGen/Record/SkipNeedle.hs view
@@ -4,13 +4,13 @@ import Sound.SC3.UGen.Record data SkipNeedle = SkipNeedle { range :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, offset :: S.UGen } deriving (Show) skipNeedle :: SkipNeedle skipNeedle = SkipNeedle { range = 44100.0,- rate = 10.0,+ rate_ = 10.0, offset = 0.0 } mkSkipNeedle :: SkipNeedle -> S.UGen
Sound/SC3/UGen/Record/Slew.hs view
@@ -4,14 +4,14 @@ import Sound.SC3.UGen.Record data Slew = Slew { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, up :: S.UGen, dn :: S.UGen } deriving (Show) slew :: Slew slew = Slew { rate = S.AR,- in = 0.0,+ input = 0.0, up = 1.0, dn = 1.0 }
Sound/SC3/UGen/Record/Slope.hs view
@@ -4,12 +4,12 @@ import Sound.SC3.UGen.Record data Slope = Slope { rate :: S.Rate,- in :: S.UGen+ input :: S.UGen } deriving (Show) slope :: Slope slope = Slope { rate = S.AR,- in = 0.0+ input = 0.0 } mkSlope :: Slope -> S.UGen mkSlope (Slope r a') = S.mkOsc r "Slope" [a'] 1
Sound/SC3/UGen/Record/SmoothDecimator.hs view
@@ -3,14 +3,14 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data SmoothDecimator = SmoothDecimator {- in :: S.UGen,- rate :: S.UGen,+ input :: S.UGen,+ rate_ :: S.UGen, smoothing :: S.UGen } deriving (Show) smoothDecimator :: SmoothDecimator smoothDecimator = SmoothDecimator {- in = 0.0,- rate = 44100.0,+ input = 0.0,+ rate_ = 44100.0, smoothing = 0.5 } mkSmoothDecimator :: SmoothDecimator -> S.UGen
Sound/SC3/UGen/Record/SoftClipAmp.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data SoftClipAmp = SoftClipAmp {- in :: S.UGen,+ input :: S.UGen, pregain :: S.UGen } deriving (Show) softClipAmp :: SoftClipAmp softClipAmp = SoftClipAmp {- in = 0.0,+ input = 0.0, pregain = 1.0 } mkSoftClipAmp :: SoftClipAmp -> S.UGen
Sound/SC3/UGen/Record/SoftClipAmp4.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data SoftClipAmp4 = SoftClipAmp4 {- in :: S.UGen,+ input :: S.UGen, pregain :: S.UGen } deriving (Show) softClipAmp4 :: SoftClipAmp4 softClipAmp4 = SoftClipAmp4 {- in = 0.0,+ input = 0.0, pregain = 1.0 } mkSoftClipAmp4 :: SoftClipAmp4 -> S.UGen
Sound/SC3/UGen/Record/SoftClipAmp8.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data SoftClipAmp8 = SoftClipAmp8 {- in :: S.UGen,+ input :: S.UGen, pregain :: S.UGen } deriving (Show) softClipAmp8 :: SoftClipAmp8 softClipAmp8 = SoftClipAmp8 {- in = 0.0,+ input = 0.0, pregain = 1.0 } mkSoftClipAmp8 :: SoftClipAmp8 -> S.UGen
Sound/SC3/UGen/Record/SoftClipper4.hs view
@@ -3,11 +3,11 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data SoftClipper4 = SoftClipper4 {- in :: S.UGen+ input :: S.UGen } deriving (Show) softClipper4 :: SoftClipper4 softClipper4 = SoftClipper4 {- in = 0.0+ input = 0.0 } mkSoftClipper4 :: SoftClipper4 -> S.UGen mkSoftClipper4 (SoftClipper4 a') = S.mkOsc S.AR "SoftClipper4" [a'] 1
Sound/SC3/UGen/Record/SoftClipper8.hs view
@@ -3,11 +3,11 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data SoftClipper8 = SoftClipper8 {- in :: S.UGen+ input :: S.UGen } deriving (Show) softClipper8 :: SoftClipper8 softClipper8 = SoftClipper8 {- in = 0.0+ input = 0.0 } mkSoftClipper8 :: SoftClipper8 -> S.UGen mkSoftClipper8 (SoftClipper8 a') = S.mkOsc S.AR "SoftClipper8" [a'] 1
Sound/SC3/UGen/Record/Spreader.hs view
@@ -3,13 +3,13 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data Spreader = Spreader {- in :: S.UGen,+ input :: S.UGen, theta :: S.UGen, filtsPerOctave :: S.UGen } deriving (Show) spreader :: Spreader spreader = Spreader {- in = 0.0,+ input = 0.0, theta = 1.5707963267949, filtsPerOctave = 8.0 }
Sound/SC3/UGen/Record/Spring.hs view
@@ -4,15 +4,15 @@ import Sound.SC3.UGen.Record data Spring = Spring { rate :: S.Rate,- in :: S.UGen,- spring :: S.UGen,+ input :: S.UGen,+ spring_ :: S.UGen, damp :: S.UGen } deriving (Show) spring :: Spring spring = Spring { rate = S.AR,- in = 0.0,- spring = 1.0,+ input = 0.0,+ spring_ = 1.0, damp = 0.0 } mkSpring :: Spring -> S.UGen
Sound/SC3/UGen/Record/SpruceBudworm.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data SpruceBudworm = SpruceBudworm { reset :: S.UGen,- rate :: S.UGen,+ rate_ :: S.UGen, k1 :: S.UGen, k2 :: S.UGen, alpha :: S.UGen,@@ -17,7 +17,7 @@ spruceBudworm :: SpruceBudworm spruceBudworm = SpruceBudworm { reset = 0.0,- rate = 0.1,+ rate_ = 0.1, k1 = 27.9, k2 = 1.5, alpha = 0.1,
Sound/SC3/UGen/Record/Squiz.hs view
@@ -4,7 +4,7 @@ import Sound.SC3.UGen.Record data Squiz = Squiz { rate :: S.Rate,- in :: S.UGen,+ input :: S.UGen, pitchratio :: S.UGen, zcperchunk :: S.UGen, memlen :: S.UGen@@ -12,7 +12,7 @@ squiz :: Squiz squiz = Squiz { rate = S.AR,- in = 0.0,+ input = 0.0, pitchratio = 2.0, zcperchunk = 1.0, memlen = 0.1
Sound/SC3/UGen/Record/Stepper.hs view
@@ -6,8 +6,8 @@ rate :: S.Rate, trig :: S.UGen, reset :: S.UGen,- min :: S.UGen,- max :: S.UGen,+ min_ :: S.UGen,+ max_ :: S.UGen, step :: S.UGen, resetval :: S.UGen } deriving (Show)@@ -16,8 +16,8 @@ rate = S.AR, trig = 0.0, reset = 0.0,- min = 0.0,- max = 7.0,+ min_ = 0.0,+ max_ = 7.0, step = 1.0, resetval = 0.0 }
Sound/SC3/UGen/Record/StereoConvolution2L.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data StereoConvolution2L = StereoConvolution2L {- in :: S.UGen,+ input :: S.UGen, kernelL :: S.UGen, kernelR :: S.UGen, trigger :: S.UGen,@@ -12,7 +12,7 @@ } deriving (Show) stereoConvolution2L :: StereoConvolution2L stereoConvolution2L = StereoConvolution2L {- in = 0.0,+ input = 0.0, kernelL = 0.0, kernelR = 0.0, trigger = 0.0,
Sound/SC3/UGen/Record/Sweep.hs view
@@ -5,13 +5,13 @@ data Sweep = Sweep { rate :: S.Rate, trig :: S.UGen,- rate :: S.UGen+ rate_ :: S.UGen } deriving (Show) sweep :: Sweep sweep = Sweep { rate = S.AR, trig = 0.0,- rate = 1.0+ rate_ = 1.0 } mkSweep :: Sweep -> S.UGen mkSweep (Sweep r a' b') = S.mkOsc r "Sweep" [a',b'] 1
Sound/SC3/UGen/Record/SwitchDelay.hs view
@@ -3,7 +3,7 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data SwitchDelay = SwitchDelay {- in :: S.UGen,+ input :: S.UGen, drylevel :: S.UGen, wetlevel :: S.UGen, delaytime :: S.UGen,@@ -12,7 +12,7 @@ } deriving (Show) switchDelay :: SwitchDelay switchDelay = SwitchDelay {- in = 0.0,+ input = 0.0, drylevel = 1.0, wetlevel = 1.0, delaytime = 1.0,
Sound/SC3/UGen/Record/T2A.hs view
@@ -3,12 +3,12 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data T2A = T2A {- in :: S.UGen,+ input :: S.UGen, offset :: S.UGen } deriving (Show) t2A :: T2A t2A = T2A {- in = 0.0,+ input = 0.0, offset = 0.0 } mkT2A :: T2A -> S.UGen
Sound/SC3/UGen/Record/T2K.hs view
@@ -3,11 +3,11 @@ import qualified Sound.SC3.UGen as S import Sound.SC3.UGen.Record data T2K = T2K {- in :: S.UGen+ input :: S.UGen } deriving (Show) t2K :: T2K t2K = T2K {- in = 0.0+ input = 0.0 } mkT2K :: T2K -> S.UGen mkT2K (T2K a') = S.mkOsc S.KR "T2K" [a'] 1
Sound/SC3/UGen/Record/TBall.hs view
file too large to diff
Sound/SC3/UGen/Record/TDelay.hs view
file too large to diff
Sound/SC3/UGen/Record/TGrains.hs view
file too large to diff
Sound/SC3/UGen/Record/TGrains2.hs view
file too large to diff
Sound/SC3/UGen/Record/TGrains3.hs view
file too large to diff
Sound/SC3/UGen/Record/TPV.hs view
file too large to diff
Sound/SC3/UGen/Record/TWindex.hs view
file too large to diff
Sound/SC3/UGen/Record/Tartini.hs view
file too large to diff
Sound/SC3/UGen/Record/Tilt.hs view
file too large to diff
Sound/SC3/UGen/Record/Trig.hs view
file too large to diff
Sound/SC3/UGen/Record/Trig1.hs view
file too large to diff
Sound/SC3/UGen/Record/TrigAvg.hs view
file too large to diff
Sound/SC3/UGen/Record/TwoPole.hs view
file too large to diff
Sound/SC3/UGen/Record/TwoZero.hs view
file too large to diff
Sound/SC3/UGen/Record/VBAP.hs view
file too large to diff
Sound/SC3/UGen/Record/VDiskIn.hs view
file too large to diff
Sound/SC3/UGen/Record/VarLag.hs view
file too large to diff
Sound/SC3/UGen/Record/Vibrato.hs view
file too large to diff
Sound/SC3/UGen/Record/WAmp.hs view
file too large to diff
Sound/SC3/UGen/Record/WaveLoss.hs view
file too large to diff
Sound/SC3/UGen/Record/Wrap.hs view
file too large to diff
Sound/SC3/UGen/Record/WrapIndex.hs view
file too large to diff
Sound/SC3/UGen/Record/WrapSummer.hs view
file too large to diff
Sound/SC3/UGen/Record/XOut.hs view
file too large to diff
Sound/SC3/UGen/Record/ZeroCrossing.hs view
file too large to diff
hsc3-rec.cabal view
file too large to diff
mk/build.hs view
file too large to diff