contract = forward (initialMarginFee <> exchangeFee 100) (Market gas thm nbp) vol1 0.45 gbp cash [ date 2011 1 d | d <- [2..3] ] [ date 2011 1 d | d <- [2..3] ]