ifa = do 
	putStr "Name: "
	name <- getLine
	if name == "Koen"
		then putStrLn "I know you"
		else return ()