diff --git a/Sound/SC3/UGen/Record/A2K.hs b/Sound/SC3/UGen/Record/A2K.hs
--- a/Sound/SC3/UGen/Record/A2K.hs
+++ b/Sound/SC3/UGen/Record/A2K.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/APF.hs b/Sound/SC3/UGen/Record/APF.hs
--- a/Sound/SC3/UGen/Record/APF.hs
+++ b/Sound/SC3/UGen/Record/APF.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/AY.hs b/Sound/SC3/UGen/Record/AY.hs
--- a/Sound/SC3/UGen/Record/AY.hs
+++ b/Sound/SC3/UGen/Record/AY.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/AY8910.hs b/Sound/SC3/UGen/Record/AY8910.hs
--- a/Sound/SC3/UGen/Record/AY8910.hs
+++ b/Sound/SC3/UGen/Record/AY8910.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Allpass1.hs b/Sound/SC3/UGen/Record/Allpass1.hs
--- a/Sound/SC3/UGen/Record/Allpass1.hs
+++ b/Sound/SC3/UGen/Record/Allpass1.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Allpass2.hs b/Sound/SC3/UGen/Record/Allpass2.hs
--- a/Sound/SC3/UGen/Record/Allpass2.hs
+++ b/Sound/SC3/UGen/Record/Allpass2.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/AllpassC.hs b/Sound/SC3/UGen/Record/AllpassC.hs
--- a/Sound/SC3/UGen/Record/AllpassC.hs
+++ b/Sound/SC3/UGen/Record/AllpassC.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/AllpassL.hs b/Sound/SC3/UGen/Record/AllpassL.hs
--- a/Sound/SC3/UGen/Record/AllpassL.hs
+++ b/Sound/SC3/UGen/Record/AllpassL.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/AllpassN.hs b/Sound/SC3/UGen/Record/AllpassN.hs
--- a/Sound/SC3/UGen/Record/AllpassN.hs
+++ b/Sound/SC3/UGen/Record/AllpassN.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/AmpComp.hs b/Sound/SC3/UGen/Record/AmpComp.hs
--- a/Sound/SC3/UGen/Record/AmpComp.hs
+++ b/Sound/SC3/UGen/Record/AmpComp.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Amplitude.hs b/Sound/SC3/UGen/Record/Amplitude.hs
--- a/Sound/SC3/UGen/Record/Amplitude.hs
+++ b/Sound/SC3/UGen/Record/Amplitude.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/AmplitudeMod.hs b/Sound/SC3/UGen/Record/AmplitudeMod.hs
--- a/Sound/SC3/UGen/Record/AmplitudeMod.hs
+++ b/Sound/SC3/UGen/Record/AmplitudeMod.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/AnalyseEvents2.hs b/Sound/SC3/UGen/Record/AnalyseEvents2.hs
--- a/Sound/SC3/UGen/Record/AnalyseEvents2.hs
+++ b/Sound/SC3/UGen/Record/AnalyseEvents2.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Atari2600.hs b/Sound/SC3/UGen/Record/Atari2600.hs
--- a/Sound/SC3/UGen/Record/Atari2600.hs
+++ b/Sound/SC3/UGen/Record/Atari2600.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/AudioMSG.hs b/Sound/SC3/UGen/Record/AudioMSG.hs
--- a/Sound/SC3/UGen/Record/AudioMSG.hs
+++ b/Sound/SC3/UGen/Record/AudioMSG.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/AverageOutput.hs b/Sound/SC3/UGen/Record/AverageOutput.hs
--- a/Sound/SC3/UGen/Record/AverageOutput.hs
+++ b/Sound/SC3/UGen/Record/AverageOutput.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/BAllPass.hs b/Sound/SC3/UGen/Record/BAllPass.hs
--- a/Sound/SC3/UGen/Record/BAllPass.hs
+++ b/Sound/SC3/UGen/Record/BAllPass.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BBandPass.hs b/Sound/SC3/UGen/Record/BBandPass.hs
--- a/Sound/SC3/UGen/Record/BBandPass.hs
+++ b/Sound/SC3/UGen/Record/BBandPass.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BBandStop.hs b/Sound/SC3/UGen/Record/BBandStop.hs
--- a/Sound/SC3/UGen/Record/BBandStop.hs
+++ b/Sound/SC3/UGen/Record/BBandStop.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BFEncode1.hs b/Sound/SC3/UGen/Record/BFEncode1.hs
--- a/Sound/SC3/UGen/Record/BFEncode1.hs
+++ b/Sound/SC3/UGen/Record/BFEncode1.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/BFEncode2.hs b/Sound/SC3/UGen/Record/BFEncode2.hs
--- a/Sound/SC3/UGen/Record/BFEncode2.hs
+++ b/Sound/SC3/UGen/Record/BFEncode2.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/BHiPass.hs b/Sound/SC3/UGen/Record/BHiPass.hs
--- a/Sound/SC3/UGen/Record/BHiPass.hs
+++ b/Sound/SC3/UGen/Record/BHiPass.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BHiShelf.hs b/Sound/SC3/UGen/Record/BHiShelf.hs
--- a/Sound/SC3/UGen/Record/BHiShelf.hs
+++ b/Sound/SC3/UGen/Record/BHiShelf.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/BLowPass.hs b/Sound/SC3/UGen/Record/BLowPass.hs
--- a/Sound/SC3/UGen/Record/BLowPass.hs
+++ b/Sound/SC3/UGen/Record/BLowPass.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BLowShelf.hs b/Sound/SC3/UGen/Record/BLowShelf.hs
--- a/Sound/SC3/UGen/Record/BLowShelf.hs
+++ b/Sound/SC3/UGen/Record/BLowShelf.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/BMoog.hs b/Sound/SC3/UGen/Record/BMoog.hs
--- a/Sound/SC3/UGen/Record/BMoog.hs
+++ b/Sound/SC3/UGen/Record/BMoog.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/BPF.hs b/Sound/SC3/UGen/Record/BPF.hs
--- a/Sound/SC3/UGen/Record/BPF.hs
+++ b/Sound/SC3/UGen/Record/BPF.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BPZ2.hs b/Sound/SC3/UGen/Record/BPZ2.hs
--- a/Sound/SC3/UGen/Record/BPZ2.hs
+++ b/Sound/SC3/UGen/Record/BPZ2.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/BPeakEQ.hs b/Sound/SC3/UGen/Record/BPeakEQ.hs
--- a/Sound/SC3/UGen/Record/BPeakEQ.hs
+++ b/Sound/SC3/UGen/Record/BPeakEQ.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/BRF.hs b/Sound/SC3/UGen/Record/BRF.hs
--- a/Sound/SC3/UGen/Record/BRF.hs
+++ b/Sound/SC3/UGen/Record/BRF.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BRZ2.hs b/Sound/SC3/UGen/Record/BRZ2.hs
--- a/Sound/SC3/UGen/Record/BRZ2.hs
+++ b/Sound/SC3/UGen/Record/BRZ2.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Balance.hs b/Sound/SC3/UGen/Record/Balance.hs
--- a/Sound/SC3/UGen/Record/Balance.hs
+++ b/Sound/SC3/UGen/Record/Balance.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Ball.hs b/Sound/SC3/UGen/Record/Ball.hs
--- a/Sound/SC3/UGen/Record/Ball.hs
+++ b/Sound/SC3/UGen/Record/Ball.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Brusselator.hs b/Sound/SC3/UGen/Record/Brusselator.hs
--- a/Sound/SC3/UGen/Record/Brusselator.hs
+++ b/Sound/SC3/UGen/Record/Brusselator.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/BufAllpassC.hs b/Sound/SC3/UGen/Record/BufAllpassC.hs
--- a/Sound/SC3/UGen/Record/BufAllpassC.hs
+++ b/Sound/SC3/UGen/Record/BufAllpassC.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BufAllpassL.hs b/Sound/SC3/UGen/Record/BufAllpassL.hs
--- a/Sound/SC3/UGen/Record/BufAllpassL.hs
+++ b/Sound/SC3/UGen/Record/BufAllpassL.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BufAllpassN.hs b/Sound/SC3/UGen/Record/BufAllpassN.hs
--- a/Sound/SC3/UGen/Record/BufAllpassN.hs
+++ b/Sound/SC3/UGen/Record/BufAllpassN.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BufCombC.hs b/Sound/SC3/UGen/Record/BufCombC.hs
--- a/Sound/SC3/UGen/Record/BufCombC.hs
+++ b/Sound/SC3/UGen/Record/BufCombC.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BufCombL.hs b/Sound/SC3/UGen/Record/BufCombL.hs
--- a/Sound/SC3/UGen/Record/BufCombL.hs
+++ b/Sound/SC3/UGen/Record/BufCombL.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BufCombN.hs b/Sound/SC3/UGen/Record/BufCombN.hs
--- a/Sound/SC3/UGen/Record/BufCombN.hs
+++ b/Sound/SC3/UGen/Record/BufCombN.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BufDelayC.hs b/Sound/SC3/UGen/Record/BufDelayC.hs
--- a/Sound/SC3/UGen/Record/BufDelayC.hs
+++ b/Sound/SC3/UGen/Record/BufDelayC.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/BufDelayL.hs b/Sound/SC3/UGen/Record/BufDelayL.hs
--- a/Sound/SC3/UGen/Record/BufDelayL.hs
+++ b/Sound/SC3/UGen/Record/BufDelayL.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/BufDelayN.hs b/Sound/SC3/UGen/Record/BufDelayN.hs
--- a/Sound/SC3/UGen/Record/BufDelayN.hs
+++ b/Sound/SC3/UGen/Record/BufDelayN.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/BufGrain.hs b/Sound/SC3/UGen/Record/BufGrain.hs
--- a/Sound/SC3/UGen/Record/BufGrain.hs
+++ b/Sound/SC3/UGen/Record/BufGrain.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/BufGrainB.hs b/Sound/SC3/UGen/Record/BufGrainB.hs
--- a/Sound/SC3/UGen/Record/BufGrainB.hs
+++ b/Sound/SC3/UGen/Record/BufGrainB.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/BufGrainBBF.hs b/Sound/SC3/UGen/Record/BufGrainBBF.hs
--- a/Sound/SC3/UGen/Record/BufGrainBBF.hs
+++ b/Sound/SC3/UGen/Record/BufGrainBBF.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/BufGrainBF.hs b/Sound/SC3/UGen/Record/BufGrainBF.hs
--- a/Sound/SC3/UGen/Record/BufGrainBF.hs
+++ b/Sound/SC3/UGen/Record/BufGrainBF.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/BufGrainI.hs b/Sound/SC3/UGen/Record/BufGrainI.hs
--- a/Sound/SC3/UGen/Record/BufGrainI.hs
+++ b/Sound/SC3/UGen/Record/BufGrainI.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/BufGrainIBF.hs b/Sound/SC3/UGen/Record/BufGrainIBF.hs
--- a/Sound/SC3/UGen/Record/BufGrainIBF.hs
+++ b/Sound/SC3/UGen/Record/BufGrainIBF.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/CheckBadValues.hs b/Sound/SC3/UGen/Record/CheckBadValues.hs
--- a/Sound/SC3/UGen/Record/CheckBadValues.hs
+++ b/Sound/SC3/UGen/Record/CheckBadValues.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/CircleRamp.hs b/Sound/SC3/UGen/Record/CircleRamp.hs
--- a/Sound/SC3/UGen/Record/CircleRamp.hs
+++ b/Sound/SC3/UGen/Record/CircleRamp.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Clip.hs b/Sound/SC3/UGen/Record/Clip.hs
--- a/Sound/SC3/UGen/Record/Clip.hs
+++ b/Sound/SC3/UGen/Record/Clip.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Clipper32.hs b/Sound/SC3/UGen/Record/Clipper32.hs
--- a/Sound/SC3/UGen/Record/Clipper32.hs
+++ b/Sound/SC3/UGen/Record/Clipper32.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Clipper4.hs b/Sound/SC3/UGen/Record/Clipper4.hs
--- a/Sound/SC3/UGen/Record/Clipper4.hs
+++ b/Sound/SC3/UGen/Record/Clipper4.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Clipper8.hs b/Sound/SC3/UGen/Record/Clipper8.hs
--- a/Sound/SC3/UGen/Record/Clipper8.hs
+++ b/Sound/SC3/UGen/Record/Clipper8.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/CoinGate.hs b/Sound/SC3/UGen/Record/CoinGate.hs
--- a/Sound/SC3/UGen/Record/CoinGate.hs
+++ b/Sound/SC3/UGen/Record/CoinGate.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/CombC.hs b/Sound/SC3/UGen/Record/CombC.hs
--- a/Sound/SC3/UGen/Record/CombC.hs
+++ b/Sound/SC3/UGen/Record/CombC.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/CombL.hs b/Sound/SC3/UGen/Record/CombL.hs
--- a/Sound/SC3/UGen/Record/CombL.hs
+++ b/Sound/SC3/UGen/Record/CombL.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/CombLP.hs b/Sound/SC3/UGen/Record/CombLP.hs
--- a/Sound/SC3/UGen/Record/CombLP.hs
+++ b/Sound/SC3/UGen/Record/CombLP.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/CombN.hs b/Sound/SC3/UGen/Record/CombN.hs
--- a/Sound/SC3/UGen/Record/CombN.hs
+++ b/Sound/SC3/UGen/Record/CombN.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Compander.hs b/Sound/SC3/UGen/Record/Compander.hs
--- a/Sound/SC3/UGen/Record/Compander.hs
+++ b/Sound/SC3/UGen/Record/Compander.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/CompanderD.hs b/Sound/SC3/UGen/Record/CompanderD.hs
--- a/Sound/SC3/UGen/Record/CompanderD.hs
+++ b/Sound/SC3/UGen/Record/CompanderD.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Convolution.hs b/Sound/SC3/UGen/Record/Convolution.hs
--- a/Sound/SC3/UGen/Record/Convolution.hs
+++ b/Sound/SC3/UGen/Record/Convolution.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Convolution2.hs b/Sound/SC3/UGen/Record/Convolution2.hs
--- a/Sound/SC3/UGen/Record/Convolution2.hs
+++ b/Sound/SC3/UGen/Record/Convolution2.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Convolution2L.hs b/Sound/SC3/UGen/Record/Convolution2L.hs
--- a/Sound/SC3/UGen/Record/Convolution2L.hs
+++ b/Sound/SC3/UGen/Record/Convolution2L.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Convolution3.hs b/Sound/SC3/UGen/Record/Convolution3.hs
--- a/Sound/SC3/UGen/Record/Convolution3.hs
+++ b/Sound/SC3/UGen/Record/Convolution3.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Coyote.hs b/Sound/SC3/UGen/Record/Coyote.hs
--- a/Sound/SC3/UGen/Record/Coyote.hs
+++ b/Sound/SC3/UGen/Record/Coyote.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Crest.hs b/Sound/SC3/UGen/Record/Crest.hs
--- a/Sound/SC3/UGen/Record/Crest.hs
+++ b/Sound/SC3/UGen/Record/Crest.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/CrossoverDistortion.hs b/Sound/SC3/UGen/Record/CrossoverDistortion.hs
--- a/Sound/SC3/UGen/Record/CrossoverDistortion.hs
+++ b/Sound/SC3/UGen/Record/CrossoverDistortion.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/DC.hs b/Sound/SC3/UGen/Record/DC.hs
--- a/Sound/SC3/UGen/Record/DC.hs
+++ b/Sound/SC3/UGen/Record/DC.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/DFM1.hs b/Sound/SC3/UGen/Record/DFM1.hs
--- a/Sound/SC3/UGen/Record/DFM1.hs
+++ b/Sound/SC3/UGen/Record/DFM1.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Dbrown.hs b/Sound/SC3/UGen/Record/Dbrown.hs
--- a/Sound/SC3/UGen/Record/Dbrown.hs
+++ b/Sound/SC3/UGen/Record/Dbrown.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Dbrown2.hs b/Sound/SC3/UGen/Record/Dbrown2.hs
--- a/Sound/SC3/UGen/Record/Dbrown2.hs
+++ b/Sound/SC3/UGen/Record/Dbrown2.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Decay.hs b/Sound/SC3/UGen/Record/Decay.hs
--- a/Sound/SC3/UGen/Record/Decay.hs
+++ b/Sound/SC3/UGen/Record/Decay.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Decay2.hs b/Sound/SC3/UGen/Record/Decay2.hs
--- a/Sound/SC3/UGen/Record/Decay2.hs
+++ b/Sound/SC3/UGen/Record/Decay2.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Decimator.hs b/Sound/SC3/UGen/Record/Decimator.hs
--- a/Sound/SC3/UGen/Record/Decimator.hs
+++ b/Sound/SC3/UGen/Record/Decimator.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/DegreeToKey.hs b/Sound/SC3/UGen/Record/DegreeToKey.hs
--- a/Sound/SC3/UGen/Record/DegreeToKey.hs
+++ b/Sound/SC3/UGen/Record/DegreeToKey.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/DelTapWr.hs b/Sound/SC3/UGen/Record/DelTapWr.hs
--- a/Sound/SC3/UGen/Record/DelTapWr.hs
+++ b/Sound/SC3/UGen/Record/DelTapWr.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Delay1.hs b/Sound/SC3/UGen/Record/Delay1.hs
--- a/Sound/SC3/UGen/Record/Delay1.hs
+++ b/Sound/SC3/UGen/Record/Delay1.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Delay2.hs b/Sound/SC3/UGen/Record/Delay2.hs
--- a/Sound/SC3/UGen/Record/Delay2.hs
+++ b/Sound/SC3/UGen/Record/Delay2.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/DelayC.hs b/Sound/SC3/UGen/Record/DelayC.hs
--- a/Sound/SC3/UGen/Record/DelayC.hs
+++ b/Sound/SC3/UGen/Record/DelayC.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/DelayL.hs b/Sound/SC3/UGen/Record/DelayL.hs
--- a/Sound/SC3/UGen/Record/DelayL.hs
+++ b/Sound/SC3/UGen/Record/DelayL.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/DelayN.hs b/Sound/SC3/UGen/Record/DelayN.hs
--- a/Sound/SC3/UGen/Record/DelayN.hs
+++ b/Sound/SC3/UGen/Record/DelayN.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/DetectIndex.hs b/Sound/SC3/UGen/Record/DetectIndex.hs
--- a/Sound/SC3/UGen/Record/DetectIndex.hs
+++ b/Sound/SC3/UGen/Record/DetectIndex.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/DetectSilence.hs b/Sound/SC3/UGen/Record/DetectSilence.hs
--- a/Sound/SC3/UGen/Record/DetectSilence.hs
+++ b/Sound/SC3/UGen/Record/DetectSilence.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Dgauss.hs b/Sound/SC3/UGen/Record/Dgauss.hs
--- a/Sound/SC3/UGen/Record/Dgauss.hs
+++ b/Sound/SC3/UGen/Record/Dgauss.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Dgeom.hs b/Sound/SC3/UGen/Record/Dgeom.hs
--- a/Sound/SC3/UGen/Record/Dgeom.hs
+++ b/Sound/SC3/UGen/Record/Dgeom.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Dibrown.hs b/Sound/SC3/UGen/Record/Dibrown.hs
--- a/Sound/SC3/UGen/Record/Dibrown.hs
+++ b/Sound/SC3/UGen/Record/Dibrown.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Disintegrator.hs b/Sound/SC3/UGen/Record/Disintegrator.hs
--- a/Sound/SC3/UGen/Record/Disintegrator.hs
+++ b/Sound/SC3/UGen/Record/Disintegrator.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/DiskOut.hs b/Sound/SC3/UGen/Record/DiskOut.hs
--- a/Sound/SC3/UGen/Record/DiskOut.hs
+++ b/Sound/SC3/UGen/Record/DiskOut.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Diwhite.hs b/Sound/SC3/UGen/Record/Diwhite.hs
--- a/Sound/SC3/UGen/Record/Diwhite.hs
+++ b/Sound/SC3/UGen/Record/Diwhite.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Donce.hs b/Sound/SC3/UGen/Record/Donce.hs
--- a/Sound/SC3/UGen/Record/Donce.hs
+++ b/Sound/SC3/UGen/Record/Donce.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/DoubleNestedAllpassC.hs b/Sound/SC3/UGen/Record/DoubleNestedAllpassC.hs
--- a/Sound/SC3/UGen/Record/DoubleNestedAllpassC.hs
+++ b/Sound/SC3/UGen/Record/DoubleNestedAllpassC.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/DoubleNestedAllpassL.hs b/Sound/SC3/UGen/Record/DoubleNestedAllpassL.hs
--- a/Sound/SC3/UGen/Record/DoubleNestedAllpassL.hs
+++ b/Sound/SC3/UGen/Record/DoubleNestedAllpassL.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/DoubleNestedAllpassN.hs b/Sound/SC3/UGen/Record/DoubleNestedAllpassN.hs
--- a/Sound/SC3/UGen/Record/DoubleNestedAllpassN.hs
+++ b/Sound/SC3/UGen/Record/DoubleNestedAllpassN.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/DoubleWell3.hs b/Sound/SC3/UGen/Record/DoubleWell3.hs
--- a/Sound/SC3/UGen/Record/DoubleWell3.hs
+++ b/Sound/SC3/UGen/Record/DoubleWell3.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Dpoll.hs b/Sound/SC3/UGen/Record/Dpoll.hs
--- a/Sound/SC3/UGen/Record/Dpoll.hs
+++ b/Sound/SC3/UGen/Record/Dpoll.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Dreset.hs b/Sound/SC3/UGen/Record/Dreset.hs
--- a/Sound/SC3/UGen/Record/Dreset.hs
+++ b/Sound/SC3/UGen/Record/Dreset.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/DriveNoise.hs b/Sound/SC3/UGen/Record/DriveNoise.hs
--- a/Sound/SC3/UGen/Record/DriveNoise.hs
+++ b/Sound/SC3/UGen/Record/DriveNoise.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Dseries.hs b/Sound/SC3/UGen/Record/Dseries.hs
--- a/Sound/SC3/UGen/Record/Dseries.hs
+++ b/Sound/SC3/UGen/Record/Dseries.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Dstutter.hs b/Sound/SC3/UGen/Record/Dstutter.hs
--- a/Sound/SC3/UGen/Record/Dstutter.hs
+++ b/Sound/SC3/UGen/Record/Dstutter.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Dwhite.hs b/Sound/SC3/UGen/Record/Dwhite.hs
--- a/Sound/SC3/UGen/Record/Dwhite.hs
+++ b/Sound/SC3/UGen/Record/Dwhite.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/EnvDetect.hs b/Sound/SC3/UGen/Record/EnvDetect.hs
--- a/Sound/SC3/UGen/Record/EnvDetect.hs
+++ b/Sound/SC3/UGen/Record/EnvDetect.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/FFT.hs b/Sound/SC3/UGen/Record/FFT.hs
--- a/Sound/SC3/UGen/Record/FFT.hs
+++ b/Sound/SC3/UGen/Record/FFT.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/FMHEncode0.hs b/Sound/SC3/UGen/Record/FMHEncode0.hs
--- a/Sound/SC3/UGen/Record/FMHEncode0.hs
+++ b/Sound/SC3/UGen/Record/FMHEncode0.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FMHEncode1.hs b/Sound/SC3/UGen/Record/FMHEncode1.hs
--- a/Sound/SC3/UGen/Record/FMHEncode1.hs
+++ b/Sound/SC3/UGen/Record/FMHEncode1.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/FMHEncode2.hs b/Sound/SC3/UGen/Record/FMHEncode2.hs
--- a/Sound/SC3/UGen/Record/FMHEncode2.hs
+++ b/Sound/SC3/UGen/Record/FMHEncode2.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/FOS.hs b/Sound/SC3/UGen/Record/FOS.hs
--- a/Sound/SC3/UGen/Record/FOS.hs
+++ b/Sound/SC3/UGen/Record/FOS.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaAsymmetry.hs b/Sound/SC3/UGen/Record/FoaAsymmetry.hs
--- a/Sound/SC3/UGen/Record/FoaAsymmetry.hs
+++ b/Sound/SC3/UGen/Record/FoaAsymmetry.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaDirectO.hs b/Sound/SC3/UGen/Record/FoaDirectO.hs
--- a/Sound/SC3/UGen/Record/FoaDirectO.hs
+++ b/Sound/SC3/UGen/Record/FoaDirectO.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaDirectX.hs b/Sound/SC3/UGen/Record/FoaDirectX.hs
--- a/Sound/SC3/UGen/Record/FoaDirectX.hs
+++ b/Sound/SC3/UGen/Record/FoaDirectX.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaDirectY.hs b/Sound/SC3/UGen/Record/FoaDirectY.hs
--- a/Sound/SC3/UGen/Record/FoaDirectY.hs
+++ b/Sound/SC3/UGen/Record/FoaDirectY.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaDirectZ.hs b/Sound/SC3/UGen/Record/FoaDirectZ.hs
--- a/Sound/SC3/UGen/Record/FoaDirectZ.hs
+++ b/Sound/SC3/UGen/Record/FoaDirectZ.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaDominateX.hs b/Sound/SC3/UGen/Record/FoaDominateX.hs
--- a/Sound/SC3/UGen/Record/FoaDominateX.hs
+++ b/Sound/SC3/UGen/Record/FoaDominateX.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaDominateY.hs b/Sound/SC3/UGen/Record/FoaDominateY.hs
--- a/Sound/SC3/UGen/Record/FoaDominateY.hs
+++ b/Sound/SC3/UGen/Record/FoaDominateY.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaDominateZ.hs b/Sound/SC3/UGen/Record/FoaDominateZ.hs
--- a/Sound/SC3/UGen/Record/FoaDominateZ.hs
+++ b/Sound/SC3/UGen/Record/FoaDominateZ.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaFocusX.hs b/Sound/SC3/UGen/Record/FoaFocusX.hs
--- a/Sound/SC3/UGen/Record/FoaFocusX.hs
+++ b/Sound/SC3/UGen/Record/FoaFocusX.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaFocusY.hs b/Sound/SC3/UGen/Record/FoaFocusY.hs
--- a/Sound/SC3/UGen/Record/FoaFocusY.hs
+++ b/Sound/SC3/UGen/Record/FoaFocusY.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaFocusZ.hs b/Sound/SC3/UGen/Record/FoaFocusZ.hs
--- a/Sound/SC3/UGen/Record/FoaFocusZ.hs
+++ b/Sound/SC3/UGen/Record/FoaFocusZ.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaNFC.hs b/Sound/SC3/UGen/Record/FoaNFC.hs
--- a/Sound/SC3/UGen/Record/FoaNFC.hs
+++ b/Sound/SC3/UGen/Record/FoaNFC.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaPanB.hs b/Sound/SC3/UGen/Record/FoaPanB.hs
--- a/Sound/SC3/UGen/Record/FoaPanB.hs
+++ b/Sound/SC3/UGen/Record/FoaPanB.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/FoaPressX.hs b/Sound/SC3/UGen/Record/FoaPressX.hs
--- a/Sound/SC3/UGen/Record/FoaPressX.hs
+++ b/Sound/SC3/UGen/Record/FoaPressX.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaPressY.hs b/Sound/SC3/UGen/Record/FoaPressY.hs
--- a/Sound/SC3/UGen/Record/FoaPressY.hs
+++ b/Sound/SC3/UGen/Record/FoaPressY.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaPressZ.hs b/Sound/SC3/UGen/Record/FoaPressZ.hs
--- a/Sound/SC3/UGen/Record/FoaPressZ.hs
+++ b/Sound/SC3/UGen/Record/FoaPressZ.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaProximity.hs b/Sound/SC3/UGen/Record/FoaProximity.hs
--- a/Sound/SC3/UGen/Record/FoaProximity.hs
+++ b/Sound/SC3/UGen/Record/FoaProximity.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaPsychoShelf.hs b/Sound/SC3/UGen/Record/FoaPsychoShelf.hs
--- a/Sound/SC3/UGen/Record/FoaPsychoShelf.hs
+++ b/Sound/SC3/UGen/Record/FoaPsychoShelf.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaPushX.hs b/Sound/SC3/UGen/Record/FoaPushX.hs
--- a/Sound/SC3/UGen/Record/FoaPushX.hs
+++ b/Sound/SC3/UGen/Record/FoaPushX.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaPushY.hs b/Sound/SC3/UGen/Record/FoaPushY.hs
--- a/Sound/SC3/UGen/Record/FoaPushY.hs
+++ b/Sound/SC3/UGen/Record/FoaPushY.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaPushZ.hs b/Sound/SC3/UGen/Record/FoaPushZ.hs
--- a/Sound/SC3/UGen/Record/FoaPushZ.hs
+++ b/Sound/SC3/UGen/Record/FoaPushZ.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaRotate.hs b/Sound/SC3/UGen/Record/FoaRotate.hs
--- a/Sound/SC3/UGen/Record/FoaRotate.hs
+++ b/Sound/SC3/UGen/Record/FoaRotate.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaTilt.hs b/Sound/SC3/UGen/Record/FoaTilt.hs
--- a/Sound/SC3/UGen/Record/FoaTilt.hs
+++ b/Sound/SC3/UGen/Record/FoaTilt.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaTumble.hs b/Sound/SC3/UGen/Record/FoaTumble.hs
--- a/Sound/SC3/UGen/Record/FoaTumble.hs
+++ b/Sound/SC3/UGen/Record/FoaTumble.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaZoomX.hs b/Sound/SC3/UGen/Record/FoaZoomX.hs
--- a/Sound/SC3/UGen/Record/FoaZoomX.hs
+++ b/Sound/SC3/UGen/Record/FoaZoomX.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaZoomY.hs b/Sound/SC3/UGen/Record/FoaZoomY.hs
--- a/Sound/SC3/UGen/Record/FoaZoomY.hs
+++ b/Sound/SC3/UGen/Record/FoaZoomY.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FoaZoomZ.hs b/Sound/SC3/UGen/Record/FoaZoomZ.hs
--- a/Sound/SC3/UGen/Record/FoaZoomZ.hs
+++ b/Sound/SC3/UGen/Record/FoaZoomZ.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Fold.hs b/Sound/SC3/UGen/Record/Fold.hs
--- a/Sound/SC3/UGen/Record/Fold.hs
+++ b/Sound/SC3/UGen/Record/Fold.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Formlet.hs b/Sound/SC3/UGen/Record/Formlet.hs
--- a/Sound/SC3/UGen/Record/Formlet.hs
+++ b/Sound/SC3/UGen/Record/Formlet.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Free.hs b/Sound/SC3/UGen/Record/Free.hs
--- a/Sound/SC3/UGen/Record/Free.hs
+++ b/Sound/SC3/UGen/Record/Free.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FreeSelf.hs b/Sound/SC3/UGen/Record/FreeSelf.hs
--- a/Sound/SC3/UGen/Record/FreeSelf.hs
+++ b/Sound/SC3/UGen/Record/FreeSelf.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FreeVerb.hs b/Sound/SC3/UGen/Record/FreeVerb.hs
--- a/Sound/SC3/UGen/Record/FreeVerb.hs
+++ b/Sound/SC3/UGen/Record/FreeVerb.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/FreeVerb2.hs b/Sound/SC3/UGen/Record/FreeVerb2.hs
--- a/Sound/SC3/UGen/Record/FreeVerb2.hs
+++ b/Sound/SC3/UGen/Record/FreeVerb2.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/FreqShift.hs b/Sound/SC3/UGen/Record/FreqShift.hs
--- a/Sound/SC3/UGen/Record/FreqShift.hs
+++ b/Sound/SC3/UGen/Record/FreqShift.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Friction.hs b/Sound/SC3/UGen/Record/Friction.hs
--- a/Sound/SC3/UGen/Record/Friction.hs
+++ b/Sound/SC3/UGen/Record/Friction.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/GVerb.hs b/Sound/SC3/UGen/Record/GVerb.hs
--- a/Sound/SC3/UGen/Record/GVerb.hs
+++ b/Sound/SC3/UGen/Record/GVerb.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Gate.hs b/Sound/SC3/UGen/Record/Gate.hs
--- a/Sound/SC3/UGen/Record/Gate.hs
+++ b/Sound/SC3/UGen/Record/Gate.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/GaussClass.hs b/Sound/SC3/UGen/Record/GaussClass.hs
--- a/Sound/SC3/UGen/Record/GaussClass.hs
+++ b/Sound/SC3/UGen/Record/GaussClass.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/GlitchBPF.hs b/Sound/SC3/UGen/Record/GlitchBPF.hs
--- a/Sound/SC3/UGen/Record/GlitchBPF.hs
+++ b/Sound/SC3/UGen/Record/GlitchBPF.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/GlitchBRF.hs b/Sound/SC3/UGen/Record/GlitchBRF.hs
--- a/Sound/SC3/UGen/Record/GlitchBRF.hs
+++ b/Sound/SC3/UGen/Record/GlitchBRF.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/GlitchHPF.hs b/Sound/SC3/UGen/Record/GlitchHPF.hs
--- a/Sound/SC3/UGen/Record/GlitchHPF.hs
+++ b/Sound/SC3/UGen/Record/GlitchHPF.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/GlitchRHPF.hs b/Sound/SC3/UGen/Record/GlitchRHPF.hs
--- a/Sound/SC3/UGen/Record/GlitchRHPF.hs
+++ b/Sound/SC3/UGen/Record/GlitchRHPF.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Goertzel.hs b/Sound/SC3/UGen/Record/Goertzel.hs
--- a/Sound/SC3/UGen/Record/Goertzel.hs
+++ b/Sound/SC3/UGen/Record/Goertzel.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/GrainBuf.hs b/Sound/SC3/UGen/Record/GrainBuf.hs
--- a/Sound/SC3/UGen/Record/GrainBuf.hs
+++ b/Sound/SC3/UGen/Record/GrainBuf.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/GrainIn.hs b/Sound/SC3/UGen/Record/GrainIn.hs
--- a/Sound/SC3/UGen/Record/GrainIn.hs
+++ b/Sound/SC3/UGen/Record/GrainIn.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/GravityGrid.hs b/Sound/SC3/UGen/Record/GravityGrid.hs
--- a/Sound/SC3/UGen/Record/GravityGrid.hs
+++ b/Sound/SC3/UGen/Record/GravityGrid.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/GravityGrid2.hs b/Sound/SC3/UGen/Record/GravityGrid2.hs
--- a/Sound/SC3/UGen/Record/GravityGrid2.hs
+++ b/Sound/SC3/UGen/Record/GravityGrid2.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/HPF.hs b/Sound/SC3/UGen/Record/HPF.hs
--- a/Sound/SC3/UGen/Record/HPF.hs
+++ b/Sound/SC3/UGen/Record/HPF.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/HPZ1.hs b/Sound/SC3/UGen/Record/HPZ1.hs
--- a/Sound/SC3/UGen/Record/HPZ1.hs
+++ b/Sound/SC3/UGen/Record/HPZ1.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/HPZ2.hs b/Sound/SC3/UGen/Record/HPZ2.hs
--- a/Sound/SC3/UGen/Record/HPZ2.hs
+++ b/Sound/SC3/UGen/Record/HPZ2.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Hasher.hs b/Sound/SC3/UGen/Record/Hasher.hs
--- a/Sound/SC3/UGen/Record/Hasher.hs
+++ b/Sound/SC3/UGen/Record/Hasher.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Hilbert.hs b/Sound/SC3/UGen/Record/Hilbert.hs
--- a/Sound/SC3/UGen/Record/Hilbert.hs
+++ b/Sound/SC3/UGen/Record/Hilbert.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/HilbertFIR.hs b/Sound/SC3/UGen/Record/HilbertFIR.hs
--- a/Sound/SC3/UGen/Record/HilbertFIR.hs
+++ b/Sound/SC3/UGen/Record/HilbertFIR.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/IIRFilter.hs b/Sound/SC3/UGen/Record/IIRFilter.hs
--- a/Sound/SC3/UGen/Record/IIRFilter.hs
+++ b/Sound/SC3/UGen/Record/IIRFilter.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/InGrain.hs b/Sound/SC3/UGen/Record/InGrain.hs
--- a/Sound/SC3/UGen/Record/InGrain.hs
+++ b/Sound/SC3/UGen/Record/InGrain.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/InGrainB.hs b/Sound/SC3/UGen/Record/InGrainB.hs
--- a/Sound/SC3/UGen/Record/InGrainB.hs
+++ b/Sound/SC3/UGen/Record/InGrainB.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/InGrainBBF.hs b/Sound/SC3/UGen/Record/InGrainBBF.hs
--- a/Sound/SC3/UGen/Record/InGrainBBF.hs
+++ b/Sound/SC3/UGen/Record/InGrainBBF.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/InGrainBF.hs b/Sound/SC3/UGen/Record/InGrainBF.hs
--- a/Sound/SC3/UGen/Record/InGrainBF.hs
+++ b/Sound/SC3/UGen/Record/InGrainBF.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/InGrainI.hs b/Sound/SC3/UGen/Record/InGrainI.hs
--- a/Sound/SC3/UGen/Record/InGrainI.hs
+++ b/Sound/SC3/UGen/Record/InGrainI.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/InGrainIBF.hs b/Sound/SC3/UGen/Record/InGrainIBF.hs
--- a/Sound/SC3/UGen/Record/InGrainIBF.hs
+++ b/Sound/SC3/UGen/Record/InGrainIBF.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/InRange.hs b/Sound/SC3/UGen/Record/InRange.hs
--- a/Sound/SC3/UGen/Record/InRange.hs
+++ b/Sound/SC3/UGen/Record/InRange.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Index.hs b/Sound/SC3/UGen/Record/Index.hs
--- a/Sound/SC3/UGen/Record/Index.hs
+++ b/Sound/SC3/UGen/Record/Index.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/IndexInBetween.hs b/Sound/SC3/UGen/Record/IndexInBetween.hs
--- a/Sound/SC3/UGen/Record/IndexInBetween.hs
+++ b/Sound/SC3/UGen/Record/IndexInBetween.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/IndexL.hs b/Sound/SC3/UGen/Record/IndexL.hs
--- a/Sound/SC3/UGen/Record/IndexL.hs
+++ b/Sound/SC3/UGen/Record/IndexL.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/InsideOut.hs b/Sound/SC3/UGen/Record/InsideOut.hs
--- a/Sound/SC3/UGen/Record/InsideOut.hs
+++ b/Sound/SC3/UGen/Record/InsideOut.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Integrator.hs b/Sound/SC3/UGen/Record/Integrator.hs
--- a/Sound/SC3/UGen/Record/Integrator.hs
+++ b/Sound/SC3/UGen/Record/Integrator.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/K2A.hs b/Sound/SC3/UGen/Record/K2A.hs
--- a/Sound/SC3/UGen/Record/K2A.hs
+++ b/Sound/SC3/UGen/Record/K2A.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/LFBrownNoise0.hs b/Sound/SC3/UGen/Record/LFBrownNoise0.hs
--- a/Sound/SC3/UGen/Record/LFBrownNoise0.hs
+++ b/Sound/SC3/UGen/Record/LFBrownNoise0.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/LFBrownNoise1.hs b/Sound/SC3/UGen/Record/LFBrownNoise1.hs
--- a/Sound/SC3/UGen/Record/LFBrownNoise1.hs
+++ b/Sound/SC3/UGen/Record/LFBrownNoise1.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/LFBrownNoise2.hs b/Sound/SC3/UGen/Record/LFBrownNoise2.hs
--- a/Sound/SC3/UGen/Record/LFBrownNoise2.hs
+++ b/Sound/SC3/UGen/Record/LFBrownNoise2.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/LFClipNoise.hs b/Sound/SC3/UGen/Record/LFClipNoise.hs
--- a/Sound/SC3/UGen/Record/LFClipNoise.hs
+++ b/Sound/SC3/UGen/Record/LFClipNoise.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/LFCub.hs b/Sound/SC3/UGen/Record/LFCub.hs
--- a/Sound/SC3/UGen/Record/LFCub.hs
+++ b/Sound/SC3/UGen/Record/LFCub.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/LFDClipNoise.hs b/Sound/SC3/UGen/Record/LFDClipNoise.hs
--- a/Sound/SC3/UGen/Record/LFDClipNoise.hs
+++ b/Sound/SC3/UGen/Record/LFDClipNoise.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/LFDNoise0.hs b/Sound/SC3/UGen/Record/LFDNoise0.hs
--- a/Sound/SC3/UGen/Record/LFDNoise0.hs
+++ b/Sound/SC3/UGen/Record/LFDNoise0.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/LFDNoise1.hs b/Sound/SC3/UGen/Record/LFDNoise1.hs
--- a/Sound/SC3/UGen/Record/LFDNoise1.hs
+++ b/Sound/SC3/UGen/Record/LFDNoise1.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/LFDNoise3.hs b/Sound/SC3/UGen/Record/LFDNoise3.hs
--- a/Sound/SC3/UGen/Record/LFDNoise3.hs
+++ b/Sound/SC3/UGen/Record/LFDNoise3.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/LFGauss.hs b/Sound/SC3/UGen/Record/LFGauss.hs
--- a/Sound/SC3/UGen/Record/LFGauss.hs
+++ b/Sound/SC3/UGen/Record/LFGauss.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/LFNoise0.hs b/Sound/SC3/UGen/Record/LFNoise0.hs
--- a/Sound/SC3/UGen/Record/LFNoise0.hs
+++ b/Sound/SC3/UGen/Record/LFNoise0.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/LFNoise1.hs b/Sound/SC3/UGen/Record/LFNoise1.hs
--- a/Sound/SC3/UGen/Record/LFNoise1.hs
+++ b/Sound/SC3/UGen/Record/LFNoise1.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/LFNoise2.hs b/Sound/SC3/UGen/Record/LFNoise2.hs
--- a/Sound/SC3/UGen/Record/LFNoise2.hs
+++ b/Sound/SC3/UGen/Record/LFNoise2.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/LFPar.hs b/Sound/SC3/UGen/Record/LFPar.hs
--- a/Sound/SC3/UGen/Record/LFPar.hs
+++ b/Sound/SC3/UGen/Record/LFPar.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/LFPulse.hs b/Sound/SC3/UGen/Record/LFPulse.hs
--- a/Sound/SC3/UGen/Record/LFPulse.hs
+++ b/Sound/SC3/UGen/Record/LFPulse.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/LFSaw.hs b/Sound/SC3/UGen/Record/LFSaw.hs
--- a/Sound/SC3/UGen/Record/LFSaw.hs
+++ b/Sound/SC3/UGen/Record/LFSaw.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/LFTri.hs b/Sound/SC3/UGen/Record/LFTri.hs
--- a/Sound/SC3/UGen/Record/LFTri.hs
+++ b/Sound/SC3/UGen/Record/LFTri.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/LPF.hs b/Sound/SC3/UGen/Record/LPF.hs
--- a/Sound/SC3/UGen/Record/LPF.hs
+++ b/Sound/SC3/UGen/Record/LPF.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/LPF1.hs b/Sound/SC3/UGen/Record/LPF1.hs
--- a/Sound/SC3/UGen/Record/LPF1.hs
+++ b/Sound/SC3/UGen/Record/LPF1.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/LPF18.hs b/Sound/SC3/UGen/Record/LPF18.hs
--- a/Sound/SC3/UGen/Record/LPF18.hs
+++ b/Sound/SC3/UGen/Record/LPF18.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/LPFVS6.hs b/Sound/SC3/UGen/Record/LPFVS6.hs
--- a/Sound/SC3/UGen/Record/LPFVS6.hs
+++ b/Sound/SC3/UGen/Record/LPFVS6.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/LPZ1.hs b/Sound/SC3/UGen/Record/LPZ1.hs
--- a/Sound/SC3/UGen/Record/LPZ1.hs
+++ b/Sound/SC3/UGen/Record/LPZ1.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/LPZ2.hs b/Sound/SC3/UGen/Record/LPZ2.hs
--- a/Sound/SC3/UGen/Record/LPZ2.hs
+++ b/Sound/SC3/UGen/Record/LPZ2.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/LTI.hs b/Sound/SC3/UGen/Record/LTI.hs
--- a/Sound/SC3/UGen/Record/LTI.hs
+++ b/Sound/SC3/UGen/Record/LTI.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Lag.hs b/Sound/SC3/UGen/Record/Lag.hs
--- a/Sound/SC3/UGen/Record/Lag.hs
+++ b/Sound/SC3/UGen/Record/Lag.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Lag2.hs b/Sound/SC3/UGen/Record/Lag2.hs
--- a/Sound/SC3/UGen/Record/Lag2.hs
+++ b/Sound/SC3/UGen/Record/Lag2.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Lag2UD.hs b/Sound/SC3/UGen/Record/Lag2UD.hs
--- a/Sound/SC3/UGen/Record/Lag2UD.hs
+++ b/Sound/SC3/UGen/Record/Lag2UD.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Lag3.hs b/Sound/SC3/UGen/Record/Lag3.hs
--- a/Sound/SC3/UGen/Record/Lag3.hs
+++ b/Sound/SC3/UGen/Record/Lag3.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Lag3UD.hs b/Sound/SC3/UGen/Record/Lag3UD.hs
--- a/Sound/SC3/UGen/Record/Lag3UD.hs
+++ b/Sound/SC3/UGen/Record/Lag3UD.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/LagUD.hs b/Sound/SC3/UGen/Record/LagUD.hs
--- a/Sound/SC3/UGen/Record/LagUD.hs
+++ b/Sound/SC3/UGen/Record/LagUD.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/LastValue.hs b/Sound/SC3/UGen/Record/LastValue.hs
--- a/Sound/SC3/UGen/Record/LastValue.hs
+++ b/Sound/SC3/UGen/Record/LastValue.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Latch.hs b/Sound/SC3/UGen/Record/Latch.hs
--- a/Sound/SC3/UGen/Record/Latch.hs
+++ b/Sound/SC3/UGen/Record/Latch.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/LeakDC.hs b/Sound/SC3/UGen/Record/LeakDC.hs
--- a/Sound/SC3/UGen/Record/LeakDC.hs
+++ b/Sound/SC3/UGen/Record/LeakDC.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Limiter.hs b/Sound/SC3/UGen/Record/Limiter.hs
--- a/Sound/SC3/UGen/Record/Limiter.hs
+++ b/Sound/SC3/UGen/Record/Limiter.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/LinExp.hs b/Sound/SC3/UGen/Record/LinExp.hs
--- a/Sound/SC3/UGen/Record/LinExp.hs
+++ b/Sound/SC3/UGen/Record/LinExp.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/LinPan2.hs b/Sound/SC3/UGen/Record/LinPan2.hs
--- a/Sound/SC3/UGen/Record/LinPan2.hs
+++ b/Sound/SC3/UGen/Record/LinPan2.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/LocalOut.hs b/Sound/SC3/UGen/Record/LocalOut.hs
--- a/Sound/SC3/UGen/Record/LocalOut.hs
+++ b/Sound/SC3/UGen/Record/LocalOut.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Logistic.hs b/Sound/SC3/UGen/Record/Logistic.hs
--- a/Sound/SC3/UGen/Record/Logistic.hs
+++ b/Sound/SC3/UGen/Record/Logistic.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/LoopBuf.hs b/Sound/SC3/UGen/Record/LoopBuf.hs
--- a/Sound/SC3/UGen/Record/LoopBuf.hs
+++ b/Sound/SC3/UGen/Record/LoopBuf.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/MantissaMask.hs b/Sound/SC3/UGen/Record/MantissaMask.hs
--- a/Sound/SC3/UGen/Record/MantissaMask.hs
+++ b/Sound/SC3/UGen/Record/MantissaMask.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/MarkovSynth.hs b/Sound/SC3/UGen/Record/MarkovSynth.hs
--- a/Sound/SC3/UGen/Record/MarkovSynth.hs
+++ b/Sound/SC3/UGen/Record/MarkovSynth.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Max.hs b/Sound/SC3/UGen/Record/Max.hs
--- a/Sound/SC3/UGen/Record/Max.hs
+++ b/Sound/SC3/UGen/Record/Max.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Maxamp.hs b/Sound/SC3/UGen/Record/Maxamp.hs
--- a/Sound/SC3/UGen/Record/Maxamp.hs
+++ b/Sound/SC3/UGen/Record/Maxamp.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/MeanTriggered.hs b/Sound/SC3/UGen/Record/MeanTriggered.hs
--- a/Sound/SC3/UGen/Record/MeanTriggered.hs
+++ b/Sound/SC3/UGen/Record/MeanTriggered.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Median.hs b/Sound/SC3/UGen/Record/Median.hs
--- a/Sound/SC3/UGen/Record/Median.hs
+++ b/Sound/SC3/UGen/Record/Median.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/MedianTriggered.hs b/Sound/SC3/UGen/Record/MedianTriggered.hs
--- a/Sound/SC3/UGen/Record/MedianTriggered.hs
+++ b/Sound/SC3/UGen/Record/MedianTriggered.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/MidEQ.hs b/Sound/SC3/UGen/Record/MidEQ.hs
--- a/Sound/SC3/UGen/Record/MidEQ.hs
+++ b/Sound/SC3/UGen/Record/MidEQ.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/MonoGrain.hs b/Sound/SC3/UGen/Record/MonoGrain.hs
--- a/Sound/SC3/UGen/Record/MonoGrain.hs
+++ b/Sound/SC3/UGen/Record/MonoGrain.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/MonoGrainBF.hs b/Sound/SC3/UGen/Record/MonoGrainBF.hs
--- a/Sound/SC3/UGen/Record/MonoGrainBF.hs
+++ b/Sound/SC3/UGen/Record/MonoGrainBF.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/MoogFF.hs b/Sound/SC3/UGen/Record/MoogFF.hs
--- a/Sound/SC3/UGen/Record/MoogFF.hs
+++ b/Sound/SC3/UGen/Record/MoogFF.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/MoogLadder.hs b/Sound/SC3/UGen/Record/MoogLadder.hs
--- a/Sound/SC3/UGen/Record/MoogLadder.hs
+++ b/Sound/SC3/UGen/Record/MoogLadder.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/MoogVCF.hs b/Sound/SC3/UGen/Record/MoogVCF.hs
--- a/Sound/SC3/UGen/Record/MoogVCF.hs
+++ b/Sound/SC3/UGen/Record/MoogVCF.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/NL.hs b/Sound/SC3/UGen/Record/NL.hs
--- a/Sound/SC3/UGen/Record/NL.hs
+++ b/Sound/SC3/UGen/Record/NL.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/NeedleRect.hs b/Sound/SC3/UGen/Record/NeedleRect.hs
--- a/Sound/SC3/UGen/Record/NeedleRect.hs
+++ b/Sound/SC3/UGen/Record/NeedleRect.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/NestedAllpassC.hs b/Sound/SC3/UGen/Record/NestedAllpassC.hs
--- a/Sound/SC3/UGen/Record/NestedAllpassC.hs
+++ b/Sound/SC3/UGen/Record/NestedAllpassC.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/NestedAllpassL.hs b/Sound/SC3/UGen/Record/NestedAllpassL.hs
--- a/Sound/SC3/UGen/Record/NestedAllpassL.hs
+++ b/Sound/SC3/UGen/Record/NestedAllpassL.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/NestedAllpassN.hs b/Sound/SC3/UGen/Record/NestedAllpassN.hs
--- a/Sound/SC3/UGen/Record/NestedAllpassN.hs
+++ b/Sound/SC3/UGen/Record/NestedAllpassN.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Normalizer.hs b/Sound/SC3/UGen/Record/Normalizer.hs
--- a/Sound/SC3/UGen/Record/Normalizer.hs
+++ b/Sound/SC3/UGen/Record/Normalizer.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/OSFold4.hs b/Sound/SC3/UGen/Record/OSFold4.hs
--- a/Sound/SC3/UGen/Record/OSFold4.hs
+++ b/Sound/SC3/UGen/Record/OSFold4.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/OSFold8.hs b/Sound/SC3/UGen/Record/OSFold8.hs
--- a/Sound/SC3/UGen/Record/OSFold8.hs
+++ b/Sound/SC3/UGen/Record/OSFold8.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/OSTrunc4.hs b/Sound/SC3/UGen/Record/OSTrunc4.hs
--- a/Sound/SC3/UGen/Record/OSTrunc4.hs
+++ b/Sound/SC3/UGen/Record/OSTrunc4.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/OSTrunc8.hs b/Sound/SC3/UGen/Record/OSTrunc8.hs
--- a/Sound/SC3/UGen/Record/OSTrunc8.hs
+++ b/Sound/SC3/UGen/Record/OSTrunc8.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/OSWrap4.hs b/Sound/SC3/UGen/Record/OSWrap4.hs
--- a/Sound/SC3/UGen/Record/OSWrap4.hs
+++ b/Sound/SC3/UGen/Record/OSWrap4.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/OSWrap8.hs b/Sound/SC3/UGen/Record/OSWrap8.hs
--- a/Sound/SC3/UGen/Record/OSWrap8.hs
+++ b/Sound/SC3/UGen/Record/OSWrap8.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/OffsetOut.hs b/Sound/SC3/UGen/Record/OffsetOut.hs
--- a/Sound/SC3/UGen/Record/OffsetOut.hs
+++ b/Sound/SC3/UGen/Record/OffsetOut.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/OnePole.hs b/Sound/SC3/UGen/Record/OnePole.hs
--- a/Sound/SC3/UGen/Record/OnePole.hs
+++ b/Sound/SC3/UGen/Record/OnePole.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/OneZero.hs b/Sound/SC3/UGen/Record/OneZero.hs
--- a/Sound/SC3/UGen/Record/OneZero.hs
+++ b/Sound/SC3/UGen/Record/OneZero.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Onsets.hs b/Sound/SC3/UGen/Record/Onsets.hs
--- a/Sound/SC3/UGen/Record/Onsets.hs
+++ b/Sound/SC3/UGen/Record/Onsets.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Oregonator.hs b/Sound/SC3/UGen/Record/Oregonator.hs
--- a/Sound/SC3/UGen/Record/Oregonator.hs
+++ b/Sound/SC3/UGen/Record/Oregonator.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Out.hs b/Sound/SC3/UGen/Record/Out.hs
--- a/Sound/SC3/UGen/Record/Out.hs
+++ b/Sound/SC3/UGen/Record/Out.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_Add.hs b/Sound/SC3/UGen/Record/PV_Add.hs
--- a/Sound/SC3/UGen/Record/PV_Add.hs
+++ b/Sound/SC3/UGen/Record/PV_Add.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_BinBufRd.hs b/Sound/SC3/UGen/Record/PV_BinBufRd.hs
--- a/Sound/SC3/UGen/Record/PV_BinBufRd.hs
+++ b/Sound/SC3/UGen/Record/PV_BinBufRd.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_BinDelay.hs b/Sound/SC3/UGen/Record/PV_BinDelay.hs
--- a/Sound/SC3/UGen/Record/PV_BinDelay.hs
+++ b/Sound/SC3/UGen/Record/PV_BinDelay.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_BinFilter.hs b/Sound/SC3/UGen/Record/PV_BinFilter.hs
--- a/Sound/SC3/UGen/Record/PV_BinFilter.hs
+++ b/Sound/SC3/UGen/Record/PV_BinFilter.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_BinPlayBuf.hs b/Sound/SC3/UGen/Record/PV_BinPlayBuf.hs
--- a/Sound/SC3/UGen/Record/PV_BinPlayBuf.hs
+++ b/Sound/SC3/UGen/Record/PV_BinPlayBuf.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_BinScramble.hs b/Sound/SC3/UGen/Record/PV_BinScramble.hs
--- a/Sound/SC3/UGen/Record/PV_BinScramble.hs
+++ b/Sound/SC3/UGen/Record/PV_BinScramble.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_BinShift.hs b/Sound/SC3/UGen/Record/PV_BinShift.hs
--- a/Sound/SC3/UGen/Record/PV_BinShift.hs
+++ b/Sound/SC3/UGen/Record/PV_BinShift.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_BinWipe.hs b/Sound/SC3/UGen/Record/PV_BinWipe.hs
--- a/Sound/SC3/UGen/Record/PV_BinWipe.hs
+++ b/Sound/SC3/UGen/Record/PV_BinWipe.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_BrickWall.hs b/Sound/SC3/UGen/Record/PV_BrickWall.hs
--- a/Sound/SC3/UGen/Record/PV_BrickWall.hs
+++ b/Sound/SC3/UGen/Record/PV_BrickWall.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_BufRd.hs b/Sound/SC3/UGen/Record/PV_BufRd.hs
--- a/Sound/SC3/UGen/Record/PV_BufRd.hs
+++ b/Sound/SC3/UGen/Record/PV_BufRd.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_ChainUGen.hs b/Sound/SC3/UGen/Record/PV_ChainUGen.hs
--- a/Sound/SC3/UGen/Record/PV_ChainUGen.hs
+++ b/Sound/SC3/UGen/Record/PV_ChainUGen.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_CommonMag.hs b/Sound/SC3/UGen/Record/PV_CommonMag.hs
--- a/Sound/SC3/UGen/Record/PV_CommonMag.hs
+++ b/Sound/SC3/UGen/Record/PV_CommonMag.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_CommonMul.hs b/Sound/SC3/UGen/Record/PV_CommonMul.hs
--- a/Sound/SC3/UGen/Record/PV_CommonMul.hs
+++ b/Sound/SC3/UGen/Record/PV_CommonMul.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_Compander.hs b/Sound/SC3/UGen/Record/PV_Compander.hs
--- a/Sound/SC3/UGen/Record/PV_Compander.hs
+++ b/Sound/SC3/UGen/Record/PV_Compander.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_ConformalMap.hs b/Sound/SC3/UGen/Record/PV_ConformalMap.hs
--- a/Sound/SC3/UGen/Record/PV_ConformalMap.hs
+++ b/Sound/SC3/UGen/Record/PV_ConformalMap.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_Conj.hs b/Sound/SC3/UGen/Record/PV_Conj.hs
--- a/Sound/SC3/UGen/Record/PV_Conj.hs
+++ b/Sound/SC3/UGen/Record/PV_Conj.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_Copy.hs b/Sound/SC3/UGen/Record/PV_Copy.hs
--- a/Sound/SC3/UGen/Record/PV_Copy.hs
+++ b/Sound/SC3/UGen/Record/PV_Copy.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_CopyPhase.hs b/Sound/SC3/UGen/Record/PV_CopyPhase.hs
--- a/Sound/SC3/UGen/Record/PV_CopyPhase.hs
+++ b/Sound/SC3/UGen/Record/PV_CopyPhase.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_Cutoff.hs b/Sound/SC3/UGen/Record/PV_Cutoff.hs
--- a/Sound/SC3/UGen/Record/PV_Cutoff.hs
+++ b/Sound/SC3/UGen/Record/PV_Cutoff.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_DiffMags.hs b/Sound/SC3/UGen/Record/PV_DiffMags.hs
--- a/Sound/SC3/UGen/Record/PV_DiffMags.hs
+++ b/Sound/SC3/UGen/Record/PV_DiffMags.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_Diffuser.hs b/Sound/SC3/UGen/Record/PV_Diffuser.hs
--- a/Sound/SC3/UGen/Record/PV_Diffuser.hs
+++ b/Sound/SC3/UGen/Record/PV_Diffuser.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_Div.hs b/Sound/SC3/UGen/Record/PV_Div.hs
--- a/Sound/SC3/UGen/Record/PV_Div.hs
+++ b/Sound/SC3/UGen/Record/PV_Div.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_EvenBin.hs b/Sound/SC3/UGen/Record/PV_EvenBin.hs
--- a/Sound/SC3/UGen/Record/PV_EvenBin.hs
+++ b/Sound/SC3/UGen/Record/PV_EvenBin.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_ExtractRepeat.hs b/Sound/SC3/UGen/Record/PV_ExtractRepeat.hs
--- a/Sound/SC3/UGen/Record/PV_ExtractRepeat.hs
+++ b/Sound/SC3/UGen/Record/PV_ExtractRepeat.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_Freeze.hs b/Sound/SC3/UGen/Record/PV_Freeze.hs
--- a/Sound/SC3/UGen/Record/PV_Freeze.hs
+++ b/Sound/SC3/UGen/Record/PV_Freeze.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_FreqBuffer.hs b/Sound/SC3/UGen/Record/PV_FreqBuffer.hs
--- a/Sound/SC3/UGen/Record/PV_FreqBuffer.hs
+++ b/Sound/SC3/UGen/Record/PV_FreqBuffer.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_HainsworthFoote.hs b/Sound/SC3/UGen/Record/PV_HainsworthFoote.hs
--- a/Sound/SC3/UGen/Record/PV_HainsworthFoote.hs
+++ b/Sound/SC3/UGen/Record/PV_HainsworthFoote.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_Invert.hs b/Sound/SC3/UGen/Record/PV_Invert.hs
--- a/Sound/SC3/UGen/Record/PV_Invert.hs
+++ b/Sound/SC3/UGen/Record/PV_Invert.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_JensenAndersen.hs b/Sound/SC3/UGen/Record/PV_JensenAndersen.hs
--- a/Sound/SC3/UGen/Record/PV_JensenAndersen.hs
+++ b/Sound/SC3/UGen/Record/PV_JensenAndersen.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_LocalMax.hs b/Sound/SC3/UGen/Record/PV_LocalMax.hs
--- a/Sound/SC3/UGen/Record/PV_LocalMax.hs
+++ b/Sound/SC3/UGen/Record/PV_LocalMax.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_MagAbove.hs b/Sound/SC3/UGen/Record/PV_MagAbove.hs
--- a/Sound/SC3/UGen/Record/PV_MagAbove.hs
+++ b/Sound/SC3/UGen/Record/PV_MagAbove.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_MagBelow.hs b/Sound/SC3/UGen/Record/PV_MagBelow.hs
--- a/Sound/SC3/UGen/Record/PV_MagBelow.hs
+++ b/Sound/SC3/UGen/Record/PV_MagBelow.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_MagBuffer.hs b/Sound/SC3/UGen/Record/PV_MagBuffer.hs
--- a/Sound/SC3/UGen/Record/PV_MagBuffer.hs
+++ b/Sound/SC3/UGen/Record/PV_MagBuffer.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_MagClip.hs b/Sound/SC3/UGen/Record/PV_MagClip.hs
--- a/Sound/SC3/UGen/Record/PV_MagClip.hs
+++ b/Sound/SC3/UGen/Record/PV_MagClip.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_MagDiv.hs b/Sound/SC3/UGen/Record/PV_MagDiv.hs
--- a/Sound/SC3/UGen/Record/PV_MagDiv.hs
+++ b/Sound/SC3/UGen/Record/PV_MagDiv.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_MagExp.hs b/Sound/SC3/UGen/Record/PV_MagExp.hs
--- a/Sound/SC3/UGen/Record/PV_MagExp.hs
+++ b/Sound/SC3/UGen/Record/PV_MagExp.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_MagFreeze.hs b/Sound/SC3/UGen/Record/PV_MagFreeze.hs
--- a/Sound/SC3/UGen/Record/PV_MagFreeze.hs
+++ b/Sound/SC3/UGen/Record/PV_MagFreeze.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_MagGate.hs b/Sound/SC3/UGen/Record/PV_MagGate.hs
--- a/Sound/SC3/UGen/Record/PV_MagGate.hs
+++ b/Sound/SC3/UGen/Record/PV_MagGate.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_MagLog.hs b/Sound/SC3/UGen/Record/PV_MagLog.hs
--- a/Sound/SC3/UGen/Record/PV_MagLog.hs
+++ b/Sound/SC3/UGen/Record/PV_MagLog.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_MagMap.hs b/Sound/SC3/UGen/Record/PV_MagMap.hs
--- a/Sound/SC3/UGen/Record/PV_MagMap.hs
+++ b/Sound/SC3/UGen/Record/PV_MagMap.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_MagMinus.hs b/Sound/SC3/UGen/Record/PV_MagMinus.hs
--- a/Sound/SC3/UGen/Record/PV_MagMinus.hs
+++ b/Sound/SC3/UGen/Record/PV_MagMinus.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_MagMul.hs b/Sound/SC3/UGen/Record/PV_MagMul.hs
--- a/Sound/SC3/UGen/Record/PV_MagMul.hs
+++ b/Sound/SC3/UGen/Record/PV_MagMul.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_MagMulAdd.hs b/Sound/SC3/UGen/Record/PV_MagMulAdd.hs
--- a/Sound/SC3/UGen/Record/PV_MagMulAdd.hs
+++ b/Sound/SC3/UGen/Record/PV_MagMulAdd.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_MagNoise.hs b/Sound/SC3/UGen/Record/PV_MagNoise.hs
--- a/Sound/SC3/UGen/Record/PV_MagNoise.hs
+++ b/Sound/SC3/UGen/Record/PV_MagNoise.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_MagScale.hs b/Sound/SC3/UGen/Record/PV_MagScale.hs
--- a/Sound/SC3/UGen/Record/PV_MagScale.hs
+++ b/Sound/SC3/UGen/Record/PV_MagScale.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_MagShift.hs b/Sound/SC3/UGen/Record/PV_MagShift.hs
--- a/Sound/SC3/UGen/Record/PV_MagShift.hs
+++ b/Sound/SC3/UGen/Record/PV_MagShift.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_MagSmear.hs b/Sound/SC3/UGen/Record/PV_MagSmear.hs
--- a/Sound/SC3/UGen/Record/PV_MagSmear.hs
+++ b/Sound/SC3/UGen/Record/PV_MagSmear.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_MagSmooth.hs b/Sound/SC3/UGen/Record/PV_MagSmooth.hs
--- a/Sound/SC3/UGen/Record/PV_MagSmooth.hs
+++ b/Sound/SC3/UGen/Record/PV_MagSmooth.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_MagSquared.hs b/Sound/SC3/UGen/Record/PV_MagSquared.hs
--- a/Sound/SC3/UGen/Record/PV_MagSquared.hs
+++ b/Sound/SC3/UGen/Record/PV_MagSquared.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_MagSubtract.hs b/Sound/SC3/UGen/Record/PV_MagSubtract.hs
--- a/Sound/SC3/UGen/Record/PV_MagSubtract.hs
+++ b/Sound/SC3/UGen/Record/PV_MagSubtract.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_Max.hs b/Sound/SC3/UGen/Record/PV_Max.hs
--- a/Sound/SC3/UGen/Record/PV_Max.hs
+++ b/Sound/SC3/UGen/Record/PV_Max.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_MaxMagN.hs b/Sound/SC3/UGen/Record/PV_MaxMagN.hs
--- a/Sound/SC3/UGen/Record/PV_MaxMagN.hs
+++ b/Sound/SC3/UGen/Record/PV_MaxMagN.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_Min.hs b/Sound/SC3/UGen/Record/PV_Min.hs
--- a/Sound/SC3/UGen/Record/PV_Min.hs
+++ b/Sound/SC3/UGen/Record/PV_Min.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_MinMagN.hs b/Sound/SC3/UGen/Record/PV_MinMagN.hs
--- a/Sound/SC3/UGen/Record/PV_MinMagN.hs
+++ b/Sound/SC3/UGen/Record/PV_MinMagN.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_Morph.hs b/Sound/SC3/UGen/Record/PV_Morph.hs
--- a/Sound/SC3/UGen/Record/PV_Morph.hs
+++ b/Sound/SC3/UGen/Record/PV_Morph.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_Mul.hs b/Sound/SC3/UGen/Record/PV_Mul.hs
--- a/Sound/SC3/UGen/Record/PV_Mul.hs
+++ b/Sound/SC3/UGen/Record/PV_Mul.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_NoiseSynthF.hs b/Sound/SC3/UGen/Record/PV_NoiseSynthF.hs
--- a/Sound/SC3/UGen/Record/PV_NoiseSynthF.hs
+++ b/Sound/SC3/UGen/Record/PV_NoiseSynthF.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_NoiseSynthP.hs b/Sound/SC3/UGen/Record/PV_NoiseSynthP.hs
--- a/Sound/SC3/UGen/Record/PV_NoiseSynthP.hs
+++ b/Sound/SC3/UGen/Record/PV_NoiseSynthP.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_OddBin.hs b/Sound/SC3/UGen/Record/PV_OddBin.hs
--- a/Sound/SC3/UGen/Record/PV_OddBin.hs
+++ b/Sound/SC3/UGen/Record/PV_OddBin.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_PartialSynthF.hs b/Sound/SC3/UGen/Record/PV_PartialSynthF.hs
--- a/Sound/SC3/UGen/Record/PV_PartialSynthF.hs
+++ b/Sound/SC3/UGen/Record/PV_PartialSynthF.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_PartialSynthP.hs b/Sound/SC3/UGen/Record/PV_PartialSynthP.hs
--- a/Sound/SC3/UGen/Record/PV_PartialSynthP.hs
+++ b/Sound/SC3/UGen/Record/PV_PartialSynthP.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_PhaseShift.hs b/Sound/SC3/UGen/Record/PV_PhaseShift.hs
--- a/Sound/SC3/UGen/Record/PV_PhaseShift.hs
+++ b/Sound/SC3/UGen/Record/PV_PhaseShift.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_PhaseShift270.hs b/Sound/SC3/UGen/Record/PV_PhaseShift270.hs
--- a/Sound/SC3/UGen/Record/PV_PhaseShift270.hs
+++ b/Sound/SC3/UGen/Record/PV_PhaseShift270.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_PhaseShift90.hs b/Sound/SC3/UGen/Record/PV_PhaseShift90.hs
--- a/Sound/SC3/UGen/Record/PV_PhaseShift90.hs
+++ b/Sound/SC3/UGen/Record/PV_PhaseShift90.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_PitchShift.hs b/Sound/SC3/UGen/Record/PV_PitchShift.hs
--- a/Sound/SC3/UGen/Record/PV_PitchShift.hs
+++ b/Sound/SC3/UGen/Record/PV_PitchShift.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_PlayBuf.hs b/Sound/SC3/UGen/Record/PV_PlayBuf.hs
--- a/Sound/SC3/UGen/Record/PV_PlayBuf.hs
+++ b/Sound/SC3/UGen/Record/PV_PlayBuf.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_RandComb.hs b/Sound/SC3/UGen/Record/PV_RandComb.hs
--- a/Sound/SC3/UGen/Record/PV_RandComb.hs
+++ b/Sound/SC3/UGen/Record/PV_RandComb.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_RandWipe.hs b/Sound/SC3/UGen/Record/PV_RandWipe.hs
--- a/Sound/SC3/UGen/Record/PV_RandWipe.hs
+++ b/Sound/SC3/UGen/Record/PV_RandWipe.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_RecordBuf.hs b/Sound/SC3/UGen/Record/PV_RecordBuf.hs
--- a/Sound/SC3/UGen/Record/PV_RecordBuf.hs
+++ b/Sound/SC3/UGen/Record/PV_RecordBuf.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_RectComb.hs b/Sound/SC3/UGen/Record/PV_RectComb.hs
--- a/Sound/SC3/UGen/Record/PV_RectComb.hs
+++ b/Sound/SC3/UGen/Record/PV_RectComb.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_RectComb2.hs b/Sound/SC3/UGen/Record/PV_RectComb2.hs
--- a/Sound/SC3/UGen/Record/PV_RectComb2.hs
+++ b/Sound/SC3/UGen/Record/PV_RectComb2.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_SoftWipe.hs b/Sound/SC3/UGen/Record/PV_SoftWipe.hs
--- a/Sound/SC3/UGen/Record/PV_SoftWipe.hs
+++ b/Sound/SC3/UGen/Record/PV_SoftWipe.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PV_SpectralEnhance.hs b/Sound/SC3/UGen/Record/PV_SpectralEnhance.hs
--- a/Sound/SC3/UGen/Record/PV_SpectralEnhance.hs
+++ b/Sound/SC3/UGen/Record/PV_SpectralEnhance.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_SpectralMap.hs b/Sound/SC3/UGen/Record/PV_SpectralMap.hs
--- a/Sound/SC3/UGen/Record/PV_SpectralMap.hs
+++ b/Sound/SC3/UGen/Record/PV_SpectralMap.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PV_Whiten.hs b/Sound/SC3/UGen/Record/PV_Whiten.hs
--- a/Sound/SC3/UGen/Record/PV_Whiten.hs
+++ b/Sound/SC3/UGen/Record/PV_Whiten.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PV_XFade.hs b/Sound/SC3/UGen/Record/PV_XFade.hs
--- a/Sound/SC3/UGen/Record/PV_XFade.hs
+++ b/Sound/SC3/UGen/Record/PV_XFade.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Pan2.hs b/Sound/SC3/UGen/Record/Pan2.hs
--- a/Sound/SC3/UGen/Record/Pan2.hs
+++ b/Sound/SC3/UGen/Record/Pan2.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Pan4.hs b/Sound/SC3/UGen/Record/Pan4.hs
--- a/Sound/SC3/UGen/Record/Pan4.hs
+++ b/Sound/SC3/UGen/Record/Pan4.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PanAz.hs b/Sound/SC3/UGen/Record/PanAz.hs
--- a/Sound/SC3/UGen/Record/PanAz.hs
+++ b/Sound/SC3/UGen/Record/PanAz.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PanB.hs b/Sound/SC3/UGen/Record/PanB.hs
--- a/Sound/SC3/UGen/Record/PanB.hs
+++ b/Sound/SC3/UGen/Record/PanB.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PanB2.hs b/Sound/SC3/UGen/Record/PanB2.hs
--- a/Sound/SC3/UGen/Record/PanB2.hs
+++ b/Sound/SC3/UGen/Record/PanB2.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PanX.hs b/Sound/SC3/UGen/Record/PanX.hs
--- a/Sound/SC3/UGen/Record/PanX.hs
+++ b/Sound/SC3/UGen/Record/PanX.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PanX2D.hs b/Sound/SC3/UGen/Record/PanX2D.hs
--- a/Sound/SC3/UGen/Record/PanX2D.hs
+++ b/Sound/SC3/UGen/Record/PanX2D.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PartConv.hs b/Sound/SC3/UGen/Record/PartConv.hs
--- a/Sound/SC3/UGen/Record/PartConv.hs
+++ b/Sound/SC3/UGen/Record/PartConv.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Pause.hs b/Sound/SC3/UGen/Record/Pause.hs
--- a/Sound/SC3/UGen/Record/Pause.hs
+++ b/Sound/SC3/UGen/Record/Pause.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PauseSelf.hs b/Sound/SC3/UGen/Record/PauseSelf.hs
--- a/Sound/SC3/UGen/Record/PauseSelf.hs
+++ b/Sound/SC3/UGen/Record/PauseSelf.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Peak.hs b/Sound/SC3/UGen/Record/Peak.hs
--- a/Sound/SC3/UGen/Record/Peak.hs
+++ b/Sound/SC3/UGen/Record/Peak.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PeakEQ2.hs b/Sound/SC3/UGen/Record/PeakEQ2.hs
--- a/Sound/SC3/UGen/Record/PeakEQ2.hs
+++ b/Sound/SC3/UGen/Record/PeakEQ2.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PeakEQ4.hs b/Sound/SC3/UGen/Record/PeakEQ4.hs
--- a/Sound/SC3/UGen/Record/PeakEQ4.hs
+++ b/Sound/SC3/UGen/Record/PeakEQ4.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PeakFollower.hs b/Sound/SC3/UGen/Record/PeakFollower.hs
--- a/Sound/SC3/UGen/Record/PeakFollower.hs
+++ b/Sound/SC3/UGen/Record/PeakFollower.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Phasor.hs b/Sound/SC3/UGen/Record/Phasor.hs
--- a/Sound/SC3/UGen/Record/Phasor.hs
+++ b/Sound/SC3/UGen/Record/Phasor.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Pitch.hs b/Sound/SC3/UGen/Record/Pitch.hs
--- a/Sound/SC3/UGen/Record/Pitch.hs
+++ b/Sound/SC3/UGen/Record/Pitch.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PitchShift.hs b/Sound/SC3/UGen/Record/PitchShift.hs
--- a/Sound/SC3/UGen/Record/PitchShift.hs
+++ b/Sound/SC3/UGen/Record/PitchShift.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PlaneTree.hs b/Sound/SC3/UGen/Record/PlaneTree.hs
--- a/Sound/SC3/UGen/Record/PlaneTree.hs
+++ b/Sound/SC3/UGen/Record/PlaneTree.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PlayBuf.hs b/Sound/SC3/UGen/Record/PlayBuf.hs
--- a/Sound/SC3/UGen/Record/PlayBuf.hs
+++ b/Sound/SC3/UGen/Record/PlayBuf.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Pluck.hs b/Sound/SC3/UGen/Record/Pluck.hs
--- a/Sound/SC3/UGen/Record/Pluck.hs
+++ b/Sound/SC3/UGen/Record/Pluck.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/PosRatio.hs b/Sound/SC3/UGen/Record/PosRatio.hs
--- a/Sound/SC3/UGen/Record/PosRatio.hs
+++ b/Sound/SC3/UGen/Record/PosRatio.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/PrintVal.hs b/Sound/SC3/UGen/Record/PrintVal.hs
--- a/Sound/SC3/UGen/Record/PrintVal.hs
+++ b/Sound/SC3/UGen/Record/PrintVal.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/PulseDivider.hs b/Sound/SC3/UGen/Record/PulseDivider.hs
--- a/Sound/SC3/UGen/Record/PulseDivider.hs
+++ b/Sound/SC3/UGen/Record/PulseDivider.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Qitch.hs b/Sound/SC3/UGen/Record/Qitch.hs
--- a/Sound/SC3/UGen/Record/Qitch.hs
+++ b/Sound/SC3/UGen/Record/Qitch.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/RDelayMap.hs b/Sound/SC3/UGen/Record/RDelayMap.hs
--- a/Sound/SC3/UGen/Record/RDelayMap.hs
+++ b/Sound/SC3/UGen/Record/RDelayMap.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/RDelaySet.hs b/Sound/SC3/UGen/Record/RDelaySet.hs
--- a/Sound/SC3/UGen/Record/RDelaySet.hs
+++ b/Sound/SC3/UGen/Record/RDelaySet.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/RDelaySetB.hs b/Sound/SC3/UGen/Record/RDelaySetB.hs
--- a/Sound/SC3/UGen/Record/RDelaySetB.hs
+++ b/Sound/SC3/UGen/Record/RDelaySetB.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/RHPF.hs b/Sound/SC3/UGen/Record/RHPF.hs
--- a/Sound/SC3/UGen/Record/RHPF.hs
+++ b/Sound/SC3/UGen/Record/RHPF.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/RLPF.hs b/Sound/SC3/UGen/Record/RLPF.hs
--- a/Sound/SC3/UGen/Record/RLPF.hs
+++ b/Sound/SC3/UGen/Record/RLPF.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/RLPFD.hs b/Sound/SC3/UGen/Record/RLPFD.hs
--- a/Sound/SC3/UGen/Record/RLPFD.hs
+++ b/Sound/SC3/UGen/Record/RLPFD.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/RMEQ.hs b/Sound/SC3/UGen/Record/RMEQ.hs
--- a/Sound/SC3/UGen/Record/RMEQ.hs
+++ b/Sound/SC3/UGen/Record/RMEQ.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/RMShelf.hs b/Sound/SC3/UGen/Record/RMShelf.hs
--- a/Sound/SC3/UGen/Record/RMShelf.hs
+++ b/Sound/SC3/UGen/Record/RMShelf.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/RMShelf2.hs b/Sound/SC3/UGen/Record/RMShelf2.hs
--- a/Sound/SC3/UGen/Record/RMShelf2.hs
+++ b/Sound/SC3/UGen/Record/RMShelf2.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/RPlayTrace.hs b/Sound/SC3/UGen/Record/RPlayTrace.hs
--- a/Sound/SC3/UGen/Record/RPlayTrace.hs
+++ b/Sound/SC3/UGen/Record/RPlayTrace.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/RShufflerL.hs b/Sound/SC3/UGen/Record/RShufflerL.hs
--- a/Sound/SC3/UGen/Record/RShufflerL.hs
+++ b/Sound/SC3/UGen/Record/RShufflerL.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Ramp.hs b/Sound/SC3/UGen/Record/Ramp.hs
--- a/Sound/SC3/UGen/Record/Ramp.hs
+++ b/Sound/SC3/UGen/Record/Ramp.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/RandID.hs b/Sound/SC3/UGen/Record/RandID.hs
--- a/Sound/SC3/UGen/Record/RandID.hs
+++ b/Sound/SC3/UGen/Record/RandID.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/RedDPCMdecode.hs b/Sound/SC3/UGen/Record/RedDPCMdecode.hs
--- a/Sound/SC3/UGen/Record/RedDPCMdecode.hs
+++ b/Sound/SC3/UGen/Record/RedDPCMdecode.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/RedDPCMencode.hs b/Sound/SC3/UGen/Record/RedDPCMencode.hs
--- a/Sound/SC3/UGen/Record/RedDPCMencode.hs
+++ b/Sound/SC3/UGen/Record/RedDPCMencode.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/RedLbyl.hs b/Sound/SC3/UGen/Record/RedLbyl.hs
--- a/Sound/SC3/UGen/Record/RedLbyl.hs
+++ b/Sound/SC3/UGen/Record/RedLbyl.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/RedPhasor.hs b/Sound/SC3/UGen/Record/RedPhasor.hs
--- a/Sound/SC3/UGen/Record/RedPhasor.hs
+++ b/Sound/SC3/UGen/Record/RedPhasor.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/RedPhasor2.hs b/Sound/SC3/UGen/Record/RedPhasor2.hs
--- a/Sound/SC3/UGen/Record/RedPhasor2.hs
+++ b/Sound/SC3/UGen/Record/RedPhasor2.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/RegaliaMitraEQ.hs b/Sound/SC3/UGen/Record/RegaliaMitraEQ.hs
--- a/Sound/SC3/UGen/Record/RegaliaMitraEQ.hs
+++ b/Sound/SC3/UGen/Record/RegaliaMitraEQ.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/ReplaceOut.hs b/Sound/SC3/UGen/Record/ReplaceOut.hs
--- a/Sound/SC3/UGen/Record/ReplaceOut.hs
+++ b/Sound/SC3/UGen/Record/ReplaceOut.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Resonz.hs b/Sound/SC3/UGen/Record/Resonz.hs
--- a/Sound/SC3/UGen/Record/Resonz.hs
+++ b/Sound/SC3/UGen/Record/Resonz.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Ringz.hs b/Sound/SC3/UGen/Record/Ringz.hs
--- a/Sound/SC3/UGen/Record/Ringz.hs
+++ b/Sound/SC3/UGen/Record/Ringz.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/RosslerResL.hs b/Sound/SC3/UGen/Record/RosslerResL.hs
--- a/Sound/SC3/UGen/Record/RosslerResL.hs
+++ b/Sound/SC3/UGen/Record/RosslerResL.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Rotate.hs b/Sound/SC3/UGen/Record/Rotate.hs
--- a/Sound/SC3/UGen/Record/Rotate.hs
+++ b/Sound/SC3/UGen/Record/Rotate.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/RunningMax.hs b/Sound/SC3/UGen/Record/RunningMax.hs
--- a/Sound/SC3/UGen/Record/RunningMax.hs
+++ b/Sound/SC3/UGen/Record/RunningMax.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/RunningMin.hs b/Sound/SC3/UGen/Record/RunningMin.hs
--- a/Sound/SC3/UGen/Record/RunningMin.hs
+++ b/Sound/SC3/UGen/Record/RunningMin.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/RunningSum.hs b/Sound/SC3/UGen/Record/RunningSum.hs
--- a/Sound/SC3/UGen/Record/RunningSum.hs
+++ b/Sound/SC3/UGen/Record/RunningSum.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/SID6581f.hs b/Sound/SC3/UGen/Record/SID6581f.hs
--- a/Sound/SC3/UGen/Record/SID6581f.hs
+++ b/Sound/SC3/UGen/Record/SID6581f.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/SMS.hs b/Sound/SC3/UGen/Record/SMS.hs
--- a/Sound/SC3/UGen/Record/SMS.hs
+++ b/Sound/SC3/UGen/Record/SMS.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/SN76489.hs b/Sound/SC3/UGen/Record/SN76489.hs
--- a/Sound/SC3/UGen/Record/SN76489.hs
+++ b/Sound/SC3/UGen/Record/SN76489.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/SOS.hs b/Sound/SC3/UGen/Record/SOS.hs
--- a/Sound/SC3/UGen/Record/SOS.hs
+++ b/Sound/SC3/UGen/Record/SOS.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/SVF.hs b/Sound/SC3/UGen/Record/SVF.hs
--- a/Sound/SC3/UGen/Record/SVF.hs
+++ b/Sound/SC3/UGen/Record/SVF.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Schmidt.hs b/Sound/SC3/UGen/Record/Schmidt.hs
--- a/Sound/SC3/UGen/Record/Schmidt.hs
+++ b/Sound/SC3/UGen/Record/Schmidt.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/SendTrig.hs b/Sound/SC3/UGen/Record/SendTrig.hs
--- a/Sound/SC3/UGen/Record/SendTrig.hs
+++ b/Sound/SC3/UGen/Record/SendTrig.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Shaper.hs b/Sound/SC3/UGen/Record/Shaper.hs
--- a/Sound/SC3/UGen/Record/Shaper.hs
+++ b/Sound/SC3/UGen/Record/Shaper.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/SineShaper.hs b/Sound/SC3/UGen/Record/SineShaper.hs
--- a/Sound/SC3/UGen/Record/SineShaper.hs
+++ b/Sound/SC3/UGen/Record/SineShaper.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/SkipNeedle.hs b/Sound/SC3/UGen/Record/SkipNeedle.hs
--- a/Sound/SC3/UGen/Record/SkipNeedle.hs
+++ b/Sound/SC3/UGen/Record/SkipNeedle.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Slew.hs b/Sound/SC3/UGen/Record/Slew.hs
--- a/Sound/SC3/UGen/Record/Slew.hs
+++ b/Sound/SC3/UGen/Record/Slew.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Slope.hs b/Sound/SC3/UGen/Record/Slope.hs
--- a/Sound/SC3/UGen/Record/Slope.hs
+++ b/Sound/SC3/UGen/Record/Slope.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/SmoothDecimator.hs b/Sound/SC3/UGen/Record/SmoothDecimator.hs
--- a/Sound/SC3/UGen/Record/SmoothDecimator.hs
+++ b/Sound/SC3/UGen/Record/SmoothDecimator.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/SoftClipAmp.hs b/Sound/SC3/UGen/Record/SoftClipAmp.hs
--- a/Sound/SC3/UGen/Record/SoftClipAmp.hs
+++ b/Sound/SC3/UGen/Record/SoftClipAmp.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/SoftClipAmp4.hs b/Sound/SC3/UGen/Record/SoftClipAmp4.hs
--- a/Sound/SC3/UGen/Record/SoftClipAmp4.hs
+++ b/Sound/SC3/UGen/Record/SoftClipAmp4.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/SoftClipAmp8.hs b/Sound/SC3/UGen/Record/SoftClipAmp8.hs
--- a/Sound/SC3/UGen/Record/SoftClipAmp8.hs
+++ b/Sound/SC3/UGen/Record/SoftClipAmp8.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/SoftClipper4.hs b/Sound/SC3/UGen/Record/SoftClipper4.hs
--- a/Sound/SC3/UGen/Record/SoftClipper4.hs
+++ b/Sound/SC3/UGen/Record/SoftClipper4.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/SoftClipper8.hs b/Sound/SC3/UGen/Record/SoftClipper8.hs
--- a/Sound/SC3/UGen/Record/SoftClipper8.hs
+++ b/Sound/SC3/UGen/Record/SoftClipper8.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Spreader.hs b/Sound/SC3/UGen/Record/Spreader.hs
--- a/Sound/SC3/UGen/Record/Spreader.hs
+++ b/Sound/SC3/UGen/Record/Spreader.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/Spring.hs b/Sound/SC3/UGen/Record/Spring.hs
--- a/Sound/SC3/UGen/Record/Spring.hs
+++ b/Sound/SC3/UGen/Record/Spring.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/SpruceBudworm.hs b/Sound/SC3/UGen/Record/SpruceBudworm.hs
--- a/Sound/SC3/UGen/Record/SpruceBudworm.hs
+++ b/Sound/SC3/UGen/Record/SpruceBudworm.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Squiz.hs b/Sound/SC3/UGen/Record/Squiz.hs
--- a/Sound/SC3/UGen/Record/Squiz.hs
+++ b/Sound/SC3/UGen/Record/Squiz.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/Stepper.hs b/Sound/SC3/UGen/Record/Stepper.hs
--- a/Sound/SC3/UGen/Record/Stepper.hs
+++ b/Sound/SC3/UGen/Record/Stepper.hs
@@ -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
   }
