func main()
	var x: int :: cui@inputInt()
	var a: []int :: math@primeFactors(x)
	var nums: dict<int, int> :: #dict<int, int>
	for i(0, ^a - 1)
		do nums.add(a[i], nums.get(a[i], &) + 1)
	end for
	
	var ans: lib@Int :: #lib@Int
	do ans.value :: 1
	do nums.forEach(f, ans $ kuin@Class)
	func f(key: int, val: int, data: kuin@Class): bool
		if(val % 2 = 1)
			do(data $ lib@Int).value :* key
		end if
		ret true
	end func
	do cui@print("\{ans}\n")
end func