module test

import iTasks 
import iTasks.Extensions.Document

Start w = startEngine t w

t :: Task Document
t = enterInformation "bork" []
	>>= viewInformation "doc" []