 
 Jnoid.fromList = (list)->
   new EventStream(sendWrapped(list, toEvent))
+
 Jnoid.unit = (args...)->
   Jnoid.fromList(args)
 

class Next extends Event
  constructor: (@value) ->
  isNext: -> true
  describe: -> "Event.Next <#{@value}>"

class Initial extends Next
  isInitial: -> true

class End extends Event
  constructor: ->
  isEnd: -> true
  describe: -> '<end>'
  inspect: -> "Event.End"

class EventStream
  constructor: (unfold) ->
