dmHeader :: String
dmHeader = unlines
           [ "Usage: matchcad [OPTION...] [file]"
                  , ""
                  , "matchcad /tmp/flange.het -sMatch -pFlangePattern -dComponent"
                  , ""
                  ]
dmHeader :: String
dmHeader = unlines
           [ "Usage: matchcad [OPTION...] [file]"
                  , ""
                  , "matchcad /tmp/flange.het -sMatch -pFlangePattern -dComponent"
                  , ""
                  ]
dmHeader = unlines
           [ "Usage: matchcad [OPTION...] [file]"
                  , ""
                  , "matchcad /tmp/flange.het -sMatch -pFlangePattern -dComponent"
                  , ""
                  ]