timjstewart

#! /bin/bash

package_name=$(basename `pwd`)

log_file=./cabal-init.log

function fatal() {
    echo "$1.  Examine ${log_file} for more information." 2>&1
    exit 1
}

ian-ross

{-# LANGUAGE EmptyDataDecls    #-}
{-# LANGUAGE NoImplicitPrelude #-}

module RingOscillator (main) where

import Language.Fay.FFI
import Language.Fay.Prelude


-- System parameters.

ian-ross

module Lorenz where

import Data.Default

data LzParam t = LzParam { sigma :: t, r :: t, b :: t } deriving (Eq, Show)

instance Floating t => Default (LzParam t) where
  def = LzParam 10 28 (8/3)

lorenz :: Floating t => t -> [t] -> [t]