modified DefaultMain to make prime stream optional
added "imperative" Haskell sieve