add let construct

	modified:   Evaluation.hs
	modified:   Parser.hs
	modified:   input/example4