func main()
	var N: int :: cui@input().toInt(&)
	var dic: dict<int, int> :: #dict<int, int>
	var _: [][]char :: cui@input().split(" ")
	for i(0, N - 1)
		var a: int :: _[i].toInt(&)
		var cnt: int :: 0
		if(dic.exist(a))
			do cnt :: dic.get(a, &)
		end if
		do dic.add(a, cnt + 1)
	end for
	var ans: Ans :: #Ans
	do dic.forEach(f, ans)
	do cui@print("\{ans.val}\n")
	
	func f(key: int, value: int, data: kuin@Class): bool
		if(value = 1)
			do (data $ Ans).val :+ 1
		end if
		ret true
	end func
	class Ans()
		+var val: int
	end class
end func