diff --git a/TrueLevelArgs.hs b/TrueLevelArgs.hs
new file mode 100644
--- /dev/null
+++ b/TrueLevelArgs.hs
@@ -0,0 +1,113 @@
+--- Copyright (C) 2007 Bart Massey
+--- ALL RIGHTS RESERVED
+--- Please see the end of this file for license information.
+
+module TrueLevelArgs
+where
+
+import System.Console.ParseArgs
+
+data Options =
+    OptionUseRMS |
+    OptionDCBias |
+    OptionTickMS |
+    OptionWindowPercent |
+    OptionWindowOverlap |
+    OptionHighLimit |
+    OptionHighOutput |
+    OptionLowLimit |
+    OptionLowOutput |
+    OptionInputFile |
+    OptionOutputFile
+    deriving (Ord, Eq, Show)
+
+argd :: [ Arg Options ]
+argd = [ Arg { argIndex = OptionUseRMS,
+               argName = Just "rms",
+               argAbbr = Just 'r',
+               argData = Nothing,
+               argDesc = "Use RMS estimation instead of " ++
+                         "direct peak power measurement" },
+         Arg { argIndex = OptionDCBias,
+               argName = Just "dc-bias",
+               argAbbr = Just 'd',
+               argData = Nothing,
+               argDesc = "Retain DC bias in power measurement" },
+         Arg { argIndex = OptionTickMS,
+               argName = Just "tick",
+               argAbbr = Just 't',
+               argData = argDataDefaulted "msecs" ArgtypeInt 10,
+               argDesc = "Tick interval" },
+         Arg { argIndex = OptionWindowPercent,
+               argName = Just "window",
+               argAbbr = Just 'w',
+               argData = argDataDefaulted "percent" ArgtypeDouble 10,
+               argDesc = "Percent of tick at edges of " ++
+                         "trapezoidal window" },
+         Arg { argIndex = OptionWindowOverlap,
+               argName = Just "overlap",
+               argAbbr = Just 'o',
+               argData = argDataOptional "percent" ArgtypeDouble,
+               argDesc = "Percent of tick by which windows overlap" },
+         Arg { argIndex = OptionHighLimit,
+               argName = Just "high-limit",
+               argAbbr = Just 'h',
+               argData = argDataDefaulted "percent" ArgtypeDouble 80,
+               argDesc = "Input signals above this level " ++
+                         "will be limited" },
+         Arg { argIndex = OptionLowLimit,
+               argName = Just "low-limit",
+               argAbbr = Just 'l',
+               argData = argDataDefaulted "percent" ArgtypeDouble 0,
+               argDesc = "Input signals below this level " ++
+                         "will be limited" },
+         Arg { argIndex = OptionHighOutput,
+               argName = Just "high-output",
+               argAbbr = Just 'H',
+               argData = argDataDefaulted "percent" ArgtypeDouble 95,
+               argDesc = "Output level of high-limited signal" },
+         Arg { argIndex = OptionLowOutput,
+               argName = Just "low-output",
+               argAbbr = Just 'L',
+               argData = argDataDefaulted "percent" ArgtypeDouble 0,
+               argDesc = "Output level of low-limited signal" },
+         Arg { argIndex = OptionInputFile,
+               argName = Nothing,
+               argAbbr = Nothing,
+               argData = argDataOptional "input" ArgtypeString,
+               argDesc = "Input file" },
+         Arg { argIndex = OptionOutputFile,
+               argName = Nothing,
+               argAbbr = Nothing,
+               argData = argDataOptional "output" ArgtypeString,
+               argDesc = "Output file" }]
+
+--- Redistribution and use in source and binary forms, with or
+--- without modification, are permitted provided that the
+--- following conditions are met:
+---     * Redistributions of source code must retain the above
+---       copyright notice, this list of conditions and the following
+---       disclaimer.
+---     * Redistributions in binary form must reproduce the
+---       above copyright notice, this list of conditions and the
+---       following disclaimer in the documentation and/or other
+---       materials provided with the distribution.
+---     * Neither the name of Bart Massey, nor the names
+---       of other affiliated organizations, nor the names
+---       of other contributors may be used to endorse or promote
+---       products derived from this software without specific prior
+---       written permission.
+--- 
+--- THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND
+--- CONTRIBUTORS "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES,
+--- INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
+--- MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+--- DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
+--- CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+--- SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
+--- NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
+--- LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+--- HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+--- CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
+--- OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+--- SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
diff --git a/truelevel.cabal b/truelevel.cabal
--- a/truelevel.cabal
+++ b/truelevel.cabal
@@ -2,7 +2,7 @@
 Build-Type: Simple
 Description: An audio file compressor / limiter.  This
              program will adjust the dynamic range of a WAVE file.
-Version: 0.1.3
+Version: 0.1.3.1
 License: BSD3
 License-File: COPYING
 Copyright: Copyright (c) 2006-2014 Bart Massey
@@ -18,6 +18,7 @@
 Executable truelevel
   Default-Language: Haskell2010
   Main-Is: truelevel.hs
+  Other-Modules: TrueLevelArgs
   Build-Depends: base >=3&&<5, containers >=0.3&&<1,
                  parseargs >=0.1&&<1,
                  WAVE >=0.1&&<1
@@ -29,4 +30,4 @@
 Source-Repository this
   Type: git
   Location: https://github.com/BartMassey/truelevel.git
-  Tag: v0.1.3
+  Tag: v0.1.3.1