Commit 162e9d28 authored by martin.hecker's avatar martin.hecker
Browse files

turn haskellExamples into leksah project

parent b041ce37
dist
bin
bin-java
*.class
......
module Paths_haskellExamples (
version,
getBinDir, getLibDir, getDataDir, getLibexecDir,
getDataFileName
) where
import Data.Version (Version(..))
import System.Environment (getEnv)
version :: Version
version = Version {versionBranch = [0,1], versionTags = []}
bindir, libdir, datadir, libexecdir :: FilePath
bindir = "/home/paradigmen/.cabal/bin"
libdir = "/home/paradigmen/.cabal/lib/haskellExamples-0.1/ghc-6.12.3"
datadir = "/home/paradigmen/.cabal/share/haskellExamples-0.1"
libexecdir = "/home/paradigmen/.cabal/libexec"
getBinDir, getLibDir, getDataDir, getLibexecDir :: IO FilePath
getBinDir = catch (getEnv "haskellExamples_bindir") (\_ -> return bindir)
getLibDir = catch (getEnv "haskellExamples_libdir") (\_ -> return libdir)
getDataDir = catch (getEnv "haskellExamples_datadir") (\_ -> return datadir)
getLibexecDir = catch (getEnv "haskellExamples_libexecdir") (\_ -> return libexecdir)
getDataFileName :: FilePath -> IO FilePath
getDataFileName name = do
dir <- getDataDir
return (dir ++ "/" ++ name)
/* DO NOT EDIT: This file is automatically generated by Cabal */
/* package base-4.2.0.2 */
#define MIN_VERSION_base(major1,major2,minor) (\
(major1) < 4 || \
(major1) == 4 && (major2) < 2 || \
(major1) == 4 && (major2) == 2 && (minor) <= 0)
module Paths_haskellExamples (
version,
getBinDir, getLibDir, getDataDir, getLibexecDir,
getDataFileName
) where
import qualified Control.Exception as Exception
import Data.Version (Version(..))
import System.Environment (getEnv)
catchIO :: IO a -> (Exception.IOException -> IO a) -> IO a
catchIO = Exception.catch
version :: Version
version = Version {versionBranch = [0,1], versionTags = []}
bindir, libdir, datadir, libexecdir :: FilePath
bindir = "/home/paradigmen/.cabal/bin"
libdir = "/home/paradigmen/.cabal/lib/haskellExamples-0.1/ghc-7.4.1"
datadir = "/home/paradigmen/.cabal/share/haskellExamples-0.1"
libexecdir = "/home/paradigmen/.cabal/libexec"
getBinDir, getLibDir, getDataDir, getLibexecDir :: IO FilePath
getBinDir = catchIO (getEnv "haskellExamples_bindir") (\_ -> return bindir)
getLibDir = catchIO (getEnv "haskellExamples_libdir") (\_ -> return libdir)
getDataDir = catchIO (getEnv "haskellExamples_datadir") (\_ -> return datadir)
getLibexecDir = catchIO (getEnv "haskellExamples_libexecdir") (\_ -> return libexecdir)
getDataFileName :: FilePath -> IO FilePath
getDataFileName name = do
dir <- getDataDir
return (dir ++ "/" ++ name)
/* DO NOT EDIT: This file is automatically generated by Cabal */
/* package base-4.5.0.0 */
#define VERSION_base "4.5.0.0"
#define MIN_VERSION_base(major1,major2,minor) (\
(major1) < 4 || \
(major1) == 4 && (major2) < 5 || \
(major1) == 4 && (major2) == 5 && (minor) <= 0)
This diff is collapsed.
Version {versionBranch = [1,14,0], versionTags = []}
name: haskellExamples
version: 0.1
cabal-version: >= 1.2
name: haskellExamples
version: 0.1
cabal-version: >=1.2
build-type: Simple
license: GPL
homepage: http://pp.ipd.kit.edu/
synopsis: some haskell examples
description:
executable haskellExamples
hs-source-dirs: src
main-is: Main.hs
build-depends: base
other-modules: Arithmetik
main-is: Main.hs
build-depends:
base -any
hs-source-dirs: src
other-modules:
Arithmetik
Version of session file format:
2
Time of storage:
"Wed Aug 31 13:59:13 UTC 2016"
Layout: VerticalP (TerminalP {paneGroups = fromList [], paneTabs = Just TopP, currentPage = 1, detachedId = Nothing, detachedSize = Nothing}) (HorizontalP (TerminalP {paneGroups = fromList [("Browser",HorizontalP (TerminalP {paneGroups = fromList [], paneTabs = Nothing, currentPage = 0, detachedId = Nothing, detachedSize = Nothing}) (HorizontalP (TerminalP {paneGroups = fromList [], paneTabs = Nothing, currentPage = 0, detachedId = Nothing, detachedSize = Nothing}) (TerminalP {paneGroups = fromList [], paneTabs = Nothing, currentPage = 0, detachedId = Nothing, detachedSize = Nothing}) 132) 251),("Debug",HorizontalP (TerminalP {paneGroups = fromList [], paneTabs = Nothing, currentPage = 0, detachedId = Nothing, detachedSize = Nothing}) (TerminalP {paneGroups = fromList [], paneTabs = Just TopP, currentPage = 2, detachedId = Nothing, detachedSize = Nothing}) 223)], paneTabs = Just TopP, currentPage = 1, detachedId = Nothing, detachedSize = Nothing}) (TerminalP {paneGroups = fromList [], paneTabs = Just TopP, currentPage = 0, detachedId = Nothing, detachedSize = Nothing}) 509) 587
Population: [(Just (BufferSt (BufferState "/home/paradigmen/gits/ppvm.exampleprojects/leksah-projects/haskellExamples/src/Arithmetik.hs" 57)),[SplitP LeftP]),(Just (BreakpointsSt BreakpointsState),[SplitP RightP,SplitP TopP,GroupP "Debug",SplitP BottomP]),(Just (DocumentationSt (DocumentationState {zoom = 1.0, uri = Nothing})),[SplitP RightP,SplitP TopP]),(Just (ErrorsSt (ErrorsState {showErrors = True, showWarnings = True, showSuggestions = True, showTestFails = True})),[SplitP RightP,SplitP TopP]),(Just (GrepSt GrepState),[SplitP RightP,SplitP TopP]),(Just (LogSt LogState),[SplitP RightP,SplitP BottomP]),(Just (BufferSt (BufferState "/home/paradigmen/gits/ppvm.exampleprojects/leksah-projects/haskellExamples/src/Main.hs" 47)),[SplitP LeftP]),(Just (ModulesSt (ModulesState 327 (PackageScope False,False) (Nothing,Nothing) (ExpanderState {packageExp = ([],[]), packageExpNoBlack = ([],[]), packageDExp = ([],[]), packageDExpNoBlack = ([],[]), workspaceExp = ([],[]), workspaceExpNoBlack = ([],[]), workspaceDExp = ([],[]), workspaceDExpNoBlack = ([],[]), systemExp = ([],[]), systemExpNoBlack = ([],[])}))),[SplitP RightP,SplitP TopP,GroupP "Browser",SplitP BottomP,SplitP TopP]),(Just (OutputSt (OutputState {zoom = 1.0, alwaysHtml = False})),[SplitP RightP,SplitP TopP,GroupP "Debug",SplitP BottomP]),(Just (SearchSt (SearchState {searchString = "", searchScope = SystemScope, searchMode = Prefix {caseSense = False}})),[SplitP RightP,SplitP TopP]),(Just (InfoSt (InfoState Nothing)),[SplitP RightP,SplitP TopP,GroupP "Browser",SplitP BottomP,SplitP BottomP]),(Just (TraceSt TraceState),[SplitP RightP,SplitP TopP,GroupP "Debug",SplitP BottomP]),(Just (VariablesSt VariablesState),[SplitP RightP,SplitP TopP,GroupP "Debug",SplitP BottomP]),(Just (WorkspaceSt WorkspaceState),[SplitP RightP,SplitP TopP,GroupP "Browser",SplitP TopP]),(Just (BufferSt (BufferStateTrans "_Eval.hs" "fib 3\nfib 5\n\n" 5)),[SplitP RightP,SplitP TopP,GroupP "Debug",SplitP TopP])]
Window size: (1918,1023)
Full screen: False
Completion size:
(750,400)
Workspace: Just "/home/paradigmen/gits/ppvm.exampleprojects/leksah-projects/haskellExamples/haskellExamples.lkshw"
Active pane: Just "_Eval.hs"
Toolbar visible:
True
FindbarState: (False,FindState {entryStr = "", entryHist = [], replaceStr = "", replaceHist = [], caseSensitive = False, entireWord = False, wrapAround = True, regex = False, lineNr = 1})
Recently opened files:
["/home/paradigmen/gits/ppvm.exampleprojects/leksah-projects/haskellExamples/haskellExamples.cabal"]
Recently opened workspaces:
["/home/paradigmen/leksah.lkshw"]
Version of workspace file format:
2
Time of storage:
"Wed Aug 31 13:47:19 UTC 2016"
Name of the workspace:
"haskellExamples"
File paths of contained packages:
["haskellExamples.cabal"]
Maybe file path of an active package:
Just "haskellExamples.cabal"
Maybe name of an active executable:
Nothing
Version Control System configurations for packages:
fromList []
\ No newline at end of file
module Arithmetik where
fib 0 = 1
fib n = n * fib (n-1)
fak 0 = 1
fak n = n * fak (n-1)
fib 0 = 1
fib 1 = 1
fib n = fib (n-1) + fib (n-2)
module Main where
import Arithmetik (fib, fak)
main::IO()
main = putStrLn (show "Hello, World!") >>
putStrLn (show x)
where x = binom 6 5
putStrLn (show x)
where x = binom 6 4
binom n k
| (n<k) || (k<0) = error "invalid Argument"
| (k==0) || (k==n) = 1
| otherwise = binom (n-1) (k-1)
+ binom (n-1) k
fak 0 = 1
fak n = n * (fak (n-1))
fib 0 = 1
fib 1 = 1
fib n = fib (n-1) + fib (n-2)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment