Find all functions f : R -->  R such that

f(2007) = 2008 and for each  x, y \in R

f(4xy) = 2y(f(x+y) + f(x-y)).