황금비율(golden ratio) 구하기 with Lua

다음은  이차방정식 x^2 - x - 1  = 0 의 양의 근 즉 황금비율(golden ratio)을 구하는 Lua 애플리케이션 소스이다. 황금비율을 구하는 비례방정식은   1 : x = x : (x+1) 이며, 이를 이차방정식으로 표현한 것이 x^2 - x - 1  = 0 이다.

See:  http://en.wikipedia.org/wiki/Golden_ratio

1. -- Filename: testGoldenRatio.lua
2. --    황금률(즉, 이차방정식 x^2 - x - 1  = 0 의 양의 근)을 계산한다.
3. --
4. --  Execute: lua testGoldenRatio.lua
5. --
6. -- Date    24-March-2008
7. -- Author  PH Kim   [ pkim (AT) scripts.pe.kr ]
9. function printUsing()
10.     print("Using: lua testGoldenRatio.lua [-h|-help]");
11.     print("This calculates the value of the golden ratio.");
12. end
14. -- 이차방정식 a x^2 + b x + c  = 0 의 근을 구한다.
15. function findQuadraticRoot(a, b, c)
16.     if a == 0.0 then
17.         error( "Since the highest coefficient is zero, the given equation is not a quadratic equation." )
18.     elseif b*b - 4*a*c < 0.0 then
19.         error( "Since the discriminant " .. (b*b - 4*a*c) .. " is negative, the given equation has no real root." )
20.     end
22.     x1 = (-b + math.sqrt(b*b - 4*a*c)) / (2.0 * a)
23.     x2 = (-b - math.sqrt(b*b - 4*a*c)) / (2.0 * a)
24.     return {x1, x2}
25. end
27. -- 실행 시작 지점
28. if #arg > 0 and (arg[1] == "-h" or arg[1] == "-help") then
29.     printUsing()
30.     os.exit(1)
31. end
32. values = findQuadraticRoot(1.0, -1.0, -1.0)
33. x1 = values[1]
34. x2 = values[2]
35. if x1 >= x2 then
36.     print("The bigger root is " .. x1 .. ", ")
37.     print("and the less root is " .. x2 .. ".")
38. else
39.     print("The bigger root is " .. x2 .. ", ")
40.     print("and the less root is " .. x1 .. ".")
41. end

실행> lua testGoldenRatio.lua
The bigger root is 1.6180339887499,
and the less root is -0.61803398874989.




이 저작물은 크리에이티브 커먼즈 코리아 저작자표시-비영리-변경금지 2.0 대한민국 라이센스에 따라 이용하실 수 있습니다.