diff --git a/Sound/SC3/UGen/Record/StereoConvolution2L.hs b/Sound/SC3/UGen/Record/StereoConvolution2L.hs
--- a/Sound/SC3/UGen/Record/StereoConvolution2L.hs
+++ b/Sound/SC3/UGen/Record/StereoConvolution2L.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/Sweep.hs b/Sound/SC3/UGen/Record/Sweep.hs
--- a/Sound/SC3/UGen/Record/Sweep.hs
+++ b/Sound/SC3/UGen/Record/Sweep.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/SwitchDelay.hs b/Sound/SC3/UGen/Record/SwitchDelay.hs
--- a/Sound/SC3/UGen/Record/SwitchDelay.hs
+++ b/Sound/SC3/UGen/Record/SwitchDelay.hs
@@ -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,
diff --git a/Sound/SC3/UGen/Record/T2A.hs b/Sound/SC3/UGen/Record/T2A.hs
--- a/Sound/SC3/UGen/Record/T2A.hs
+++ b/Sound/SC3/UGen/Record/T2A.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/T2K.hs b/Sound/SC3/UGen/Record/T2K.hs
--- a/Sound/SC3/UGen/Record/T2K.hs
+++ b/Sound/SC3/UGen/Record/T2K.hs
@@ -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
diff --git a/Sound/SC3/UGen/Record/TBall.hs b/Sound/SC3/UGen/Record/TBall.hs
--- a/Sound/SC3/UGen/Record/TBall.hs
+++ b/Sound/SC3/UGen/Record/TBall.hs
@@ -4,7 +4,7 @@
 import Sound.SC3.UGen.Record
 data TBall = TBall {
   rate :: S.Rate,
-  in :: S.UGen,
+  input :: S.UGen,
   g :: S.UGen,
   damp :: S.UGen,
   friction :: S.UGen
@@ -12,7 +12,7 @@
 tBall :: TBall
 tBall = TBall {
   rate = S.AR,
-  in = 0.0,
+  input = 0.0,
   g = 10.0,
   damp = 0.0,
   friction = 0.01
diff --git a/Sound/SC3/UGen/Record/TDelay.hs b/Sound/SC3/UGen/Record/TDelay.hs
--- a/Sound/SC3/UGen/Record/TDelay.hs
+++ b/Sound/SC3/UGen/Record/TDelay.hs
@@ -4,13 +4,13 @@
 import Sound.SC3.UGen.Record
 data TDelay = TDelay {
   rate :: S.Rate,
-  in :: S.UGen,
+  input :: S.UGen,
   dur :: S.UGen
   } deriving (Show)
 tDelay :: TDelay
 tDelay = TDelay {
   rate = S.AR,
-  in = 0.0,
+  input = 0.0,
   dur = 0.1
   }
 mkTDelay :: TDelay -> S.UGen
diff --git a/Sound/SC3/UGen/Record/TGrains.hs b/Sound/SC3/UGen/Record/TGrains.hs
--- a/Sound/SC3/UGen/Record/TGrains.hs
+++ b/Sound/SC3/UGen/Record/TGrains.hs
@@ -5,7 +5,7 @@
 data TGrains = TGrains {
   trigger :: S.UGen,
   bufnum :: S.UGen,
-  rate :: S.UGen,
+  rate_ :: S.UGen,
   centerPos :: S.UGen,
   dur :: S.UGen,
   pan :: S.UGen,
@@ -16,7 +16,7 @@
 tGrains = TGrains {
   trigger = 0.0,
   bufnum = 0.0,
-  rate = 1.0,
+  rate_ = 1.0,
   centerPos = 0.0,
   dur = 0.1,
   pan = 0.0,
diff --git a/Sound/SC3/UGen/Record/TGrains2.hs b/Sound/SC3/UGen/Record/TGrains2.hs
--- a/Sound/SC3/UGen/Record/TGrains2.hs
+++ b/Sound/SC3/UGen/Record/TGrains2.hs
@@ -5,7 +5,7 @@
 data TGrains2 = TGrains2 {
   trigger :: S.UGen,
   bufnum :: S.UGen,
-  rate :: S.UGen,
+  rate_ :: S.UGen,
   centerPos :: S.UGen,
   dur :: S.UGen,
   pan :: S.UGen,
@@ -18,7 +18,7 @@
 tGrains2 = TGrains2 {
   trigger = 0.0,
   bufnum = 0.0,
-  rate = 1.0,
+  rate_ = 1.0,
   centerPos = 0.0,
   dur = 0.1,
   pan = 0.0,
diff --git a/Sound/SC3/UGen/Record/TGrains3.hs b/Sound/SC3/UGen/Record/TGrains3.hs
--- a/Sound/SC3/UGen/Record/TGrains3.hs
+++ b/Sound/SC3/UGen/Record/TGrains3.hs
@@ -5,7 +5,7 @@
 data TGrains3 = TGrains3 {
   trigger :: S.UGen,
   bufnum :: S.UGen,
-  rate :: S.UGen,
+  rate_ :: S.UGen,
   centerPos :: S.UGen,
   dur :: S.UGen,
   pan :: S.UGen,
@@ -19,7 +19,7 @@
 tGrains3 = TGrains3 {
   trigger = 0.0,
   bufnum = 0.0,
-  rate = 1.0,
+  rate_ = 1.0,
   centerPos = 0.0,
   dur = 0.1,
   pan = 0.0,
diff --git a/Sound/SC3/UGen/Record/TPV.hs b/Sound/SC3/UGen/Record/TPV.hs
--- a/Sound/SC3/UGen/Record/TPV.hs
+++ b/Sound/SC3/UGen/Record/TPV.hs
@@ -12,8 +12,8 @@
   tolerance :: S.UGen,
   noisefloor :: S.UGen
   } deriving (Show)
-tPV :: TPV
-tPV = TPV {
+tpv :: TPV
+tpv = TPV {
   chain = 0.0,
   windowsize = 1024.0,
   hopsize = 512.0,
diff --git a/Sound/SC3/UGen/Record/TWindex.hs b/Sound/SC3/UGen/Record/TWindex.hs
--- a/Sound/SC3/UGen/Record/TWindex.hs
+++ b/Sound/SC3/UGen/Record/TWindex.hs
@@ -4,14 +4,14 @@
 import Sound.SC3.UGen.Record
 data TWindex = TWindex {
   rate :: S.Rate,
-  in :: S.UGen,
+  input :: S.UGen,
   array :: S.UGen,
   normalize :: S.UGen
   } deriving (Show)
 tWindex :: TWindex
 tWindex = TWindex {
   rate = S.AR,
-  in = 0.0,
+  input = 0.0,
   array = 0.0,
   normalize = 0.0
   }
diff --git a/Sound/SC3/UGen/Record/Tartini.hs b/Sound/SC3/UGen/Record/Tartini.hs
--- a/Sound/SC3/UGen/Record/Tartini.hs
+++ b/Sound/SC3/UGen/Record/Tartini.hs
@@ -3,7 +3,7 @@
 import qualified Sound.SC3.UGen as S
 import Sound.SC3.UGen.Record
 data Tartini = Tartini {
-  in :: S.UGen,
+  input :: S.UGen,
   threshold :: S.UGen,
   n :: S.UGen,
   k :: S.UGen,
@@ -12,7 +12,7 @@
   } deriving (Show)
 tartini :: Tartini
 tartini = Tartini {
-  in = 0.0,
+  input = 0.0,
   threshold = 0.93,
   n = 2048.0,
   k = 0.0,
diff --git a/Sound/SC3/UGen/Record/Tilt.hs b/Sound/SC3/UGen/Record/Tilt.hs
--- a/Sound/SC3/UGen/Record/Tilt.hs
+++ b/Sound/SC3/UGen/Record/Tilt.hs
@@ -7,7 +7,7 @@
   x :: S.UGen,
   y :: S.UGen,
   z :: S.UGen,
-  tilt :: S.UGen
+  tilt_ :: S.UGen
   } deriving (Show)
 tilt :: Tilt
 tilt = Tilt {
@@ -15,7 +15,7 @@
   x = 0.0,
   y = 0.0,
   z = 0.0,
-  tilt = 0.0
+  tilt_ = 0.0
   }
 mkTilt :: Tilt -> S.UGen
 mkTilt (Tilt  a' b' c' d' e') = S.mkOsc S.AR "Tilt" [a',b',c',d',e'] 4
diff --git a/Sound/SC3/UGen/Record/Trig.hs b/Sound/SC3/UGen/Record/Trig.hs
--- a/Sound/SC3/UGen/Record/Trig.hs
+++ b/Sound/SC3/UGen/Record/Trig.hs
@@ -4,13 +4,13 @@
 import Sound.SC3.UGen.Record
 data Trig = Trig {
   rate :: S.Rate,
-  in :: S.UGen,
+  input :: S.UGen,
   dur :: S.UGen
   } deriving (Show)
 trig :: Trig
 trig = Trig {
   rate = S.AR,
-  in = 0.0,
+  input = 0.0,
   dur = 0.1
   }
 mkTrig :: Trig -> S.UGen
diff --git a/Sound/SC3/UGen/Record/Trig1.hs b/Sound/SC3/UGen/Record/Trig1.hs
--- a/Sound/SC3/UGen/Record/Trig1.hs
+++ b/Sound/SC3/UGen/Record/Trig1.hs
@@ -4,13 +4,13 @@
 import Sound.SC3.UGen.Record
 data Trig1 = Trig1 {
   rate :: S.Rate,
-  in :: S.UGen,
+  input :: S.UGen,
   dur :: S.UGen
   } deriving (Show)
 trig1 :: Trig1
 trig1 = Trig1 {
   rate = S.AR,
-  in = 0.0,
+  input = 0.0,
   dur = 0.1
   }
 mkTrig1 :: Trig1 -> S.UGen
diff --git a/Sound/SC3/UGen/Record/TrigAvg.hs b/Sound/SC3/UGen/Record/TrigAvg.hs
--- a/Sound/SC3/UGen/Record/TrigAvg.hs
+++ b/Sound/SC3/UGen/Record/TrigAvg.hs
@@ -3,12 +3,12 @@
 import qualified Sound.SC3.UGen as S
 import Sound.SC3.UGen.Record
 data TrigAvg = TrigAvg {
-  in :: S.UGen,
+  input :: S.UGen,
   trig :: S.UGen
   } deriving (Show)
 trigAvg :: TrigAvg
 trigAvg = TrigAvg {
-  in = 0.0,
+  input = 0.0,
   trig = 0.0
   }
 mkTrigAvg :: TrigAvg -> S.UGen
diff --git a/Sound/SC3/UGen/Record/TwoPole.hs b/Sound/SC3/UGen/Record/TwoPole.hs
--- a/Sound/SC3/UGen/Record/TwoPole.hs
+++ b/Sound/SC3/UGen/Record/TwoPole.hs
@@ -4,14 +4,14 @@
 import Sound.SC3.UGen.Record
 data TwoPole = TwoPole {
   rate :: S.Rate,
-  in :: S.UGen,
+  input :: S.UGen,
   freq :: S.UGen,
   radius :: S.UGen
   } deriving (Show)
 twoPole :: TwoPole
 twoPole = TwoPole {
   rate = S.AR,
-  in = 0.0,
+  input = 0.0,
   freq = 440.0,
   radius = 0.8
   }
diff --git a/Sound/SC3/UGen/Record/TwoZero.hs b/Sound/SC3/UGen/Record/TwoZero.hs
--- a/Sound/SC3/UGen/Record/TwoZero.hs
+++ b/Sound/SC3/UGen/Record/TwoZero.hs
@@ -4,14 +4,14 @@
 import Sound.SC3.UGen.Record
 data TwoZero = TwoZero {
   rate :: S.Rate,
-  in :: S.UGen,
+  input :: S.UGen,
   freq :: S.UGen,
   radius :: S.UGen
   } deriving (Show)
 twoZero :: TwoZero
 twoZero = TwoZero {
   rate = S.AR,
-  in = 0.0,
+  input = 0.0,
   freq = 440.0,
   radius = 0.8
   }
diff --git a/Sound/SC3/UGen/Record/VBAP.hs b/Sound/SC3/UGen/Record/VBAP.hs
--- a/Sound/SC3/UGen/Record/VBAP.hs
+++ b/Sound/SC3/UGen/Record/VBAP.hs
@@ -4,7 +4,7 @@
 import Sound.SC3.UGen.Record
 data VBAP = VBAP {
   rate :: S.Rate,
-  in :: S.UGen,
+  input :: S.UGen,
   bufnum :: S.UGen,
   azimuth :: S.UGen,
   elevation :: S.UGen,
@@ -13,7 +13,7 @@
 vBAP :: VBAP
 vBAP = VBAP {
   rate = S.AR,
-  in = 0.0,
+  input = 0.0,
   bufnum = 0.0,
   azimuth = 0.0,
   elevation = 1.0,
diff --git a/Sound/SC3/UGen/Record/VDiskIn.hs b/Sound/SC3/UGen/Record/VDiskIn.hs
--- a/Sound/SC3/UGen/Record/VDiskIn.hs
+++ b/Sound/SC3/UGen/Record/VDiskIn.hs
@@ -4,14 +4,14 @@
 import Sound.SC3.UGen.Record
 data VDiskIn = VDiskIn {
   bufnum :: S.UGen,
-  rate :: S.UGen,
+  rate_ :: S.UGen,
   loop :: S.UGen,
   sendID :: S.UGen
   } deriving (Show)
 vDiskIn :: VDiskIn
 vDiskIn = VDiskIn {
   bufnum = 0.0,
-  rate = 1.0,
+  rate_ = 1.0,
   loop = 0.0,
   sendID = 0.0
   }
diff --git a/Sound/SC3/UGen/Record/VarLag.hs b/Sound/SC3/UGen/Record/VarLag.hs
--- a/Sound/SC3/UGen/Record/VarLag.hs
+++ b/Sound/SC3/UGen/Record/VarLag.hs
@@ -4,7 +4,7 @@
 import Sound.SC3.UGen.Record
 data VarLag = VarLag {
   rate :: S.Rate,
-  in :: S.UGen,
+  input :: S.UGen,
   time :: S.UGen,
   curvature :: S.UGen,
   warp :: S.UGen,
@@ -13,7 +13,7 @@
 varLag :: VarLag
 varLag = VarLag {
   rate = S.AR,
-  in = 0.0,
+  input = 0.0,
   time = 0.1,
   curvature = 0.0,
   warp = 5.0,
diff --git a/Sound/SC3/UGen/Record/Vibrato.hs b/Sound/SC3/UGen/Record/Vibrato.hs
--- a/Sound/SC3/UGen/Record/Vibrato.hs
+++ b/Sound/SC3/UGen/Record/Vibrato.hs
@@ -5,7 +5,7 @@
 data Vibrato = Vibrato {
   rate :: S.Rate,
   freq :: S.UGen,
-  rate :: S.UGen,
+  rate_ :: S.UGen,
   depth :: S.UGen,
   delay :: S.UGen,
   onset :: S.UGen,
@@ -17,7 +17,7 @@
 vibrato = Vibrato {
   rate = S.AR,
   freq = 440.0,
-  rate = 6.0,
+  rate_ = 6.0,
   depth = 0.02,
   delay = 0.0,
   onset = 0.0,
diff --git a/Sound/SC3/UGen/Record/WAmp.hs b/Sound/SC3/UGen/Record/WAmp.hs
--- a/Sound/SC3/UGen/Record/WAmp.hs
+++ b/Sound/SC3/UGen/Record/WAmp.hs
@@ -3,12 +3,12 @@
 import qualified Sound.SC3.UGen as S
 import Sound.SC3.UGen.Record
 data WAmp = WAmp {
-  in :: S.UGen,
+  input :: S.UGen,
   winSize :: S.UGen
   } deriving (Show)
 wAmp :: WAmp
 wAmp = WAmp {
-  in = 0.0,
+  input = 0.0,
   winSize = 0.1
   }
 mkWAmp :: WAmp -> S.UGen
diff --git a/Sound/SC3/UGen/Record/WaveLoss.hs b/Sound/SC3/UGen/Record/WaveLoss.hs
--- a/Sound/SC3/UGen/Record/WaveLoss.hs
+++ b/Sound/SC3/UGen/Record/WaveLoss.hs
@@ -4,16 +4,16 @@
 import Sound.SC3.UGen.Record
 data WaveLoss = WaveLoss {
   rate :: S.Rate,
-  in :: S.UGen,
-  drop :: S.UGen,
+  input :: S.UGen,
+  drop_ :: S.UGen,
   outof :: S.UGen,
   mode :: S.UGen
   } deriving (Show)
 waveLoss :: WaveLoss
 waveLoss = WaveLoss {
   rate = S.AR,
-  in = 0.0,
-  drop = 20.0,
+  input = 0.0,
+  drop_ = 20.0,
   outof = 40.0,
   mode = 1.0
   }
diff --git a/Sound/SC3/UGen/Record/Wrap.hs b/Sound/SC3/UGen/Record/Wrap.hs
--- a/Sound/SC3/UGen/Record/Wrap.hs
+++ b/Sound/SC3/UGen/Record/Wrap.hs
@@ -4,14 +4,14 @@
 import Sound.SC3.UGen.Record
 data Wrap = Wrap {
   rate :: S.Rate,
-  in :: S.UGen,
+  input :: S.UGen,
   lo :: S.UGen,
   hi :: S.UGen
   } deriving (Show)
 wrap :: Wrap
 wrap = Wrap {
   rate = S.AR,
-  in = 0.0,
+  input = 0.0,
   lo = 0.0,
   hi = 1.0
   }
diff --git a/Sound/SC3/UGen/Record/WrapIndex.hs b/Sound/SC3/UGen/Record/WrapIndex.hs
--- a/Sound/SC3/UGen/Record/WrapIndex.hs
+++ b/Sound/SC3/UGen/Record/WrapIndex.hs
@@ -5,13 +5,13 @@
 data WrapIndex = WrapIndex {
   rate :: S.Rate,
   bufnum :: S.UGen,
-  in :: S.UGen
+  input :: S.UGen
   } deriving (Show)
 wrapIndex :: WrapIndex
 wrapIndex = WrapIndex {
   rate = S.AR,
   bufnum = 0.0,
-  in = 0.0
+  input = 0.0
   }
 mkWrapIndex :: WrapIndex -> S.UGen
 mkWrapIndex (WrapIndex r a' b') = S.mkOsc r "WrapIndex" [a',b'] 1
diff --git a/Sound/SC3/UGen/Record/WrapSummer.hs b/Sound/SC3/UGen/Record/WrapSummer.hs
--- a/Sound/SC3/UGen/Record/WrapSummer.hs
+++ b/Sound/SC3/UGen/Record/WrapSummer.hs
@@ -6,8 +6,8 @@
   rate :: S.Rate,
   trig :: S.UGen,
   step :: S.UGen,
-  min :: S.UGen,
-  max :: S.UGen,
+  min_ :: S.UGen,
+  max_ :: S.UGen,
   reset :: S.UGen,
   resetval :: S.UGen
   } deriving (Show)
@@ -16,8 +16,8 @@
   rate = S.AR,
   trig = 0.0,
   step = 1.0,
-  min = 0.0,
-  max = 1.0,
+  min_ = 0.0,
+  max_ = 1.0,
   reset = 0.0,
   resetval = 0.0
   }
diff --git a/Sound/SC3/UGen/Record/XOut.hs b/Sound/SC3/UGen/Record/XOut.hs
--- a/Sound/SC3/UGen/Record/XOut.hs
+++ b/Sound/SC3/UGen/Record/XOut.hs
@@ -6,14 +6,14 @@
   rate :: S.Rate,
   bus :: S.UGen,
   xfade :: S.UGen,
-  channelsArray :: S.UGen
+  input :: S.UGen
   } deriving (Show)
 xOut :: XOut
 xOut = XOut {
   rate = S.AR,
   bus = 0.0,
   xfade = 0.0,
-  channelsArray = 0.0
+  input = 0.0
   }
 mkXOut :: XOut -> S.UGen
 mkXOut (XOut r a' b' c') = S.mkOsc r "XOut" [a',b',c'] 1
diff --git a/Sound/SC3/UGen/Record/ZeroCrossing.hs b/Sound/SC3/UGen/Record/ZeroCrossing.hs
--- a/Sound/SC3/UGen/Record/ZeroCrossing.hs
+++ b/Sound/SC3/UGen/Record/ZeroCrossing.hs
@@ -4,12 +4,12 @@
 import Sound.SC3.UGen.Record
 data ZeroCrossing = ZeroCrossing {
   rate :: S.Rate,
-  in :: S.UGen
+  input :: S.UGen
   } deriving (Show)
 zeroCrossing :: ZeroCrossing
 zeroCrossing = ZeroCrossing {
   rate = S.AR,
-  in = 0.0
+  input = 0.0
   }
 mkZeroCrossing :: ZeroCrossing -> S.UGen
 mkZeroCrossing (ZeroCrossing r a') = S.mkOsc r "ZeroCrossing" [a'] 1
diff --git a/hsc3-rec.cabal b/hsc3-rec.cabal
--- a/hsc3-rec.cabal
+++ b/hsc3-rec.cabal
@@ -1,5 +1,5 @@
 Name:              hsc3-rec
-Version:           0.14
+Version:           0.14.1
 Synopsis:          Haskell SuperCollider Record Variants
 Description:       hsc3-rec provides record variants of the
                    unit generator constructors at hsc3.
diff --git a/mk/build.hs b/mk/build.hs
--- a/mk/build.hs
+++ b/mk/build.hs
@@ -20,8 +20,6 @@
       [] -> D.ugen_default_rate u
       _ -> undefined
 
---u_input_nm u k = D.input_name (D.ugen_inputs u !! k)
-
 -- List of field names and types.
 inputs_of :: D.U -> [(String, String)]
 inputs_of u =
@@ -51,25 +49,25 @@
       x:xs -> toLower x : xs
 
 -- Construct the parameter record.
-gen_param :: D.U -> [String]
-gen_param u =
+gen_param :: (D.U,D.U) -> [String]
+gen_param (u,u') =
     let n = D.ugen_name u
         pre = [printf "data %s = %s {" n n]
         post = ["  } deriving (Show)"]
         f (nm, ty) = printf "  %s :: %s" nm ty
-    in pre ++ with_comma (map f (inputs_of u)) ++ post
+    in pre ++ with_comma (map f (inputs_of u')) ++ post
 
 -- Construct a default instance of the parameter structure.
-gen_defaults :: D.U -> [String]
-gen_defaults u =
-    let (D.U n _ r _ is _ _ _) = u
-        nm = D.rename_ugen (downcase_first_char n)
-        pre = [ printf "%s :: %s" nm n
-              , printf "%s = %s {" nm n]
+gen_defaults :: (D.U,D.U) -> [String]
+gen_defaults (u,u') =
+    let (D.U nm _ r _ _ _ _ _) = u
+        (D.U nm' _ _ _ is' _ _ _) = u'
+        pre = [ printf "%s :: %s" nm' nm
+              , printf "%s = %s {" nm' nm]
         post = [ "  }" ]
         opt = if needs_rate u then [printf "  rate = S.%s," (show r)] else []
         f i = printf "  %s = %f" (D.input_name i) (D.input_default i)
-    in pre ++ opt ++ with_comma (map f is) ++ post
+    in pre ++ opt ++ with_comma (map f is') ++ post
 
 -- Generate a list of variable names (a,b..)
 var_names :: Int -> [String]
@@ -111,13 +109,14 @@
 -- Write module for a unit generator.
 write_module :: D.U -> IO ()
 write_module u =
-    let n = D.ugen_name u
+    let u' = D.u_rename u
+        n = D.ugen_name u
         m = [ printf "-- | %s" (D.ugen_summary u)
             , printf "module Sound.SC3.UGen.Record.%s where" n
             , "import qualified Sound.SC3.UGen as S"
             , "import Sound.SC3.UGen.Record" ]
-        p = gen_param u
-        d = gen_defaults u
+        p = gen_param (u,u')
+        d = gen_defaults (u,u')
         c = gen_cons u
         i = gen_make u
         fn = sc3_ugen_dir </> "Record" </> n <.> ".hs"