--Solve the functional equation f' o f = id by ansatz:
--assume f(x) = ax ^ b. Then
--f' o f (x) = ba^b * x ^ ( b ( b-1 ) )

local phi = 1 + math.sqrt( 5 ) / 2
local ihp = 1 - math.sqrt( 5 ) / 2
local function SeriesCoefficients( )
  
  local a, b = math.pow( phi, ihp ), phi
  local c, d = a, b
  for i = 1, 100 do
    
    --print( c, d )
    c = c * d
    d = d - 1

  end
  
end

SeriesCoefficients()