func main()
	var a: int :: cui@inputInt()
	var b: int :: cui@inputInt()
	var c: int :: cui@inputInt()
	var d: int :: cui@inputInt()
	var ans: int :: 0
	for x(a, b)
		for y(c, d)
			do ans :+ x <> y ?(1, 0)
		end for
	end for
	do cui@print("\{ans}\n")
end func