J OF SEVEN HUNDRED  (calc1)
FOR_LOOP W EQUALS Q  (calc2)
E MINUS C  (calc3)
M OF TEN   (calc4)
IF NOT Z LESS THAN N  (calc5)
COS OF Q  (calc6)
O OF O DECIMAL POINT SIX EIGHT NINE COMMA J  (calc7)
THIRTEEN POINT SIX MINUS SEVEN HUNDRED OPEN MULTIPLY BY HUNDRED NINE CLOSE  (calc8)
T OF N COMMA FIFTY ONE  (calc9)
W OF E COMMA HUNDRED THIRTY FOUR  (calc10)
TANGENT OF G  (calc11)
LIMIT NOT V  (calc12)
S OF K COMMA HUNDRED TWENTY FIVE  (calc13)
LIMIT K  (calc14)
A OF POINT NINE TWO  (calc15)
OPEN PAREN THIRTY SEVEN DIVIDED BY HUNDRED AND TEN  CLOSE PARENTHESIS  (calc16)
SET G EQUAL H PLUS SIX HUNDRED AND FORTY THREE  (calc17)
SEVENTY SEVEN DIVIDE THIRTY OPEN PARENTHESIS TIMES FIFTY THREE CLOSE PAREN  (calc18)
DEFINE FUNCTION I ARGUMENT LIST U.  (calc19)
E OF O  (calc20)
SET O EQUAL TO A MULTIPLY BY HUNDRED AND TEN   (calc21)
F OF B COMMA P COMMA FOUR THOUSAND  (calc22)
SINE OF FIFTY FOUR  (calc23)
LIMIT C LESS THAN V  (calc24)
A OF SIXTY FIVE  (calc25)
M MINUS P  (calc26)
LIMIT Z EQUALS SEVENTEEN HUNDRED AND FORTY SIX  (calc27)
IF EIGHT MILLION GREATER THAN G  (calc28)
FOR_LOOP W EQUALS T TIMES ONE THOUSAND  (calc29)
LIMIT NOT P GREATER THAN EIGHT HUNDRED THOUSAND  (calc30)
FOR_LOOP X EQUALS HUNDRED AND EIGHTY SIX  (calc31)
O OF THOUSAND AND SIXTEEN COMMA THIRTY  (calc32)
S OF Y  (calc33)
SET L EQUALS Y TIMES HUNDRED FIFTY NINE  (calc34)
OPEN PAREN SEVEN THOUSAND THIRTY NINE DIVIDE THOUSAND EIGHT HUNDRED CLOSE  (calc35)
IF HUNDRED NINETY ONE EQUALS M  (calc36)
POINT ZERO FIVE SEVEN MINUS SEVENTY FOUR OPEN PARENTHESIS POWER SIX O CLOSE  (calc37)
FOR_LOOP S EQUALS ONE  (calc38)
OPEN PAREN THREE TIMES ELEVEN HUNDRED CLOSE PAREN  (calc39)
OPEN EIGHT MULTIPLY BY A MILLION CLOSE PAREN  (calc40)
D OF O COMMA THIRTY ONE COMMA SIX HUNDRED THOUSAND FOUR HUNDRED AND THIRTEEN  (calc41)
WHILE TWENTY EIGHT EQUALS K  (calc42)
WHILE I LESS THAN S  (calc43)
L OF FOUR HUNDRED SEVEN COMMA E  (calc44)
Z OF Z  (calc45)
R OF M  (calc46)
FOR_LOOP W EQUALS SEVENTY  (calc47)
HUNDRED SEVENTY EIGHT MULTIPLY BY EIGHTY OPEN SUBTRACT POINT O FOUR CLOSE PAREN  (calc48)
L OF SIX THOUSAND COMMA K COMMA A  (calc49)
IF V LESS THAN OR EQUAL TO DECIMAL POINT TWO ZERO  (calc50)
LIMIT NOT O FOUR NOT EQUAL TO D  (calc51)
LIMIT NOT I GREATER THAN OR EQUAL TO Z  (calc52)
WHILE B EQUALS SEVEN HUNDRED AND TWENTY POINT EIGHT  (calc53)
COMPUTER.  (calc54)
I POWER OF W  (calc55)
IF TEN  GREATER THAN OR EQUAL TO Z  (calc56)
OPEN PAREN TWENTY SIX MILLION ONE HUNDRED FIFTY SEVEN PLUS FOUR CLOSE PAREN  (calc57)
FOR_LOOP Q EQUALS NINETEEN  (calc58)
I OF EIGHTY ONE COMMA SEVENTY FIVE  (calc59)
M OF FIFTY TWO COMMA Y  (calc60)
P OF THIRTEEN HUNDRED SIXTY FIVE COMMA THOUSAND SIX HUNDRED SEVENTY SIX  (calc61)
EXPONENTIAL OF F  (calc62)
OPEN PAREN EIGHTY THREE TIMES NINETY EIGHT POINT SEVEN CLOSE  (calc63)
L OF SEVENTY NINE COMMA FORTY  (calc64)
O OF SEVENTY THOUSAND  (calc65)
O OF K COMMA SIX O ONE NINE FOUR SEVEN FIVE SIX SIX COMMA ZERO  (calc66)
I OF B COMMA THIRTY TWO  (calc67)
FOR_LOOP N EQUALS TWELVE  (calc68)
COSINE OF S  (calc69)
WHILE D GREATER THAN OR EQUAL TO SEVEN  HUNDRED  (calc70)
IF NOT EIGHT HUNDRED TEN  GREATER THAN C  (calc71)
LIMIT Z LESS THAN SEVENTY NINE  (calc72)
FOR_LOOP G EQUALS HUNDRED SEVENTY FIVE POINT EIGHT PLUS Q  (calc73)
LIMIT NOT X  (calc74)
DEFINE FUNCTION U ARGUMENT LIST N.  (calc75)
I OF EIGHTEEN COMMA HUNDRED SEVENTY THREE COMMA TEN   (calc76)
COMPUTER.  (calc77)
LOG OF ZERO O SEVEN  (calc78)
A OF T COMMA NINETEEN THOUSAND  (calc79)
X OF HUNDRED AND FORTY EIGHT COMMA G  (calc80)
K OF G  (calc81)
FOR_LOOP L EQUALS ONE HUNDRED TIMES S  (calc82)
X OF HUNDRED  (calc83)
WHILE I EQUALS Z  (calc84)
OPEN PAREN THOUSAND DIVIDE POINT O FIVE CLOSE PAREN  (calc85)
X OF EIGHT COMMA X  (calc86)
FOR_LOOP O EQUALS U  (calc87)
IF D EQUALS X  (calc88)
V OF SEVEN HUNDRED  (calc89)
IF V GREATER THAN B  (calc90)
FOR_LOOP X EQUALS FIFTY EIGHT DIVIDED BY F  (calc91)
FOR_LOOP I EQUALS H DIVIDED BY SEVENTY TWO  (calc92)
M OF I COMMA N  (calc93)
J OF W COMMA C  (calc94)
G OF THREE HUNDRED AND TWO  (calc95)
OPEN PARENTHESIS TWELVE HUNDRED EIGHTY EIGHT POWER POINT ONE CLOSE  (calc96)
WHILE HUNDRED THIRTY GREATER THAN OR EQUAL TO S  (calc97)
OPEN PARENTHESIS O OVER FOUR CLOSE PAREN  (calc98)
E OF THREE FOUR FIVE COMMA FOURTEEN  (calc99)
LOG OF ONE  (calc100)
LIMIT X OR M  (calc101)
DEFINE FUNCTION R ARGUMENT LIST I COMMA G COMMA E.  (calc102)
FOR_LOOP C EQUALS SEVENTEEN HUNDRED O SIX  (calc103)
SET M EQUAL K MINUS FOUR  (calc104)
X OF E COMMA B  (calc105)
NINETY OVER SIXTEEN OPEN PARENTHESIS POWER OF SIXTY POINT ZERO CLOSE  (calc106)
FOR_LOOP O EQUALS NINETY FOUR  (calc107)
D TO THE POWER OF L  (calc108)
FOR_LOOP I EQUALS NINE ONE  (calc109)
SQUARE ROOT  OF B  (calc110)
HUNDRED AND SIXTEEN DIVIDED BY NINE  (calc111)
C OF W COMMA EIGHTY TWO THOUSAND  (calc112)
WHILE EIGHTY FIVE NOT EQUAL TO I  (calc113)
COS OF O  (calc114)
LIMIT B LESS THAN A AND X LESS THAN OR EQUAL TO THREE HUNDRED SIXTY SIX  (calc115)
LOG OF U  (calc116)
T OF EIGHT HUNDRED AND FORTY SIX MILLION ONE HUNDRED COMMA W COMMA Y  (calc117)
SINE OF U  (calc118)
T OF S COMMA X COMMA ONE HUNDRED  (calc119)
WHILE D GREATER THAN F  (calc120)
DEFINE FUNCTION U ARGUMENT LIST M.  (calc121)
E OF W COMMA H  (calc122)
LIMIT Q GREATER THAN OR EQUAL TO THIRTY SIX POINT THREE  (calc123)
LOG OF P  (calc124)
U OF NINE  (calc125)
FOR_LOOP J EQUALS S MULTIPLY BY THIRTY FOUR  (calc126)
FOR_LOOP L EQUALS I MULTIPLY BY THOUSAND  (calc127)
SQUARE ROOT  OF A  (calc128)
K OF T COMMA FORTY FIVE  (calc129)
LIMIT W GREATER THAN S  (calc130)
COSINE OF W  (calc131)
FOR_LOOP E EQUALS EIGHT HUNDRED TWENTY  (calc132)
OPEN FORTY SUBTRACT ONE HUNDRED CLOSE  (calc133)
WHILE SEVEN HUNDRED FIVE EQUALS P  (calc134)
D OF HUNDRED COMMA O  (calc135)
COS OF TWELVE HUNDRED AND SIXTY TWO  (calc136)
FOR_LOOP O EQUALS W DIVIDED BY THREE THOUSAND  (calc137)
LOG OF W  (calc138)
Z OVER W  (calc139)
SIXTY DIVIDED BY ONE HUNDRED  (calc140)
SIX SEVEN PLUS THREE  (calc141)
FOR_LOOP U EQUALS HUNDRED AND THIRTY THREE  (calc142)
IF NOT L EQUALS B  (calc143)
FOR_LOOP E EQUALS FIFTY  (calc144)
T OF NINETY TWO  (calc145)
IF D  (calc146)
DEFINE FUNCTION X ARGUMENT LIST J COMMA Z COMMA P.  (calc147)
OPEN PAREN POINT FOUR FIVE POWER OF EIGHTY SIX CLOSE PARENTHESIS  (calc148)
R OF W COMMA FIFTY NINE COMMA C  (calc149)
X OF M  (calc150)
Y OF Q COMMA FOUR HUNDRED  (calc151)
FOR_LOOP Q EQUALS TEN   (calc152)
S OF ONE HUNDRED  (calc153)
Q OF THREE SEVEN EIGHT NINE COMMA FOUR MILLION FORTY SIX COMMA K  (calc154)
POINT FIVE ZERO OVER SIXTY SEVEN  (calc155)
LIMIT NINETY SIX LESS THAN C  (calc156)
FOR_LOOP S EQUALS B DIVIDED BY HUNDRED AND ELEVEN  (calc157)
OPEN EIGHT HUNDRED MINUS ZERO CLOSE PAREN  (calc158)
G OF W COMMA FORTY NINE  (calc159)
FOR_LOOP Q EQUALS D OVER TWENTY FIVE THOUSAND  (calc160)
FOR_LOOP S EQUALS T  (calc161)
ENTER.  (calc162)
FOR_LOOP U EQUALS POINT NINE FOUR PLUS E  (calc163)
DEFINE FUNCTION T ARGUMENT LIST P.  (calc164)
DEFINE FUNCTION L ARGUMENT LIST D.  (calc165)
WHILE A LESS THAN Q  (calc166)
BEGIN.  (calc167)
DEFINE FUNCTION C ARGUMENT LIST L COMMA W COMMA M.  (calc168)
IF P NOT EQUAL TO NINETY ONE  (calc169)
DEFINE FUNCTION D ARGUMENT LIST G COMMA N.  (calc170)
SET W EQUAL TO Q OVER POINT O  (calc171)
FOR_LOOP Q EQUALS Z DIVIDED BY THREE HUNDRED  (calc172)
SET O EQUAL NATURAL LOG P  (calc173)
E OF X  (calc174)
OPEN PAREN ONE HUNDRED ONE DIVIDE HUNDRED TWENTY ONE CLOSE PARENTHESIS  (calc175)
WHILE SEVENTEEN HUNDRED EIGHT EQUALS Z  (calc176)
DEFINE FUNCTION K ARGUMENT LIST D COMMA Z.  (calc177)
FOR_LOOP D EQUALS SEVEN HUNDRED SIXTY EIGHT  (calc178)
SET Z EQUAL TO F MINUS SEVEN HUNDRED NINETY EIGHT  (calc179)
NATURAL LOG OF E  (calc180)
Z OF B COMMA NINE HUNDRED EIGHTY FIVE  (calc181)
P OF A COMMA POINT TWO COMMA ONE HUNDRED  (calc182)
FOR_LOOP T EQUALS EIGHT  (calc183)
SET J EQUALS LOG S  (calc184)
D OF ONE HUNDRED EIGHTY COMMA SEVEN HUNDRED  (calc185)
NATURAL LOG OF W  (calc186)
A OF TWENTY TWO COMMA K  (calc187)
FOR_LOOP J EQUALS HUNDRED SIXTY TWO  (calc188)
OPEN PAREN FOUR MULTIPLY BY ZERO POINT TWO CLOSE PAREN  (calc189)
WHILE T EQUALS S  (calc190)
R OF THREE HUNDRED  (calc191)
R OF THREE COMMA POINT NINE COMMA Y  (calc192)
F OF TWENTY SIX COMMA J COMMA ONE THOUSAND  (calc193)
U OF THOUSAND AND FIFTEEN COMMA FIFTY FIVE COMMA J  (calc194)
T OF THIRTY SIX  (calc195)
THOUSAND TWO HUNDRED MINUS SEVEN NINE OPEN SUBTRACT ZERO SIX CLOSE PAREN  (calc196)
STANDBY.  (calc197)
K OF F COMMA J  (calc198)
T OF A COMMA FIFTY NINE  (calc199)
W OF FOUR HUNDRED COMMA THIRTY FIVE  (calc200)
FOR_LOOP J EQUALS E  (calc201)
T OF U COMMA D COMMA U  (calc202)
SIXTEEN HUNDRED O SEVEN POWER FORTY FIVE  (calc203)
LIMIT L LESS THAN OR EQUAL TO ONE THOUSAND  (calc204)
C OF D COMMA E COMMA K  (calc205)
LIMIT NOT H  (calc206)
WHILE Q EQUALS C  (calc207)
WHILE X GREATER THAN C  (calc208)
A MINUS Y  (calc209)
X MULTIPLY BY J  (calc210)
OPEN SIXTEEN HUNDRED AND ELEVEN DIVIDED BY TWENTY CLOSE  (calc211)
FOR_LOOP Z EQUALS R  (calc212)
FOR_LOOP D EQUALS SEVENTY  (calc213)
TEN  OVER FOUR HUNDRED THOUSAND OPEN PARENTHESIS TIMES TWO CLOSE  (calc214)
DEFINE FUNCTION Y ARGUMENT LIST V.  (calc215)
C OF O  (calc216)
L OF O  (calc217)
P OF U  (calc218)
OPEN PARENTHESIS FORTY ONE DECIMAL POINT NINE DIVIDE POINT EIGHT THREE CLOSE  (calc219)
FOR_LOOP W EQUALS THOUSAND AND SIXTY NINE  (calc220)
ZERO POWER OF NINETY ONE  (calc221)
FOR_LOOP M EQUALS POINT TWO SIX TWO NINE  (calc222)
LIMIT T EQUALS HUNDRED AND TWENTY NINE  (calc223)
SEVEN THOUSAND TWENTY NINE POWER OF HUNDRED FORTY FOUR MILLION  (calc224)
WHILE SIXTY THREE EQUALS D  (calc225)
S OF SIXTEEN COMMA SEVENTEEN  (calc226)
POINT O THREE NINE FOUR FIVE POWER FIFTY  (calc227)
SQUARE ROOT  OF B  (calc228)
Y OF SEVEN HUNDRED EIGHTEEN COMMA ONE HUNDRED COMMA T  (calc229)
WHILE T LESS THAN OR EQUAL TO T  (calc230)
I DIVIDE P  (calc231)
SIX POWER OF SEVEN POINT TWO  (calc232)
FOR_LOOP P EQUALS THIRTY FIVE OVER L  (calc233)
FOR_LOOP X EQUALS S OVER FIFTY THREE  (calc234)
COS OF TWENTY ONE  (calc235)
J OF FOUR SIX COMMA B COMMA TWENTY FIVE  (calc236)
J POWER D  (calc237)
FOR_LOOP U EQUALS G  (calc238)
IF R  (calc239)
LIMIT L  (calc240)
SINE OF HUNDRED AND TWENTY SIX POINT SIX FOUR  (calc241)
U OF FIFTEEN HUNDRED COMMA THIRTY SEVEN COMMA C  (calc242)
LIMIT J GREATER THAN I  (calc243)
FOR_LOOP H EQUALS E MULTIPLY BY HUNDRED AND NINETY  (calc244)
FOR_LOOP M EQUALS THREE HUNDRED  (calc245)
FIFTEEN POWER THIRTY SIX  (calc246)
H MINUS I  (calc247)
WHILE POINT FOUR EQUALS L  (calc248)
COSINE OF HUNDRED AND NINETY ONE POINT THREE  (calc249)
WHILE SIXTY LESS THAN R  (calc250)
J OF HUNDRED AND THIRTY EIGHT COMMA TWELVE HUNDRED COMMA O  (calc251)
T OF EIGHTEEN HUNDRED O SIX  (calc252)
TEN  TO THE POWER OF THOUSAND AND SIXTY THREE OPEN PLUS FORTY FOUR CLOSE PAREN  (calc253)
IF ZERO GREATER THAN C  (calc254)
WHILE B NOT EQUAL TO NINE HUNDRED AND TWELVE  (calc255)
I TO THE POWER OF E  (calc256)
IF W LESS THAN TWO  (calc257)
OPEN FIVE POWER OF DECIMAL POINT NINE SIX ONE CLOSE  (calc258)
TANGENT OF SEVEN THOUSAND AND SIXTY EIGHT  (calc259)
SINE OF HUNDRED FORTY SIX  (calc260)
LIMIT Z NOT EQUAL TO G  (calc261)
SET N EQUAL TO E OVER HUNDRED AND ELEVEN  (calc262)
SQUARE ROOT  OF O  (calc263)
EXPONENTIAL OF FIFTEEN  (calc264)
R OF Q  (calc265)
U OF L COMMA H  (calc266)
W OF Y  (calc267)
SET E EQUAL SQUARE ROOT  M  (calc268)
F OF N COMMA ELEVEN  (calc269)
B OF THOUSAND EIGHT HUNDRED COMMA O  (calc270)
R OF SEVEN HUNDRED THOUSAND COMMA Q  (calc271)
IF I  (calc272)
M OF Q COMMA U  (calc273)
OPEN THIRTY THREE MULTIPLY BY POINT FOUR TWO FIVE SIX CLOSE PAREN  (calc274)
SET Z EQUALS O DIVIDED BY FIFTY EIGHT  (calc275)
J OF G  (calc276)
WHILE M GREATER THAN HUNDRED SIXTY SEVEN  (calc277)
LIMIT X  (calc278)
FOR_LOOP J EQUALS EIGHT HUNDRED  (calc279)
ENTER.  (calc280)
B OF SEVENTY  (calc281)
NATURAL LOG OF TWO THREE  (calc282)
SINE OF I  (calc283)
FOR_LOOP A EQUALS W  (calc284)
IF D AND N  (calc285)
R POWER OF C  (calc286)
V OF P  (calc287)
OPEN PARENTHESIS FOURTEEN HUNDRED OVER HUNDRED CLOSE PARENTHESIS  (calc288)
FOR_LOOP A EQUALS C PLUS TWO HUNDRED  (calc289)
ENTER.  (calc290)
COSINE OF N  (calc291)
M OF Z COMMA THOUSAND ONE HUNDRED TWENTY FOUR  (calc292)
FOR_LOOP O EQUALS H  (calc293)
WHILE C NOT EQUAL TO P  (calc294)
IF L GREATER THAN OR EQUAL TO TWENTY ONE THOUSAND  (calc295)
SET T EQUAL TO O DIVIDED BY FIVE SEVEN THREE  (calc296)
OPEN PARENTHESIS EIGHTY TWO THOUSAND OVER THIRTEEN HUNDRED CLOSE PAREN  (calc297)
K OF K COMMA V COMMA F  (calc298)
DEFINE FUNCTION X ARGUMENT LIST C COMMA G.  (calc299)
LOG OF Q  (calc300)
COMPUTER.  (calc301)
L OF D COMMA FOUR HUNDRED TWENTY NINE  (calc302)
COMPUTER.  (calc303)
M OF H COMMA SIXTY THREE DECIMAL FOUR NINE COMMA H  (calc304)
O DIVIDED BY THOUSAND TWO HUNDRED EIGHTY  (calc305)
COSINE OF T  (calc306)
H DIVIDE V  (calc307)
WHILE THOUSAND TWO HUNDRED SEVENTY TWO NOT EQUAL TO G  (calc308)
SET M EQUAL A MINUS POINT O ONE  (calc309)
WHILE T LESS THAN OR EQUAL TO S  (calc310)
IF J  (calc311)
END.  (calc312)
E OF Z COMMA S  (calc313)
OPEN TWENTY FOUR THOUSAND TIMES THIRTY THREE POINT SEVEN ZERO SIX CLOSE  (calc314)
SET B EQUAL NATURAL LOG E  (calc315)
LIMIT V LESS THAN OR EQUAL TO H  (calc316)
FOR_LOOP O EQUALS THOUSAND ONE HUNDRED SEVENTY DIVIDED BY D  (calc317)
SINE OF TWELVE HUNDRED FORTY TWO  (calc318)
FOR_LOOP E EQUALS TWO HUNDRED AND THIRTY EIGHT MINUS F  (calc319)
F OF POINT ZERO O COMMA H COMMA O  (calc320)
E OF SEVENTEEN HUNDRED O NINE  (calc321)
DEFINE FUNCTION M ARGUMENT LIST L COMMA L COMMA N.  (calc322)
TANGENT OF B  (calc323)
FOR_LOOP A EQUALS M  (calc324)
IF NOT S  (calc325)
F OF NINETY NINE  (calc326)
FOR_LOOP Q EQUALS EIGHTY ONE  (calc327)
SQUARE ROOT  OF O  (calc328)
SEVENTY THREE TIMES THIRTY  (calc329)
J DIVIDED BY W  (calc330)
V OF TWELVE HUNDRED AND EIGHTY FOUR COMMA O  (calc331)
WHILE H LESS THAN THIRTEEN THOUSAND EIGHTY FOUR  (calc332)
K OF E  (calc333)
C OF EIGHT HUNDRED COMMA THIRTY FOUR  (calc334)
WHILE H GREATER THAN OR EQUAL TO SEVENTEEN HUNDRED AND NINETY SIX  (calc335)
FOR_LOOP R EQUALS Q  (calc336)
DEFINE FUNCTION O ARGUMENT LIST B COMMA X.  (calc337)
SIXTY FOUR POINT TWO DIVIDE DECIMAL EIGHT OPEN MINUS SEVENTY SIX CLOSE  (calc338)
FOR_LOOP U EQUALS W PLUS EIGHTY FIVE  (calc339)
DEFINE FUNCTION C ARGUMENT LIST N.  (calc340)
LIMIT O NOT EQUAL TO I  (calc341)
FOR_LOOP N EQUALS SIXTEEN HUNDRED O SEVEN  (calc342)
EXPONENTIAL OF L  (calc343)
OPEN PAREN FOUR HUNDRED SIXTY DIVIDE HUNDRED FORTY SIX CLOSE PARENTHESIS  (calc344)
LIMIT N  (calc345)
FOR_LOOP N EQUALS O  (calc346)
I OF NINE COMMA HUNDRED AND SEVENTY ONE  (calc347)
Q OF NINETY  (calc348)
IF NOT E LESS THAN OR EQUAL TO FOURTEEN HUNDRED  (calc349)
THOUSAND AND SEVENTY TWO DIVIDED BY POINT ZERO  (calc350)
S OF DECIMAL THREE ONE SEVEN FOUR FIVE ZERO SIX COMMA FOURTEEN HUNDRED COMMA Q  (calc351)
LIMIT THIRTEEN HUNDRED EQUALS Q  (calc352)
FOR_LOOP L EQUALS N  (calc353)
FOR_LOOP F EQUALS N PLUS FOUR HUNDRED AND SIXTY ONE  (calc354)
K OF FIVE FOUR COMMA HUNDRED AND FORTY POINT ZERO SIX  (calc355)
SQUARE ROOT  OF FIVE HUNDRED EIGHTY EIGHT THOUSAND  (calc356)
OPEN PARENTHESIS NINETEEN MINUS FOURTEEN HUNDRED NINETY FOUR CLOSE PARENTHESIS  (calc357)
K DIVIDE P  (calc358)
C OF SEVENTY TWO COMMA NINETEEN HUNDRED AND EIGHTY TWO  (calc359)
END.  (calc360)
NATURAL LOG OF FOUR HUNDRED  (calc361)
B OF W  (calc362)
R OF G  (calc363)
LIMIT NOT B  (calc364)
LIMIT J NOT EQUAL TO FIFTY AND F  (calc365)
SET U EQUAL TO T PLUS NINETEEN HUNDRED O SIX  (calc366)
ZERO OVER POINT O  (calc367)
POINT O DIVIDED BY SIX O  (calc368)
P OF FORTY NINE  (calc369)
TWO HUNDRED AND FORTY SUBTRACT FIFTY EIGHT  (calc370)
LIMIT SIXTEEN HUNDRED TEN  LESS THAN OR EQUAL TO N  (calc371)
SET A EQUALS SINE L  (calc372)
OPEN PAREN ONE POWER FOURTEEN HUNDRED CLOSE PARENTHESIS  (calc373)
NINE ONE POWER OF EIGHTY OPEN PAREN SUBTRACT NINETEEN CLOSE PARENTHESIS  (calc374)
STANDBY.  (calc375)
LIMIT NOT T  (calc376)
WHILE W EQUALS X  (calc377)
FOR_LOOP C EQUALS W  (calc378)
DEFINE FUNCTION H ARGUMENT LIST H COMMA Z.  (calc379)
FOR_LOOP D EQUALS H  (calc380)
LIMIT Z NOT EQUAL TO NINETY THREE  (calc381)
FOR_LOOP S EQUALS TWO  (calc382)
P OF L  (calc383)
V OF TWO COMMA ONE THOUSAND SEVEN HUNDRED  (calc384)
FOR_LOOP N EQUALS K  (calc385)
COS OF HUNDRED AND TEN   (calc386)
L MULTIPLY BY V  (calc387)
FOR_LOOP J EQUALS TWENTY TWO  (calc388)
FOR_LOOP N EQUALS TWENTY SIX  (calc389)
DEFINE FUNCTION B ARGUMENT LIST J COMMA J.  (calc390)
SET J EQUALS COSINE S  (calc391)
D PLUS D  (calc392)
COMPUTER.  (calc393)
WHILE I LESS THAN OR EQUAL TO D  (calc394)
FOR_LOOP X EQUALS T OVER FORTY POINT ONE NINE  (calc395)
DEFINE FUNCTION J ARGUMENT LIST Q.  (calc396)
SQUARE ROOT  OF F  (calc397)
WHILE R GREATER THAN OR EQUAL TO SEVENTY ONE  (calc398)
TWELVE SUBTRACT THIRTY EIGHT DECIMAL SEVEN  (calc399)
NINETY ONE OVER HUNDRED AND FORTY ONE  (calc400)
TANGENT OF V  (calc401)
LIMIT J  (calc402)
WHILE J LESS THAN OR EQUAL TO TEN   (calc403)
SET Z EQUAL N PLUS POINT ONE FOUR ONE FIVE  (calc404)
OPEN POINT NINE POWER OF DECIMAL POINT SEVEN CLOSE  (calc405)
SET J EQUAL SINE P  (calc406)
COSINE OF EIGHT HUNDRED AND SIXTY ONE  (calc407)
G OF FIVE HUNDRED  (calc408)
SET O EQUALS LOG I  (calc409)
OPEN PAREN SIX SUBTRACT FORTY SEVEN CLOSE  (calc410)
LIMIT I  (calc411)
DEFINE FUNCTION K ARGUMENT LIST S.  (calc412)
B POWER OF L  (calc413)
J SUBTRACT L  (calc414)
SET M EQUAL E MINUS POINT SEVEN  (calc415)
SIXTY SEVEN MINUS EIGHT HUNDRED  (calc416)
FOR_LOOP M EQUALS POINT FOUR NINE O FIVE  (calc417)
FOR_LOOP T EQUALS HUNDRED MULTIPLY BY D  (calc418)
E OF P COMMA C  (calc419)
X OF ELEVEN HUNDRED AND EIGHTY THREE COMMA FOUR FIVE COMMA TWENTY SIX  (calc420)
WHILE THIRTY EIGHT GREATER THAN O  (calc421)
WHILE J GREATER THAN OR EQUAL TO N  (calc422)
FOR_LOOP Q EQUALS K  (calc423)
LIMIT U GREATER THAN NINETY SIX EXCLUSIVE OR A  (calc424)
A TO THE POWER OF S  (calc425)
IF V XOR I GREATER THAN OR EQUAL TO A THOUSAND  (calc426)
WHILE M GREATER THAN L  (calc427)
BEGIN.  (calc428)
ENTER.  (calc429)
SET Z EQUALS I PLUS FIVE HUNDRED AND SEVENTY SIX  (calc430)
R OF R COMMA E  (calc431)
FOR_LOOP X EQUALS B MINUS THOUSAND ONE HUNDRED AND FORTY  (calc432)
W OF R COMMA D COMMA Q  (calc433)
Q OF X COMMA A  (calc434)
COS OF M  (calc435)
SQUARE ROOT  OF TWO HUNDRED  (calc436)
OPEN PAREN THREE HUNDRED MULTIPLY BY SEVEN CLOSE  (calc437)
LIMIT NOT X  (calc438)
STANDBY.  (calc439)
FOR_LOOP T EQUALS SEVEN HUNDRED  (calc440)
OPEN ZERO POWER OF SIX NINE CLOSE  (calc441)
IF Q NOT EQUAL TO FOURTEEN HUNDRED FORTY SEVEN  (calc442)
WHILE X GREATER THAN R  (calc443)
B OF X  (calc444)
SET Q EQUAL TO E POWER OF FIFTEEN  (calc445)
G OF ZERO THREE  (calc446)
OPEN HUNDRED AND THIRTY SEVEN TIMES FORTY NINE THOUSAND SEVENTY CLOSE  (calc447)
LOG OF O  (calc448)
WHILE A EQUALS NINE HUNDRED FIFTEEN  (calc449)
P OF POINT SIX FIVE FOUR TWO SIX SEVEN EIGHT ONE ONE COMMA N COMMA O  (calc450)
DEFINE FUNCTION I ARGUMENT LIST G COMMA E COMMA W.  (calc451)
P OF EIGHT HUNDRED THIRTY SIX COMMA L  (calc452)
POINT TWO PLUS DECIMAL POINT ONE  (calc453)
POINT EIGHT TWO POWER TWENTY SEVEN  (calc454)
M OF L  (calc455)
V OF THOUSAND SIX HUNDRED EIGHTY SIX COMMA P  (calc456)
FOR_LOOP M EQUALS S  (calc457)
SET I EQUAL TO COSINE T  (calc458)
FOR_LOOP F EQUALS THOUSAND AND SEVENTEEN  (calc459)
FOR_LOOP M EQUALS H  (calc460)
X OF Z COMMA U  (calc461)
FOR_LOOP W EQUALS O SEVEN THREE  (calc462)
TANGENT OF W  (calc463)
WHILE I GREATER THAN OR EQUAL TO A  (calc464)
BEGIN.  (calc465)
EIGHTEEN DIVIDED BY ZERO  (calc466)
LIMIT NOT G NOT EQUAL TO J  (calc467)
P OF TWENTY FOUR COMMA NINE HUNDRED THIRTY THREE  (calc468)
DEFINE FUNCTION E ARGUMENT LIST Q.  (calc469)
FOR_LOOP P EQUALS T TIMES HUNDRED FIVE  (calc470)
M OF X COMMA ZERO  (calc471)
R OF K COMMA X  (calc472)
FOR_LOOP X EQUALS HUNDRED TIMES Z  (calc473)
SET T EQUAL TO COSINE O  (calc474)
FOR_LOOP Q EQUALS POINT NINE EIGHT  (calc475)
FOR_LOOP S EQUALS THREE THOUSAND SEVEN HUNDRED NINETEEN POINT FIVE EIGHT ONE  (calc476)
FOR_LOOP B EQUALS T OVER MILLION   (calc477)
FOR_LOOP P EQUALS E  (calc478)
LIMIT G LESS THAN OR EQUAL TO THIRTY FIVE  (calc479)
COMPUTER.  (calc480)
IF X  (calc481)
G OF FORTY SIX COMMA D  (calc482)
FOR_LOOP R EQUALS TWO POINT TWO EIGHT SEVEN ZERO FIVE  (calc483)
END.  (calc484)
FOR_LOOP U EQUALS G  (calc485)
EXPONENTIAL OF E  (calc486)
SET K EQUAL TO EXPONENTIAL O  (calc487)
OPEN PAREN HUNDRED FIFTY NINE OVER THIRTY EIGHT CLOSE PARENTHESIS  (calc488)
FOR_LOOP K EQUALS FOURTEEN HUNDRED TWELVE  (calc489)
ONE TO THE POWER OF TWENTY EIGHT THOUSAND  (calc490)
I OF FIVE MILLION EIGHTY TWO COMMA POINT FOUR SIX  (calc491)
IF A GREATER THAN OR EQUAL TO G  (calc492)
SET X EQUAL L PLUS NINE THOUSAND  (calc493)
THOUSAND NINE HUNDRED OVER FOUR HUNDRED AND SIXTEEN  (calc494)
R PLUS I  (calc495)
OPEN PARENTHESIS HUNDRED THIRTY SUBTRACT POINT TWO NINE FIVE CLOSE PARENTHESIS  (calc496)
S OF POINT O  (calc497)
COSINE OF THIRTY ONE  (calc498)
HUNDRED POWER OF DECIMAL POINT SEVEN  (calc499)
LIMIT Z LESS THAN TEN   (calc500)
WHILE E GREATER THAN OR EQUAL TO EIGHT  (calc501)
X OF EIGHT COMMA P  (calc502)
M TIMES I  (calc503)
LIMIT NOT W GREATER THAN A  (calc504)
STANDBY.  (calc505)
NATURAL LOG OF L  (calc506)
DEFINE FUNCTION N ARGUMENT LIST G.  (calc507)
TANGENT OF B  (calc508)
WHILE L LESS THAN SIXTY SIX  (calc509)
COMPUTER.  (calc510)
FOR_LOOP P EQUALS E  (calc511)
DEFINE FUNCTION I ARGUMENT LIST Y COMMA C COMMA V.  (calc512)
OPEN ONE THOUSAND FOURTEEN DIVIDED BY EIGHTEEN HUNDRED CLOSE PAREN  (calc513)
U POWER S  (calc514)
H OF W COMMA SEVEN THOUSAND AND NINETY FOUR COMMA T  (calc515)
NATURAL LOG OF K  (calc516)
LIMIT HUNDRED AND FORTY THREE POINT TWO EIGHT SIX NOT EQUAL TO C  (calc517)
TANGENT OF FIFTEEN HUNDRED  (calc518)
U OF HUNDRED AND THIRTY NINE  (calc519)
OPEN TWENTY SIX POINT NINE SUBTRACT SEVENTY FOUR THOUSAND AND EIGHTY FIVE CLOSE  (calc520)
OPEN FORTY NINE POWER OF TWENTY ONE THOUSAND CLOSE  (calc521)
T OF THOUSAND FORTY NINE COMMA NINETEEN HUNDRED AND FIFTY TWO  (calc522)
SET D EQUAL TO X MULTIPLY BY POINT TWO  (calc523)
I OF I  (calc524)
ENTER.  (calc525)
TANGENT OF NINETEEN HUNDRED O NINE  (calc526)
J OF E COMMA SEVENTY COMMA ZERO  (calc527)
Y OF Z COMMA B  (calc528)
STANDBY.  (calc529)
Q OF I COMMA J  (calc530)
DEFINE FUNCTION K ARGUMENT LIST D.  (calc531)
SET H EQUAL TO COSINE P  (calc532)
V PLUS X  (calc533)
EXPONENTIAL OF R  (calc534)
BEGIN.  (calc535)
IF S GREATER THAN I  (calc536)
SINE OF EIGHTEEN HUNDRED AND SIX  (calc537)
SET W EQUALS I PLUS EIGHTY  (calc538)
DEFINE FUNCTION O ARGUMENT LIST O.  (calc539)
NATURAL LOG OF POINT TWO  (calc540)
SET Y EQUALS D SUBTRACT SEVENTY  (calc541)
FOR_LOOP Y EQUALS D  (calc542)
WHILE L EQUALS POINT FIVE  (calc543)
WHILE A MILLION EQUALS R  (calc544)
SET Q EQUALS Q TIMES POINT FIVE TWO  (calc545)
DEFINE FUNCTION L ARGUMENT LIST X.  (calc546)
DEFINE FUNCTION D ARGUMENT LIST I.  (calc547)
TWELVE HUNDRED THIRTY THREE TO THE POWER OF SEVENTEEN  (calc548)
SET O EQUAL TO EXPONENTIAL P  (calc549)
OPEN PARENTHESIS SIXTY FIVE MINUS SEVENTEEN HUNDRED O SIX CLOSE  (calc550)
N OF I COMMA FOUR HUNDRED AND SEVENTY ONE THOUSAND COMMA Q  (calc551)
COSINE OF K  (calc552)
FOR_LOOP U EQUALS EIGHTY SEVEN  (calc553)
Y OF ONE THOUSAND AND NINETEEN COMMA O COMMA TWENTY TWO THOUSAND  (calc554)
N OF ZERO  (calc555)
FOR_LOOP C EQUALS I OVER NINETEEN HUNDRED FORTY THREE  (calc556)
T OF ZERO POINT NINE FOUR COMMA HUNDRED AND NINETY TWO  (calc557)
DEFINE FUNCTION H ARGUMENT LIST V COMMA G COMMA I.  (calc558)
FOR_LOOP H EQUALS ZERO MINUS D  (calc559)
COS OF E  (calc560)
FOUR ONE MULTIPLY BY THREE HUNDRED  (calc561)
NINETEEN SUBTRACT HUNDRED  (calc562)
IF E AND H  (calc563)
FOR_LOOP T EQUALS NINETY THREE  (calc564)
SQUARE ROOT  OF A  (calc565)
DEFINE FUNCTION Z ARGUMENT LIST P COMMA C.  (calc566)
FOR_LOOP W EQUALS FIFTY NINE  (calc567)
L OF S COMMA Z COMMA F  (calc568)
F OF S COMMA X COMMA POINT FOUR  (calc569)
OPEN POINT EIGHT TIMES FIFTEEN HUNDRED O TWO CLOSE  (calc570)
FOR_LOOP N EQUALS H MULTIPLY BY HUNDRED AND TWENTY  (calc571)
FOR_LOOP U EQUALS NINETY TWO  (calc572)
ENTER.  (calc573)
G OF EIGHT HUNDRED AND FORTY FIVE COMMA F  (calc574)
FOR_LOOP Q EQUALS N  (calc575)
FOR_LOOP Y EQUALS SIXTY SEVEN OVER U  (calc576)
G PLUS L  (calc577)
IF E GREATER THAN OR EQUAL TO V  (calc578)
D OF TWENTY NINE  (calc579)
OPEN HUNDRED TWELVE SUBTRACT THREE HUNDRED POINT EIGHT FOUR CLOSE PARENTHESIS  (calc580)
FOR_LOOP X EQUALS POINT SEVEN  (calc581)
DEFINE FUNCTION N ARGUMENT LIST M.  (calc582)
A OF SEVENTY COMMA POINT SIX FIVE COMMA THREE  (calc583)
B OF HUNDRED SIXTY SEVEN THOUSAND COMMA B  (calc584)
X TO THE POWER OF Q  (calc585)
SET Z EQUALS H DIVIDED BY FIVE HUNDRED AND SIXTY EIGHT POINT FOUR  (calc586)
V OF NINETY ONE COMMA Y  (calc587)
C DIVIDED BY Q  (calc588)
DEFINE FUNCTION F ARGUMENT LIST J COMMA A COMMA B.  (calc589)
D OF THOUSAND TWO HUNDRED COMMA DECIMAL POINT O THREE COMMA TWO THOUSAND  (calc590)
SET C EQUAL TO TANGENT F  (calc591)
M OF X COMMA THOUSAND ONE HUNDRED AND NINETY TWO  (calc592)
F OF G COMMA SEVEN HUNDRED  (calc593)
U OF TWENTY THOUSAND COMMA E  (calc594)
STANDBY.  (calc595)
DECIMAL POINT SEVEN ONE POWER FOUR HUNDRED THIRTY POINT EIGHT TWO  (calc596)
OPEN PAREN TEN  PLUS THOUSAND NINETY THREE CLOSE  (calc597)
SQUARE ROOT  OF EIGHTY TWO  (calc598)
FORTY ONE SUBTRACT SIXTY FIVE THOUSAND  (calc599)
M OVER B  (calc600)
IF L EQUALS FIVE HUNDRED POINT ONE  (calc601)
WHILE G GREATER THAN OR EQUAL TO TWENTY THREE POINT TWO FOUR  (calc602)
H OF E COMMA R COMMA O POINT EIGHT SEVEN  (calc603)
OPEN ZERO SUBTRACT FIVE CLOSE  (calc604)
COMPUTER.  (calc605)
FOR_LOOP W EQUALS POINT FIVE MULTIPLY BY F  (calc606)
C OF V COMMA X  (calc607)
K PLUS C  (calc608)
S OF NINE ONE COMMA Q COMMA T  (calc609)
FOR_LOOP W EQUALS J  (calc610)
K OF SIX HUNDRED AND SIXTY ONE COMMA B  (calc611)
IF G LESS THAN K  (calc612)
LIMIT NOT J LESS THAN G  (calc613)
E OF HUNDRED AND TWO COMMA B  (calc614)
LIMIT O POINT SEVEN LESS THAN G  (calc615)
LIMIT K LESS THAN POINT THREE SEVEN  (calc616)
THIRTY SEVEN MULTIPLY BY FORTY THOUSAND TWO HUNDRED OPEN MINUS POINT ONE CLOSE  (calc617)
COS OF TWENTY POINT SIX EIGHT  (calc618)
EIGHT POWER OF FIFTEEN HUNDRED O ONE  (calc619)
E OF FOUR THOUSAND COMMA M  (calc620)
FOR_LOOP H EQUALS EIGHT HUNDRED EIGHTY SIX PLUS D  (calc621)
T OF O  (calc622)
SINE OF SEVENTY  (calc623)
S OF E COMMA THREE  (calc624)
SET I EQUALS Z DIVIDED BY TWO HUNDRED  (calc625)
SET V EQUALS COS W  (calc626)
FOR_LOOP I EQUALS S  (calc627)
SET K EQUAL L PLUS NINE THOUSAND ONE HUNDRED FIFTY FIVE  (calc628)
FOR_LOOP M EQUALS D  (calc629)
POINT O MINUS FOUR  (calc630)
OPEN THREE DIVIDE FOURTEEN THOUSAND CLOSE PAREN  (calc631)
FORTY OVER DECIMAL FOUR SEVEN OPEN PLUS NINETEEN CLOSE PARENTHESIS  (calc632)
I OF SIX ZERO COMMA L  (calc633)
W POWER OF N  (calc634)
BEGIN.  (calc635)
FOR_LOOP N EQUALS O  (calc636)
A TO THE POWER OF P  (calc637)
LIMIT O LESS THAN OR EQUAL TO C  (calc638)
K OF FOUR HUNDRED SIXTY COMMA G COMMA Z  (calc639)
SINE OF I  (calc640)
FOR_LOOP D EQUALS TEN  PLUS U  (calc641)
V OF M COMMA ZERO  (calc642)
BEGIN.  (calc643)
LIMIT T  (calc644)
SEVEN SUBTRACT THREE HUNDRED  (calc645)
FOR_LOOP F EQUALS THOUSAND ONE HUNDRED  (calc646)
OPEN PAREN FOURTEEN POWER ELEVEN HUNDRED CLOSE PAREN  (calc647)
A OF G COMMA Q  (calc648)
O PLUS POINT THREE O FOUR FIVE  (calc649)
WHILE L LESS THAN SIXTY FOUR  (calc650)
LOG OF O  (calc651)
G OF FOURTEEN HUNDRED AND TWENTY COMMA ZERO  (calc652)
WHILE POINT TWO TWO GREATER THAN S  (calc653)
FOR_LOOP W EQUALS ELEVEN HUNDRED O ONE  (calc654)
FOR_LOOP J EQUALS L DIVIDED BY SEVEN HUNDRED AND EIGHTY ONE  (calc655)
W OF J COMMA FORTY TWO  (calc656)
SIXTEEN POWER TWELVE  (calc657)
OPEN FIFTY SIX POINT ZERO PLUS DECIMAL POINT O CLOSE PAREN  (calc658)
ENTER.  (calc659)
SET D EQUAL J TO THE POWER OF FIVE  (calc660)
DEFINE FUNCTION B ARGUMENT LIST Y COMMA V COMMA N.  (calc661)
SET T EQUAL TO Q OVER SIXTY NINE  (calc662)
FOR_LOOP P EQUALS EIGHTY SEVEN  (calc663)
FOR_LOOP F EQUALS FIFTY FOUR  (calc664)
SET T EQUAL TO SQUARE ROOT  F  (calc665)
FIVE PLUS TWO NINE OPEN MULTIPLY BY TWO HUNDRED NINETY CLOSE  (calc666)
LOG OF SIXTEEN HUNDRED AND TWENTY SEVEN  (calc667)
FOR_LOOP V EQUALS POINT FOUR TWO FIVE EIGHT SIX  (calc668)
Y POWER OF R  (calc669)
OPEN PAREN FIFTY EIGHT PLUS FIVE CLOSE PARENTHESIS  (calc670)
OPEN PARENTHESIS NINETY FIVE MINUS ELEVEN HUNDRED CLOSE PAREN  (calc671)
Q POWER OF R  (calc672)
FOR_LOOP Q EQUALS X  (calc673)
E OF TWO FOUR COMMA F  (calc674)
FOR_LOOP F EQUALS HUNDRED FIFTY EIGHT THOUSAND ONE HUNDRED AND FORTY FOUR  (calc675)
S OF THREE COMMA NINETEEN HUNDRED SIXTY  (calc676)
DEFINE FUNCTION B ARGUMENT LIST U.  (calc677)
DEFINE FUNCTION T ARGUMENT LIST Y COMMA E.  (calc678)
T PLUS U  (calc679)
SQUARE ROOT  OF DECIMAL ZERO EIGHT  (calc680)
DEFINE FUNCTION J ARGUMENT LIST S COMMA E COMMA J.  (calc681)
Y OF HUNDRED TEN  COMMA THIRTY TWO  (calc682)
FOR_LOOP M EQUALS NINETY SEVEN POINT TWO NINE ONE DIVIDED BY L  (calc683)
T OF G COMMA V  (calc684)
J OF W COMMA EIGHT HUNDRED THIRTY NINE  (calc685)
FOR_LOOP F EQUALS TWO HUNDRED AND TWENTY ONE  (calc686)
FOR_LOOP C EQUALS FOUR HUNDRED AND NINETY THOUSAND NINE HUNDRED  (calc687)
BEGIN.  (calc688)
DEFINE FUNCTION H ARGUMENT LIST V.  (calc689)
A OF THIRTY THREE THOUSAND FOUR HUNDRED FORTY EIGHT COMMA S  (calc690)
F SUBTRACT F  (calc691)
D OF THOUSAND ONE HUNDRED AND FIFTY FIVE  (calc692)
R POWER OF C  (calc693)
DEFINE FUNCTION R ARGUMENT LIST M.  (calc694)
FOR_LOOP J EQUALS THOUSAND AND SIXTY SIX  (calc695)
THOUSAND AND EIGHTY MULTIPLY BY EIGHT HUNDRED OPEN SUBTRACT A HUNDRED CLOSE  (calc696)
V OF V COMMA X COMMA N  (calc697)
FOR_LOOP T EQUALS T PLUS SIXTY NINE  (calc698)
SET Y EQUALS COSINE C  (calc699)
ENTER.  (calc700)
FOR_LOOP P EQUALS G  (calc701)
IF ONE GREATER THAN T  (calc702)
FOR_LOOP O EQUALS FIVE HUNDRED FIFTY NINE MINUS X  (calc703)
NATURAL LOG OF FOUR HUNDRED  (calc704)
NINE HUNDRED OVER SIXTEEN HUNDRED AND NINETEEN  (calc705)
WHILE U LESS THAN OR EQUAL TO NINE HUNDRED THIRTY TWO  (calc706)
FOR_LOOP U EQUALS V MULTIPLY BY EIGHTY NINE  (calc707)
C OF POINT SEVEN EIGHT  (calc708)
R OF FOUR HUNDRED AND NINETY SEVEN COMMA NINE HUNDRED  (calc709)
O TO THE POWER OF O  (calc710)
FOR_LOOP Z EQUALS Q MULTIPLY BY THREE HUNDRED  (calc711)
SET K EQUAL SINE W  (calc712)
FIFTEEN POINT NINE FIVE SIX SIX SIX SIX DIVIDED BY SEVENTY  (calc713)
OPEN PAREN TEN  OVER THREE CLOSE PARENTHESIS  (calc714)
V OF NINETY THREE  (calc715)
IF SIXTY FIVE LESS THAN Z  (calc716)
NINETY EIGHT DIVIDE SIX  (calc717)
FOR_LOOP A EQUALS W  (calc718)
FOR_LOOP R EQUALS A  (calc719)
OPEN SIXTY THREE DIVIDE NINETY FIVE CLOSE  (calc720)
SEVEN SUBTRACT TEN  OPEN OVER FORTY FOUR CLOSE PARENTHESIS  (calc721)
SET I EQUALS U MINUS HUNDRED AND FIFTY  (calc722)
DEFINE FUNCTION S ARGUMENT LIST S COMMA W.  (calc723)
FOR_LOOP C EQUALS P  (calc724)
J OF POINT SEVEN FOUR THREE  (calc725)
A OF V COMMA Z  (calc726)
I OF FIFTY COMMA NINETY FOUR COMMA FIVE THOUSAND  (calc727)
STANDBY.  (calc728)
FOR_LOOP I EQUALS TWO HUNDRED AND FORTY POINT FOUR SEVEN ONE EIGHT NINE  (calc729)
LOG OF Z  (calc730)
FOR_LOOP Y EQUALS HUNDRED AND SEVENTY  (calc731)
STANDBY.  (calc732)
THIRTY EIGHT TIMES THOUSAND AND FIFTY ONE OPEN PAREN PLUS POINT NINE CLOSE  (calc733)
EIGHTY EIGHT THOUSAND MINUS SEVEN THOUSAND SEVENTY THREE  (calc734)
OPEN O DIVIDE ELEVEN HUNDRED SIXTY NINE CLOSE PAREN  (calc735)
COSINE OF THOUSAND AND SEVENTY EIGHT  (calc736)
FOR_LOOP M EQUALS SIX HUNDRED AND EIGHTY  (calc737)
IF A LESS THAN G  (calc738)
COSINE OF Y  (calc739)
F OF FOURTEEN HUNDRED O NINE  (calc740)
LIMIT L  (calc741)
TANGENT OF FIVE  (calc742)
FIFTY ONE DIVIDED BY TWO OPEN TO THE POWER OF SIX HUNDRED AND NINE CLOSE PAREN  (calc743)
DEFINE FUNCTION C ARGUMENT LIST V COMMA C COMMA K.  (calc744)
J OF TWELVE HUNDRED AND THIRTY FOUR  (calc745)
MILLION SEVEN HUNDRED THOUSAND PLUS SIX FOUR OPEN MULTIPLY BY SIX CLOSE  (calc746)
Z OF DECIMAL SIX COMMA SIX HUNDRED  (calc747)
P OF THREE COMMA U  (calc748)
C OF FIFTY SIX THOUSAND SIXTY TWO  (calc749)
DEFINE FUNCTION K ARGUMENT LIST Q COMMA T.  (calc750)
HUNDRED AND FIFTY SIX DIVIDE POINT NINE  (calc751)
G OF Q  (calc752)
DEFINE FUNCTION P ARGUMENT LIST O.  (calc753)
LIMIT X LESS THAN OR EQUAL TO G  (calc754)
FOR_LOOP R EQUALS EIGHTEEN  (calc755)
COS OF O  (calc756)
OPEN PAREN EIGHTY SEVEN DIVIDED BY EIGHT HUNDRED AND TWENTY FOUR CLOSE  (calc757)
A THOUSAND POINT EIGHT THREE DIVIDE TWENTY SIX  (calc758)
W OF SEVENTY SEVEN COMMA J COMMA A  (calc759)
FOR_LOOP M EQUALS N  (calc760)
NINETY TWO POWER OF MILLION ONE HUNDRED OPEN PARENTHESIS MINUS THIRTY CLOSE  (calc761)
SQUARE ROOT  OF N  (calc762)
X OF POINT THREE SEVEN COMMA D  (calc763)
OPEN POINT EIGHT THREE TIMES FIFTEEN HUNDRED AND NINETY CLOSE PAREN  (calc764)
COSINE OF TWENTY THREE  (calc765)
FOR_LOOP S EQUALS SEVENTY SEVEN  (calc766)
DEFINE FUNCTION W ARGUMENT LIST F COMMA H COMMA R.  (calc767)
SET R EQUAL TO TANGENT W  (calc768)
U OF EIGHTEEN HUNDRED O SEVEN  (calc769)
FOR_LOOP N EQUALS M  (calc770)
P OF I COMMA H  (calc771)
B PLUS S  (calc772)
LIMIT NOT L  (calc773)
STANDBY.  (calc774)
SET A EQUAL E DIVIDE ONE HUNDRED AND NINETY THREE  (calc775)
BEGIN.  (calc776)
BEGIN.  (calc777)
TWENTY SIX PLUS SIX HUNDRED AND TWO  (calc778)
B OF V COMMA L  (calc779)
FOR_LOOP C EQUALS SIXTEEN POINT SEVEN TWO  (calc780)
U OF SEVENTY NINE COMMA V  (calc781)
THREE HUNDRED AND THIRTY DECIMAL POINT SEVEN PLUS EIGHTY TWO  (calc782)
COMPUTER.  (calc783)
COMPUTER.  (calc784)
EIGHTY TWO THOUSAND DIVIDED BY FIFTY THREE  (calc785)
S OF TWELVE HUNDRED AND FOUR COMMA ONE HUNDRED SEVENTEEN THOUSAND  (calc786)
IF NOT N  (calc787)
G POWER OF F  (calc788)
FOR_LOOP X EQUALS SIXTY TWO  (calc789)
IF NOT ZERO EQUALS E  (calc790)
IF NOT L  (calc791)
FOR_LOOP B EQUALS THREE THOUSAND SIX HUNDRED MINUS A  (calc792)
SINE OF R  (calc793)
OPEN PARENTHESIS SIXTY THREE SUBTRACT THOUSAND AND NINETEEN CLOSE PARENTHESIS  (calc794)
DEFINE FUNCTION Z ARGUMENT LIST T COMMA F.  (calc795)
FOR_LOOP N EQUALS SEVEN HUNDRED  (calc796)
LIMIT G EQUALS K  (calc797)
LIMIT DECIMAL FIVE GREATER THAN OR EQUAL TO B  (calc798)
SQUARE ROOT  OF E  (calc799)
EIGHT HUNDRED TIMES NINE THOUSAND OPEN PARENTHESIS POWER SIXTEEN HUNDRED CLOSE  (calc800)
LIMIT NOT T  (calc801)
OPEN ZERO SUBTRACT ELEVEN HUNDRED FIFTY CLOSE PAREN  (calc802)
FOR_LOOP I EQUALS THOUSAND SEVEN HUNDRED AND SIXTY TIMES M  (calc803)
DEFINE FUNCTION S ARGUMENT LIST Y.  (calc804)
V OF O COMMA W  (calc805)
J OF V  (calc806)
LIMIT NOT J GREATER THAN OR EQUAL TO C  (calc807)
TANGENT OF A  (calc808)
WHILE A NOT EQUAL TO THOUSAND EIGHT HUNDRED  (calc809)
SET L EQUAL TO O MULTIPLY BY FIFTY SEVEN  (calc810)
EXPONENTIAL OF TWO HUNDRED SEVENTY TWO THOUSAND  (calc811)
OPEN MILLION  DIVIDE ONE THOUSAND CLOSE PAREN  (calc812)
IF Q  (calc813)
S OF THOUSAND FIVE HUNDRED COMMA J  (calc814)
C TO THE POWER OF U  (calc815)
NINE HUNDRED AND FIVE DIVIDE THREE  (calc816)
N OF TWO HUNDRED SEVENTY FIVE POINT SEVEN COMMA FIFTY THREE  (calc817)
R OF POINT FOUR COMMA TWO O  (calc818)
END.  (calc819)
Y OF U COMMA EIGHT HUNDRED THOUSAND SIXTY SEVEN  (calc820)
STANDBY.  (calc821)
ENTER.  (calc822)
COMPUTER.  (calc823)
LIMIT R EQUALS C  (calc824)
SET J EQUALS F MINUS TWO HUNDRED AND THIRTY FIVE  (calc825)
OPEN PARENTHESIS THREE HUNDRED MILLION POWER OF FIFTY FOUR CLOSE PAREN  (calc826)
FOR_LOOP R EQUALS FOUR HUNDRED AND SEVENTY EIGHT PLUS L  (calc827)
SINE OF I  (calc828)
WHILE W EQUALS L  (calc829)
X OF Y COMMA Y COMMA EIGHTEEN HUNDRED O SIX  (calc830)
OPEN PAREN EIGHTY POWER HUNDRED TWENTY EIGHT CLOSE PARENTHESIS  (calc831)
DEFINE FUNCTION C ARGUMENT LIST W COMMA I.  (calc832)
IF B  (calc833)
LIMIT V LESS THAN M  (calc834)
O OF SIXTY DECIMAL EIGHT COMMA C  (calc835)
FOR_LOOP U EQUALS K  (calc836)
OPEN PAREN FOUR TIMES NINETY SEVEN CLOSE PARENTHESIS  (calc837)
COMPUTER.  (calc838)
BEGIN.  (calc839)
SET D EQUALS LOG X  (calc840)
N OF FIFTY SEVEN COMMA U COMMA X  (calc841)
FOR_LOOP V EQUALS FIFTY TWO  (calc842)
TANGENT OF FIFTEEN HUNDRED FIFTY FOUR  (calc843)
SIXTY OVER FIFTEEN THOUSAND  (calc844)
IF H  (calc845)
S DIVIDE Q  (calc846)
LOG OF SIX HUNDRED  (calc847)
OPEN PARENTHESIS SEVENTY ONE PLUS EIGHTEEN HUNDRED AND TEN  CLOSE PARENTHESIS  (calc848)
LOG OF U  (calc849)
L OF POINT FIVE COMMA NINETY COMMA G  (calc850)
SQUARE ROOT  OF M  (calc851)
O OF THOUSAND NINE HUNDRED COMMA FOUR HUNDRED  (calc852)
WHILE M GREATER THAN OR EQUAL TO NINETY  (calc853)
WHILE O EQUALS FOUR HUNDRED  (calc854)
FOR_LOOP I EQUALS P PLUS SEVEN HUNDRED  (calc855)
SET T EQUAL TANGENT P  (calc856)
WHILE B GREATER THAN OR EQUAL TO S  (calc857)
DEFINE FUNCTION A ARGUMENT LIST L COMMA C.  (calc858)
COS OF M  (calc859)
OPEN PAREN HUNDRED POWER OF HUNDRED FORTY NINE CLOSE PARENTHESIS  (calc860)
SET K EQUAL TO NATURAL LOG X  (calc861)
TWENTY TWO MINUS EIGHT HUNDRED OPEN MULTIPLY BY POINT NINE TWO ONE CLOSE  (calc862)
DEFINE FUNCTION A ARGUMENT LIST V COMMA E.  (calc863)
STANDBY.  (calc864)
R OF B COMMA POINT FIVE SIX  (calc865)
SQUARE ROOT  OF POINT EIGHT O ONE THREE  (calc866)
WHILE G LESS THAN OR EQUAL TO POINT NINE O SEVEN  (calc867)
EXPONENTIAL OF N  (calc868)
Y OF NINETY FIVE  (calc869)
SIXTY TWO MULTIPLY BY POINT TWO FOUR OPEN PAREN PLUS HUNDRED AND EIGHTY CLOSE  (calc870)
FORTY NINE POWER OF ZERO  (calc871)
FOR_LOOP L EQUALS ONE THOUSAND DECIMAL POINT SEVEN NINE  (calc872)
COS OF FIVE HUNDRED  (calc873)
SET W EQUALS NATURAL LOG B  (calc874)
OPEN PAREN HUNDRED FIFTY TWO POWER FORTY SIX CLOSE  (calc875)
C OF SIXTY THREE THOUSAND COMMA R  (calc876)
EXPONENTIAL OF POINT SEVEN  (calc877)
W OF D  (calc878)
OPEN PAREN NINETY POINT SEVEN MINUS NINE HUNDRED AND ONE CLOSE PAREN  (calc879)
FOR_LOOP N EQUALS THREE TIMES B  (calc880)
COMPUTER.  (calc881)
DEFINE FUNCTION N ARGUMENT LIST A COMMA X COMMA S.  (calc882)
A OF A COMMA R  (calc883)
FOR_LOOP U EQUALS FORTY FIVE  (calc884)
BEGIN.  (calc885)
ONE HUNDRED MINUS NINETY  (calc886)
U OF Y COMMA EIGHT HUNDRED  (calc887)
OPEN PAREN POINT TWO NINE FIVE MINUS THOUSAND AND EIGHTY THREE CLOSE PAREN  (calc888)
D OF O COMMA TWO HUNDRED DECIMAL NINE  (calc889)
SINE OF POINT FOUR THREE ZERO  (calc890)
E OF A COMMA NINETEEN  (calc891)
D OF THIRTY SIX COMMA Q COMMA FOUR HUNDRED NINETY THREE  (calc892)
FOR_LOOP X EQUALS Q  (calc893)
OPEN TWO HUNDRED EIGHTY POWER NINETY ONE CLOSE PAREN  (calc894)
LIMIT S  (calc895)
SQUARE ROOT  OF SEVEN HUNDRED AND TWENTY FIVE  (calc896)
SINE OF C  (calc897)
Z OF E COMMA THREE ONE SIX SEVEN SIX FOUR  (calc898)
OPEN THREE THOUSAND AND SIXTY TWO SUBTRACT SEVENTY FOUR CLOSE PARENTHESIS  (calc899)
SET C EQUALS V MINUS NINETY TWO  (calc900)
T OF SEVENTY TWO COMMA ZERO POINT FIVE EIGHT  (calc901)
SET A EQUALS SQUARE ROOT  L  (calc902)
Y TIMES A  (calc903)
LIMIT X NOT EQUAL TO Y  (calc904)
P OF FIVE HUNDRED POINT SIX ONE THREE COMMA S  (calc905)
FOR_LOOP Q EQUALS H  (calc906)
Y TIMES V  (calc907)
OPEN PAREN SEVENTY ONE POINT TWO NINE OVER EIGHT HUNDRED AND ONE CLOSE PAREN  (calc908)
M POWER M  (calc909)
F OF O COMMA O  (calc910)
DEFINE FUNCTION P ARGUMENT LIST E.  (calc911)
Y OF T COMMA E COMMA V  (calc912)
OPEN PAREN NINETEEN THOUSAND SEVEN HUNDRED DIVIDE EIGHTEEN CLOSE  (calc913)
DEFINE FUNCTION C ARGUMENT LIST B COMMA S COMMA D.  (calc914)
FOR_LOOP J EQUALS Z  (calc915)
LIMIT F  (calc916)
OPEN ONE HUNDRED DIVIDED BY SIX HUNDRED EIGHTY EIGHT CLOSE  (calc917)
C OF ONE HUNDRED COMMA T  (calc918)
SET P EQUAL TO O SUBTRACT EIGHTY FIVE DECIMAL POINT SEVEN  (calc919)
FOR_LOOP K EQUALS THOUSAND EIGHT HUNDRED  (calc920)
TANGENT OF NINE HUNDRED  (calc921)
FORTY DIVIDE POINT ZERO NINE OPEN PAREN MINUS FIFTY CLOSE  (calc922)
C MINUS C  (calc923)
LOG OF SIX HUNDRED THOUSAND EIGHT HUNDRED AND SEVENTY FOUR  (calc924)
P MINUS W  (calc925)
TANGENT OF R  (calc926)
C OF TWO HUNDRED COMMA EIGHT HUNDRED AND NINETY NINE THOUSAND  (calc927)
FOR_LOOP Z EQUALS O OVER Q  (calc928)
IF Q LESS THAN OR EQUAL TO T  (calc929)
H OF FIVE HUNDRED THOUSAND COMMA NINETEEN  (calc930)
DEFINE FUNCTION F ARGUMENT LIST W COMMA E.  (calc931)
FOR_LOOP N EQUALS HUNDRED TEN   (calc932)
IF X NOT EQUAL TO J  (calc933)
F OF FIVE THOUSAND COMMA SIXTY THOUSAND SEVEN HUNDRED FORTY FOUR  (calc934)
SIXTY SEVEN DIVIDE HUNDRED OPEN PAREN MINUS POINT TWO ONE CLOSE PAREN  (calc935)
LIMIT D EQUALS J  (calc936)
TANGENT OF EIGHT THOUSAND DECIMAL POINT FOUR  (calc937)
STANDBY.  (calc938)
DEFINE FUNCTION G ARGUMENT LIST Z.  (calc939)
FOR_LOOP T EQUALS Z PLUS FOUR HUNDRED  (calc940)
G OF U COMMA T  (calc941)
SET K EQUAL TANGENT W  (calc942)
OPEN PARENTHESIS NINE HUNDRED EIGHTY ONE POINT O POWER OF EIGHT CLOSE  (calc943)
U OF Q COMMA V COMMA SEVEN THOUSAND  (calc944)
THREE POWER OF SIXTY ONE OPEN TIMES FOUR HUNDRED CLOSE PAREN  (calc945)
J OF X  (calc946)
E OF K COMMA FOURTEEN COMMA O  (calc947)
V OF K COMMA SIX EIGHT O ONE FOUR ONE  (calc948)
DEFINE FUNCTION U ARGUMENT LIST H COMMA J.  (calc949)
FOR_LOOP L EQUALS F  (calc950)
U OF HUNDRED FIFTY COMMA TWO SEVEN FOUR COMMA NINE THOUSAND  (calc951)
SET L EQUALS SINE P  (calc952)
FOR_LOOP P EQUALS HUNDRED THIRTY TWO OVER L  (calc953)
WHILE Z NOT EQUAL TO S  (calc954)
FOR_LOOP Q EQUALS B TIMES NINETEEN HUNDRED AND TWENTY TWO  (calc955)
H OF W COMMA TWO TWO COMMA M  (calc956)
NATURAL LOG OF HUNDRED AND SEVENTY EIGHT  (calc957)
I PLUS G  (calc958)
C OF POINT THREE O SIX SEVEN ONE COMMA D  (calc959)
SINE OF T  (calc960)
FOR_LOOP V EQUALS ONE  (calc961)
TEN  PLUS HUNDRED AND ONE OPEN MINUS THIRTY EIGHT CLOSE PAREN  (calc962)
TANGENT OF SIXTY EIGHT  (calc963)
X OF D COMMA O  (calc964)
LIMIT NOT F LESS THAN L  (calc965)
FOR_LOOP S EQUALS THIRTY SEVEN OVER F  (calc966)
WHILE O LESS THAN OR EQUAL TO Z  (calc967)
SET V EQUAL B MULTIPLY BY NINE  (calc968)
SIX ONE EIGHT FIVE MINUS THIRTY NINE  (calc969)
Q OF FIFTY FIVE  (calc970)
FOR_LOOP K EQUALS FIVE SEVEN NINE  (calc971)
L OF THOUSAND ELEVEN  (calc972)
IF NOT J  (calc973)
F SUBTRACT F  (calc974)
FOR_LOOP E EQUALS HUNDRED EIGHTEEN OVER C  (calc975)
P OF H  (calc976)
FOR_LOOP H EQUALS SEVENTEEN HUNDRED AND FIFTY FOUR DIVIDED BY G  (calc977)
WHILE I GREATER THAN OR EQUAL TO NINE HUNDRED  (calc978)
H POWER OF F  (calc979)
DEFINE FUNCTION W ARGUMENT LIST S COMMA V.  (calc980)
OPEN SEVENTY TWO TO THE POWER OF THREE HUNDRED CLOSE PAREN  (calc981)
IF NOT R  (calc982)
K OF NINETEEN HUNDRED AND FOURTEEN COMMA TWENTY NINE  (calc983)
B OF V COMMA J COMMA THIRTY THREE POINT ZERO  (calc984)
HUNDRED AND SIXTEEN PLUS THIRTY SEVEN OPEN MULTIPLY BY SIX CLOSE  (calc985)
D OF S COMMA FOURTEEN HUNDRED TWENTY NINE  (calc986)
U OF W  (calc987)
FOR_LOOP E EQUALS ONE HUNDRED TWENTY TWO THOUSAND FORTY THREE  (calc988)
F OF TEN  COMMA W COMMA E  (calc989)
SET U EQUAL N TIMES POINT ZERO  (calc990)
FOR_LOOP F EQUALS N  (calc991)
SIXTY EIGHT DIVIDED BY EIGHTY FIVE POINT SIX FOUR  (calc992)
COS OF O NINE SEVEN  (calc993)
J POWER OF X  (calc994)
SET A EQUAL D MINUS FIVE HUNDRED SIXTEEN POINT SEVEN  (calc995)
O OF NINE COMMA TEN   (calc996)
FOR_LOOP X EQUALS SIXTEEN HUNDRED O FIVE POINT EIGHT NINE FOUR THREE  (calc997)
COS OF U  (calc998)
O OF F COMMA FIFTEEN HUNDRED SEVENTEEN  (calc999)
LIMIT W GREATER THAN THOUSAND NINE HUNDRED  (calc1000)
LIMIT FIFTY GREATER THAN N  (calc1001)
SQUARE ROOT  OF K  (calc1002)
J OF POINT TWO COMMA E  (calc1003)
NINE HUNDRED THIRTEEN THOUSAND POWER TEN  OPEN MINUS FIVE HUNDRED CLOSE  (calc1004)
COS OF ONE  (calc1005)
COSINE OF D  (calc1006)
SET O EQUAL TO O POWER OF HUNDRED POINT NINE  (calc1007)
FOR_LOOP H EQUALS O OVER EIGHT ONE SEVEN  (calc1008)
FOR_LOOP L EQUALS FIVE MINUS H  (calc1009)
BEGIN.  (calc1010)
ENTER.  (calc1011)
POINT ZERO NINE POWER OF SIXTY FIVE DECIMAL POINT ONE  (calc1012)
ENTER.  (calc1013)
FOR_LOOP H EQUALS SEVENTY FIVE  (calc1014)
LIMIT D EQUALS SEVEN HUNDRED  (calc1015)
FOR_LOOP V EQUALS THOUSAND AND TEN   (calc1016)
Y OF Y  (calc1017)
FOR_LOOP Z EQUALS THOUSAND FIVE HUNDRED MINUS B  (calc1018)
B OF B  (calc1019)
DECIMAL POINT SIX SIX O TIMES FORTY  (calc1020)
FOR_LOOP K EQUALS G  (calc1021)
G OF ZERO ONE COMMA FORTY EIGHT COMMA FIFTY FIVE  (calc1022)
OPEN HUNDRED SIXTY FIVE THOUSAND TIMES POINT SIX SIX CLOSE PAREN  (calc1023)
OPEN TWENTY TWO TIMES FOURTEEN HUNDRED O ONE CLOSE  (calc1024)
OPEN PAREN NINETY TWO POINT NINE SUBTRACT DECIMAL POINT SEVEN CLOSE PARENTHESIS  (calc1025)
B OF THREE MILLION COMMA SEVENTY TWO THOUSAND POINT SEVEN  (calc1026)
FOR_LOOP J EQUALS Q TIMES EIGHT HUNDRED  (calc1027)
R OF FIFTY COMMA O  (calc1028)
T OF FIVE HUNDRED AND FIFTY SIX POINT SIX  (calc1029)
COS OF B  (calc1030)
U OF V  (calc1031)
FOR_LOOP J EQUALS ELEVEN HUNDRED DIVIDED BY E  (calc1032)
F OF Y COMMA ZERO  (calc1033)
THOUSAND TWENTY SEVEN PLUS TWO OPEN PAREN POWER SEVENTY CLOSE PARENTHESIS  (calc1034)
FOR_LOOP Z EQUALS POINT THREE  (calc1035)
FOR_LOOP C EQUALS U  (calc1036)
FOR_LOOP J EQUALS FOUR HUNDRED TIMES S  (calc1037)
Y OF EIGHT HUNDRED SEVENTY THREE COMMA DECIMAL TWO COMMA K  (calc1038)
J OF SEVEN COMMA X  (calc1039)
NINETEEN HUNDRED AND THIRTY SIX DIVIDED BY FORTY FIVE  (calc1040)
X POWER N  (calc1041)
SET K EQUAL TO NATURAL LOG B  (calc1042)
LOG OF S  (calc1043)
A OF T COMMA U  (calc1044)
P OF N COMMA TWENTY TWO  (calc1045)
U OF V COMMA Y COMMA TWO HUNDRED EIGHTY THREE  (calc1046)
FIFTY FIVE POWER OF TWO HUNDRED OPEN PAREN SUBTRACT EIGHTY SIX CLOSE PAREN  (calc1047)
SINE OF M  (calc1048)
OPEN NINETEEN DIVIDED BY FOURTEEN CLOSE PAREN  (calc1049)
M OF FIFTY EIGHT COMMA R  (calc1050)
SQUARE ROOT  OF SIXTEEN HUNDRED AND THIRTY THREE  (calc1051)
EIGHTY FIVE TO THE POWER OF NINETY ONE  (calc1052)
DEFINE FUNCTION R ARGUMENT LIST P COMMA B COMMA I.  (calc1053)
NATURAL LOG OF THIRTY FOUR  (calc1054)
Q OF U COMMA NINETY THREE  (calc1055)
OPEN ZERO DIVIDE EIGHT HUNDRED SIXTY ONE CLOSE  (calc1056)
WHILE EIGHT HUNDRED THOUSAND SEVEN HUNDRED AND SEVENTEEN LESS THAN X  (calc1057)
E OF Q COMMA A MILLION  (calc1058)
SET P EQUALS TANGENT R  (calc1059)
W DIVIDE B  (calc1060)
DEFINE FUNCTION T ARGUMENT LIST S COMMA K COMMA Q.  (calc1061)
DEFINE FUNCTION J ARGUMENT LIST C COMMA N.  (calc1062)
SQUARE ROOT  OF FIVE HUNDRED  (calc1063)
OPEN PAREN THIRTY EIGHT SUBTRACT EIGHTY NINE CLOSE  (calc1064)
I POWER K  (calc1065)
OPEN THOUSAND AND THIRTY THREE MINUS EIGHTY FIVE CLOSE PARENTHESIS  (calc1066)
OPEN PAREN SEVEN THOUSAND DIVIDE DECIMAL POINT EIGHT CLOSE PARENTHESIS  (calc1067)
B OF MILLION AND TEN   (calc1068)
L OF EIGHT  (calc1069)
LOG OF Y  (calc1070)
WHILE T LESS THAN OR EQUAL TO HUNDRED AND SIXTY  (calc1071)
FOR_LOOP A EQUALS L  (calc1072)
FOR_LOOP U EQUALS C TIMES SIXTY POINT NINE FIVE  (calc1073)
EXPONENTIAL OF FIFTEEN  (calc1074)
SET D EQUAL TO COSINE U  (calc1075)
ENTER.  (calc1076)
SQUARE ROOT  OF FOURTEEN HUNDRED  (calc1077)
COS OF I  (calc1078)
DEFINE FUNCTION K ARGUMENT LIST V.  (calc1079)
IF G EQUALS Q  (calc1080)
FOR_LOOP C EQUALS FIFTY FOUR  (calc1081)
R OF O COMMA G COMMA SEVENTY THREE  (calc1082)
W OF R COMMA HUNDRED  (calc1083)
DEFINE FUNCTION Z ARGUMENT LIST O COMMA T COMMA Q.  (calc1084)
FOR_LOOP F EQUALS FORTY FIVE OVER R  (calc1085)
FOR_LOOP O EQUALS L  (calc1086)
HUNDRED FIFTY FOUR MULTIPLY BY THIRTY SEVEN  (calc1087)
FOR_LOOP G EQUALS THIRTEEN  (calc1088)
B OF NINETY SEVEN THOUSAND COMMA POINT ONE COMMA FORTY  (calc1089)
SET D EQUAL TO SQUARE ROOT  F  (calc1090)
FOR_LOOP I EQUALS N  (calc1091)
STANDBY.  (calc1092)
FOR_LOOP A EQUALS SIX  (calc1093)
FOR_LOOP G EQUALS SIXTY NINE  (calc1094)
OPEN PAREN ONE HUNDRED TIMES NINETEEN HUNDRED NINETY EIGHT CLOSE PAREN  (calc1095)
G OF TWENTY SEVEN  (calc1096)
FOR_LOOP M EQUALS V  (calc1097)
FOR_LOOP O EQUALS N TIMES SEVENTEEN HUNDRED FOURTEEN  (calc1098)
OPEN HUNDRED NINETY FIVE PLUS EIGHTY SEVEN CLOSE PAREN  (calc1099)
WHILE K LESS THAN OR EQUAL TO EIGHT  (calc1100)
WHILE THREE TWO GREATER THAN D  (calc1101)
WHILE E LESS THAN OR EQUAL TO THREE HUNDRED  (calc1102)
DEFINE FUNCTION X ARGUMENT LIST X COMMA R COMMA D.  (calc1103)
O OF R COMMA TWENTY NINE  (calc1104)
COS OF NINE HUNDRED  (calc1105)
DEFINE FUNCTION K ARGUMENT LIST G COMMA W.  (calc1106)
OPEN PARENTHESIS FIVE HUNDRED MINUS SIXTY NINE CLOSE  (calc1107)
DEFINE FUNCTION I ARGUMENT LIST X COMMA L COMMA G.  (calc1108)
LOG OF K  (calc1109)
V DIVIDED BY H  (calc1110)
TANGENT OF H  (calc1111)
FOR_LOOP H EQUALS N PLUS SEVENTEEN HUNDRED FORTY ONE  (calc1112)
WHILE Y GREATER THAN POINT SIX FIVE FOUR  (calc1113)
DEFINE FUNCTION Q ARGUMENT LIST U COMMA V COMMA O.  (calc1114)
FOR_LOOP Z EQUALS W  (calc1115)
COSINE OF THOUSAND AND FIFTEEN DECIMAL POINT SIX SIX TWO FIVE  (calc1116)
TANGENT OF P  (calc1117)
SET G EQUAL TO I TIMES EIGHTEEN HUNDRED AND TWENTY TWO  (calc1118)
DEFINE FUNCTION A ARGUMENT LIST K.  (calc1119)
FOR_LOOP N EQUALS K  (calc1120)
TANGENT OF TWO HUNDRED AND EIGHTY FIVE  (calc1121)
FOR_LOOP S EQUALS P  (calc1122)
FOR_LOOP I EQUALS TWENTY FIVE PLUS K  (calc1123)
STANDBY.  (calc1124)
SET R EQUAL NATURAL LOG U  (calc1125)
FOR_LOOP X EQUALS K  (calc1126)
T OF EIGHTY NINE  (calc1127)
V OF MILLION SIX HUNDRED  (calc1128)
OPEN FIVE HUNDRED TWELVE TIMES ONE HUNDRED CLOSE PAREN  (calc1129)
K OF FIVE HUNDRED FIFTY NINE COMMA D COMMA HUNDRED AND SEVEN THOUSAND  (calc1130)
OPEN PAREN HUNDRED TEN  PLUS SEVEN HUNDRED CLOSE PAREN  (calc1131)
DEFINE FUNCTION G ARGUMENT LIST I.  (calc1132)
NINETY EIGHT PLUS NINE HUNDRED AND TWENTY  (calc1133)
WHILE HUNDRED LESS THAN OR EQUAL TO S  (calc1134)
H OF FORTY TWO COMMA POINT FOUR COMMA SEVENTY NINE  (calc1135)
EXPONENTIAL OF T  (calc1136)
FOR_LOOP E EQUALS B  (calc1137)
X TIMES F  (calc1138)
SET W EQUAL B OVER FIVE HUNDRED  (calc1139)
IF NINE HUNDRED GREATER THAN D  (calc1140)
FOR_LOOP D EQUALS Q MINUS THIRTEEN HUNDRED AND FIFTY ONE  (calc1141)
L OF THIRTY FIVE  (calc1142)
IF R GREATER THAN A  (calc1143)
STANDBY.  (calc1144)
NATURAL LOG OF FOUR MILLION  (calc1145)
F OF E COMMA Y COMMA SEVENTEEN  (calc1146)
BEGIN.  (calc1147)
N OF TWELVE HUNDRED THIRTY FIVE COMMA TWENTY NINE  (calc1148)
SET Q EQUAL TO N SUBTRACT ELEVEN HUNDRED FORTY SIX  (calc1149)
I OF I COMMA G  (calc1150)
D OF ONE HUNDRED AND TEN  COMMA D COMMA R  (calc1151)
BEGIN.  (calc1152)
J OF K COMMA EIGHT HUNDRED NINETEEN  (calc1153)
DEFINE FUNCTION A ARGUMENT LIST M COMMA B COMMA S.  (calc1154)
D OF T COMMA FIVE  (calc1155)
DEFINE FUNCTION T ARGUMENT LIST H COMMA Z.  (calc1156)
SINE OF SIXTY FOUR  (calc1157)
SET V EQUAL TO M TIMES EIGHT HUNDRED AND FIFTY SEVEN  (calc1158)
D OF SIXTY COMMA A COMMA HUNDRED EIGHTEEN  (calc1159)
OPEN PAREN TWENTY POINT TWO O PLUS FIFTY FIVE CLOSE PAREN  (calc1160)
COSINE OF I  (calc1161)
OPEN PAREN THOUSAND AND FIFTY NINE MINUS SIXTY ONE CLOSE PAREN  (calc1162)
FOR_LOOP N EQUALS POINT O  (calc1163)
Q POWER OF W  (calc1164)
FORTY FIVE TIMES HUNDRED AND TWENTY SEVEN OPEN PLUS POINT ZERO CLOSE  (calc1165)
V TO THE POWER OF S  (calc1166)
D PLUS D  (calc1167)
F OF R COMMA POINT ONE TWO  (calc1168)
LOG OF Q  (calc1169)
COS OF TEN   (calc1170)
U OF A MILLION COMMA L  (calc1171)
LIMIT W GREATER THAN OR EQUAL TO FOUR FIVE  (calc1172)
LIMIT NOT H  (calc1173)
IF NOT D  (calc1174)
POINT FOUR POWER OF THIRTY NINE OPEN PARENTHESIS MINUS FORTY TWO CLOSE PAREN  (calc1175)
SET Q EQUAL TO V TO THE POWER OF NINETY THREE  (calc1176)
LIMIT U LESS THAN OR EQUAL TO DECIMAL POINT NINE  (calc1177)
DEFINE FUNCTION O ARGUMENT LIST K.  (calc1178)
LOG OF R  (calc1179)
BEGIN.  (calc1180)
POINT TWO MINUS TWO HUNDRED  (calc1181)
IF T LESS THAN THOUSAND SEVEN HUNDRED  (calc1182)
FOR_LOOP Q EQUALS H  (calc1183)
SET Z EQUAL COSINE C  (calc1184)
SET M EQUALS SINE U  (calc1185)
F OF THIRTEEN HUNDRED O SEVEN COMMA FOUR HUNDRED  (calc1186)
DEFINE FUNCTION L ARGUMENT LIST P COMMA M.  (calc1187)
O OF FOURTEEN HUNDRED FIFTEEN COMMA FOUR POINT EIGHT  (calc1188)
FIVE THOUSAND DIVIDE SIXTY NINE OPEN OVER NINETY SIX CLOSE PAREN  (calc1189)
SQUARE ROOT  OF SIXTY TWO THOUSAND  (calc1190)
LIMIT NINETY NINE GREATER THAN OR EQUAL TO M  (calc1191)
F OF HUNDRED AND EIGHTY COMMA U  (calc1192)
V OF FIFTY MILLION COMMA ELEVEN  (calc1193)
SET W EQUALS SINE V  (calc1194)
SET P EQUAL TO I DIVIDE NINETY THREE  (calc1195)
SIXTEEN HUNDRED EIGHTY FIVE MINUS POINT ZERO THREE FOUR SIX  (calc1196)
O OF THREE TWO COMMA THOUSAND ONE HUNDRED AND TWENTY FIVE COMMA TWO THOUSAND  (calc1197)
FOR_LOOP B EQUALS TWENTY SIX  (calc1198)
FOR_LOOP K EQUALS F OVER POINT SIX FOUR  (calc1199)
F OF FIVE HUNDRED SIXTEEN COMMA M COMMA U  (calc1200)
L OF G COMMA THOUSAND AND FIFTY TWO  (calc1201)
FOR_LOOP P EQUALS FIFTY TWO TIMES U  (calc1202)
B OF G COMMA THREE  (calc1203)
FOR_LOOP J EQUALS L  (calc1204)
G OF P COMMA V  (calc1205)
DEFINE FUNCTION B ARGUMENT LIST L COMMA U.  (calc1206)
WHILE E GREATER THAN OR EQUAL TO POINT SEVEN  (calc1207)
FOR_LOOP H EQUALS FORTY SIX DIVIDED BY T  (calc1208)
FIVE TIMES SIXTY  (calc1209)
FOR_LOOP D EQUALS T  (calc1210)
FOR_LOOP H EQUALS H  (calc1211)
FOR_LOOP L EQUALS TEN   (calc1212)
FOR_LOOP M EQUALS THREE HUNDRED AND SIXTY SEVEN THOUSAND THIRTY  (calc1213)
LIMIT NOT T GREATER THAN OR EQUAL TO POINT SIX ONE TWO FIVE  (calc1214)
IF NOT N GREATER THAN OR EQUAL TO FIFTY FIVE  (calc1215)
W OF SEVENTEEN COMMA FIFTY SIX  (calc1216)
M OF POINT TWO TWO SEVEN COMMA L  (calc1217)
U OF THOUSAND COMMA THREE  (calc1218)
LIMIT G GREATER THAN OR EQUAL TO W  (calc1219)
FOR_LOOP Q EQUALS T  (calc1220)
OPEN PARENTHESIS A MILLION DIVIDED BY POINT NINE FOUR CLOSE PAREN  (calc1221)
OPEN O MINUS ZERO CLOSE PAREN  (calc1222)
SET W EQUAL Q MINUS TWENTY NINE  (calc1223)
FOR_LOOP R EQUALS U  (calc1224)
COS OF B  (calc1225)
IF U LESS THAN OR EQUAL TO POINT NINE ONE FIVE  (calc1226)
WHILE W EQUALS HUNDRED AND TWENTY  (calc1227)
ENTER.  (calc1228)
TWELVE HUNDRED AND THREE POINT O TIMES ELEVEN  (calc1229)
FOR_LOOP G EQUALS X OVER THOUSAND  (calc1230)
A TO THE POWER OF C  (calc1231)
WHILE R GREATER THAN OR EQUAL TO SIXTY EIGHT THOUSAND TWO HUNDRED  (calc1232)
FOR_LOOP V EQUALS SEVEN PLUS X  (calc1233)
Q OF FIFTY THOUSAND AND FORTY SEVEN COMMA ELEVEN COMMA X  (calc1234)
FOR_LOOP T EQUALS T  (calc1235)
LOG OF THOUSAND AND NINETY SIX  (calc1236)
DEFINE FUNCTION X ARGUMENT LIST B COMMA K COMMA U.  (calc1237)
A OF R COMMA THOUSAND EIGHT HUNDRED THIRTEEN  (calc1238)
FOR_LOOP I EQUALS ONE  (calc1239)
X OF J COMMA EIGHTEEN COMMA A  (calc1240)
FOR_LOOP I EQUALS FOUR HUNDRED AND SIXTY  (calc1241)
SET D EQUALS S MINUS FIVE  (calc1242)
F OF U COMMA EIGHT HUNDRED COMMA EIGHTY ONE THOUSAND  (calc1243)
S OF J  (calc1244)
THOUSAND DIVIDE NINETY SIX OPEN PAREN MULTIPLY BY O CLOSE PARENTHESIS  (calc1245)
Q OF HUNDRED EIGHTY NINE COMMA M  (calc1246)
FOR_LOOP V EQUALS THREE HUNDRED POINT SIX MULTIPLY BY T  (calc1247)
DEFINE FUNCTION X ARGUMENT LIST J.  (calc1248)
M OF FIVE COMMA U COMMA SIXTY  (calc1249)
WHILE J EQUALS FOURTEEN  (calc1250)
C OF E  (calc1251)
FOR_LOOP X EQUALS HUNDRED TWENTY SIX  (calc1252)
WHILE F LESS THAN OR EQUAL TO HUNDRED AND FORTY  (calc1253)
SEVEN HUNDRED POWER OF NINETY FOUR POINT TWO NINE  (calc1254)
FIFTY SEVEN SUBTRACT FOUR OPEN PAREN MULTIPLY BY EIGHT HUNDRED CLOSE PAREN  (calc1255)
U OF O COMMA TEN   (calc1256)
TANGENT OF SEVEN HUNDRED AND THIRTY TWO POINT THREE  (calc1257)
OPEN FORTY EIGHT SUBTRACT NINE HUNDRED CLOSE  (calc1258)
FOR_LOOP W EQUALS X  (calc1259)
TWENTY NINE TIMES THREE THOUSAND TWELVE  (calc1260)
SINE OF THIRTY FIVE  (calc1261)
FOR_LOOP M EQUALS DECIMAL THREE SIX  (calc1262)
L OF V COMMA G  (calc1263)
FOR_LOOP O EQUALS O POINT FOUR  (calc1264)
OPEN PAREN FOUR OVER EIGHTY FIVE POINT SIX CLOSE PAREN  (calc1265)
OPEN PAREN TWO SIX SEVEN ONE EIGHT MINUS POINT FOUR CLOSE  (calc1266)
X TIMES O  (calc1267)
FOR_LOOP X EQUALS SEVENTEEN  (calc1268)
T OF SEVEN HUNDRED COMMA S COMMA Z  (calc1269)
WHILE R NOT EQUAL TO ONE  (calc1270)
SET N EQUALS Y TIMES EIGHTEEN  (calc1271)
LIMIT FIFTY NINE GREATER THAN D AND V LESS THAN OR EQUAL TO NINETY TWO  (calc1272)
EXPONENTIAL OF SIXTY SIX  (calc1273)
COSINE OF SIX HUNDRED  (calc1274)
A OF TWO HUNDRED POINT FOUR FIVE ZERO TWO ONE COMMA G COMMA THOUSAND  (calc1275)
LIMIT NOT F GREATER THAN OR EQUAL TO T  (calc1276)
O OF HUNDRED TWELVE  (calc1277)
LIMIT NINETY FIVE GREATER THAN N  (calc1278)
OPEN PAREN HUNDRED THOUSAND ONE HUNDRED AND SEVENTY FIVE MULTIPLY BY NINE CLOSE  (calc1279)
STANDBY.  (calc1280)
LIMIT NOT Q  (calc1281)
OPEN SIXTEEN HUNDRED O FIVE MINUS FIFTY THREE CLOSE PAREN  (calc1282)
FOR_LOOP V EQUALS NINETY NINE POINT SEVEN MINUS F  (calc1283)
Z OF SEVENTEEN HUNDRED COMMA A  (calc1284)
IF A AND P EQUALS Y  (calc1285)
FOR_LOOP Y EQUALS THIRTY TWO THOUSAND  (calc1286)
WHILE T EQUALS O  (calc1287)
WHILE R NOT EQUAL TO FIFTY FOUR  (calc1288)
DEFINE FUNCTION P ARGUMENT LIST U COMMA V.  (calc1289)
COSINE OF POINT NINE O THREE ZERO TWO  (calc1290)
BEGIN.  (calc1291)
IF H NOT EQUAL TO FIVE HUNDRED SIXTY MILLION  (calc1292)
FOR_LOOP M EQUALS HUNDRED AND FIFTY FIVE THOUSAND  (calc1293)
I OF J COMMA D COMMA SEVENTY THREE  (calc1294)
WHILE THREE GREATER THAN I  (calc1295)
FOR_LOOP A EQUALS HUNDRED POINT FOUR  (calc1296)
IF Q  (calc1297)
C POWER OF X  (calc1298)
IF FOUR NINE NOT EQUAL TO S  (calc1299)
IF L GREATER THAN O  (calc1300)
FOR_LOOP T EQUALS S  (calc1301)
S OF M  (calc1302)
NATURAL LOG OF L  (calc1303)
ENTER.  (calc1304)
FOR_LOOP T EQUALS F PLUS NINETY THOUSAND  (calc1305)
DEFINE FUNCTION Q ARGUMENT LIST A COMMA D COMMA M.  (calc1306)
O POWER THOUSAND AND NINETY FOUR  (calc1307)
OPEN PARENTHESIS TWO OVER THREE CLOSE PAREN  (calc1308)
FOR_LOOP U EQUALS L  (calc1309)
FIFTEEN SUBTRACT SEVENTY NINE OPEN PAREN DIVIDE EIGHTY CLOSE PAREN  (calc1310)
O DIVIDE I  (calc1311)
IF Q  (calc1312)
I OF J COMMA FIFTY FOUR COMMA NINE HUNDRED AND TWO THOUSAND FORTY SIX  (calc1313)
IF NOT F  (calc1314)
V OF SIXTY POINT EIGHT SEVEN COMMA I  (calc1315)
LIMIT I GREATER THAN THREE HUNDRED  (calc1316)
U OF K  (calc1317)
SET I EQUAL TO T MINUS FORTY EIGHT  (calc1318)
S OF P COMMA ONE HUNDRED AND FIFTY THREE  (calc1319)
S OF HUNDRED COMMA Z  (calc1320)
J OF EIGHT SIX FOUR NINE COMMA C  (calc1321)
LIMIT NOT TWO HUNDRED FORTY SIX EQUALS P  (calc1322)
OPEN FIFTEEN PLUS POINT EIGHT CLOSE PARENTHESIS  (calc1323)
I MULTIPLY BY S  (calc1324)
FOR_LOOP T EQUALS A OVER POINT SEVEN  (calc1325)
K OF I  (calc1326)
LOG OF FORTY FOUR  (calc1327)
DEFINE FUNCTION N ARGUMENT LIST C COMMA J.  (calc1328)
LOG OF C  (calc1329)
EXPONENTIAL OF ELEVEN  (calc1330)
SINE OF SEVEN  (calc1331)
NATURAL LOG OF O  (calc1332)
OPEN FOUR THOUSAND NINETY OVER TWO HUNDRED AND ELEVEN CLOSE PAREN  (calc1333)
LIMIT V  (calc1334)
DEFINE FUNCTION C ARGUMENT LIST M.  (calc1335)
FOR_LOOP D EQUALS O  (calc1336)
FOR_LOOP W EQUALS B PLUS POINT ZERO ONE  (calc1337)
J OF C COMMA B COMMA THOUSAND  (calc1338)
COSINE OF HUNDRED AND SEVENTY SEVEN THOUSAND  (calc1339)
Y OF Y COMMA F COMMA G  (calc1340)
O OF SIXTY FOUR THOUSAND THIRTEEN COMMA J COMMA NINETY FIVE  (calc1341)
F OF SEVEN HUNDRED COMMA T COMMA EIGHTY FOUR  (calc1342)
WHILE THOUSAND TWO HUNDRED POINT SIX SEVEN EQUALS A  (calc1343)
COS OF S  (calc1344)
SET Q EQUAL TO EXPONENTIAL V  (calc1345)
D OF K  (calc1346)
NINETEEN TIMES POINT TWO SEVEN O  (calc1347)
Z OF ZERO  (calc1348)
LOG OF THOUSAND  (calc1349)
Z OF POINT O  (calc1350)
OPEN PAREN SIXTY EIGHT POWER NINETEEN CLOSE PARENTHESIS  (calc1351)
OPEN PARENTHESIS O DIVIDED BY POINT THREE CLOSE PARENTHESIS  (calc1352)
FOR_LOOP B EQUALS FIFTEEN HUNDRED  (calc1353)
OPEN PARENTHESIS POINT SIX DIVIDE EIGHTY FOUR CLOSE PARENTHESIS  (calc1354)
SQUARE ROOT  OF ONE THOUSAND  (calc1355)
SET W EQUAL TO SINE A  (calc1356)
FOR_LOOP U EQUALS M  (calc1357)
OPEN PAREN FIFTY ONE MINUS EIGHT CLOSE  (calc1358)
P OF FOUR THOUSAND FORTY NINE COMMA FIFTY COMMA FIVE TWO  (calc1359)
WHILE C NOT EQUAL TO FOURTEEN THOUSAND AND TWENTY EIGHT  (calc1360)
ENTER.  (calc1361)
THOUSAND TEN  POINT ZERO FOUR DIVIDED BY O EIGHT  (calc1362)
ELEVEN SUBTRACT THIRTEEN OPEN MINUS POINT NINE FOUR CLOSE PAREN  (calc1363)
DEFINE FUNCTION G ARGUMENT LIST H COMMA L COMMA V.  (calc1364)
V OF SIX COMMA E  (calc1365)
S OF DECIMAL POINT SIX COMMA R COMMA FIFTY FIVE  (calc1366)
FOR_LOOP R EQUALS FORTY MULTIPLY BY F  (calc1367)
FOR_LOOP Z EQUALS FIVE HUNDRED TEN   (calc1368)
LOG OF FIVE HUNDRED  (calc1369)
COS OF E  (calc1370)
WHILE ZERO NINE GREATER THAN OR EQUAL TO A  (calc1371)
K POWER E  (calc1372)
FOR_LOOP V EQUALS L  (calc1373)
FOR_LOOP K EQUALS TWO HUNDRED AND FORTY SEVEN TIMES Y  (calc1374)
IF F LESS THAN HUNDRED THIRTY NINE DECIMAL POINT SEVEN  (calc1375)
OPEN HUNDRED NINETEEN DIVIDE TWELVE POINT O CLOSE PAREN  (calc1376)
NINE HUNDRED TEN  TIMES EIGHTY  (calc1377)
WHILE FIFTEEN HUNDRED FIVE LESS THAN X  (calc1378)
FOR_LOOP M EQUALS E  (calc1379)
DEFINE FUNCTION P ARGUMENT LIST S.  (calc1380)
W MULTIPLY BY M  (calc1381)
FOR_LOOP S EQUALS B  (calc1382)
A OF I  (calc1383)
FOR_LOOP V EQUALS O MULTIPLY BY TWENTY  (calc1384)
W OF P COMMA FIFTY TWO  (calc1385)
FOR_LOOP M EQUALS Q  (calc1386)
COS OF X  (calc1387)
NATURAL LOG OF N  (calc1388)
COMPUTER.  (calc1389)
W OF TWO HUNDRED THOUSAND THREE HUNDRED COMMA E  (calc1390)
U OF L COMMA ONE HUNDRED POINT ONE FIVE SIX COMMA SEVEN HUNDRED AND EIGHT  (calc1391)
EXPONENTIAL OF W  (calc1392)
SIX HUNDRED POWER OF O OPEN PLUS THOUSAND TWENTY EIGHT CLOSE  (calc1393)
OPEN PAREN THOUSAND TWO HUNDRED SIXTY POWER OF FIFTY TWO CLOSE PAREN  (calc1394)
OPEN FIFTEEN SUBTRACT ONE SIX CLOSE  (calc1395)
FOR_LOOP N EQUALS S  (calc1396)
Q OF Q COMMA D COMMA K  (calc1397)
TWELVE POWER OF FIVE NINE ZERO  (calc1398)
SET T EQUALS N MULTIPLY BY FOUR  (calc1399)
H OF TWO COMMA TWELVE HUNDRED EIGHTY SIX  (calc1400)
DEFINE FUNCTION Q ARGUMENT LIST M.  (calc1401)
Y OF THOUSAND COMMA V COMMA X  (calc1402)
OPEN PARENTHESIS TWENTY FIVE POINT TWO TIMES TWO HUNDRED CLOSE PAREN  (calc1403)
M OF THIRTEEN HUNDRED O EIGHT COMMA E  (calc1404)
IF NOT L GREATER THAN FOUR HUNDRED AND THIRTY TWO  (calc1405)
ENTER.  (calc1406)
FIVE HUNDRED TIMES HUNDRED AND SIXTY  (calc1407)
WHILE F NOT EQUAL TO K  (calc1408)
FOR_LOOP C EQUALS THOUSAND NINETY EIGHT PLUS W  (calc1409)
COS OF H  (calc1410)
F POWER OF C  (calc1411)
A OF G COMMA FIFTY SEVEN COMMA SIX  (calc1412)
M OF EIGHTY THREE  (calc1413)
FOR_LOOP B EQUALS NINETY TWO  (calc1414)
SET K EQUAL COS Y  (calc1415)
IF K GREATER THAN OR EQUAL TO O  (calc1416)
WHILE Z NOT EQUAL TO SIXTY FOUR  (calc1417)
FOR_LOOP Q EQUALS POINT TWO OVER Q  (calc1418)
R OF EIGHTEEN HUNDRED COMMA X  (calc1419)
OPEN PAREN FIVE POWER NINETEEN HUNDRED AND THIRTY THREE CLOSE PAREN  (calc1420)
HUNDRED SEVEN SUBTRACT EIGHT  (calc1421)
I OF R  (calc1422)
G OF V COMMA P  (calc1423)
BEGIN.  (calc1424)
C OF TWENTY THOUSAND  (calc1425)
WHILE C EQUALS F  (calc1426)
THOUSAND THREE HUNDRED AND THIRTY EIGHT DIVIDE O  (calc1427)
SET H EQUALS U SUBTRACT SIX  (calc1428)
T OF THREE THOUSAND ONE HUNDRED TWENTY ONE COMMA Z  (calc1429)
O MINUS FORTY SEVEN  (calc1430)
COMPUTER.  (calc1431)
FOR_LOOP V EQUALS K  (calc1432)
IF X  (calc1433)
LIMIT R  (calc1434)
TANGENT OF POINT ZERO ONE  (calc1435)
I OF THOUSAND NINETY FIVE COMMA SIX  (calc1436)
LIMIT SEVENTY THREE THOUSAND GREATER THAN I  (calc1437)
B OF M  (calc1438)
SQUARE ROOT  OF SEVEN HUNDRED  (calc1439)
COS OF POINT TWO  (calc1440)
B OF THOUSAND FIFTY EIGHT COMMA THREE THOUSAND NINETY SEVEN COMMA EIGHTY FOUR  (calc1441)
OPEN PAREN DECIMAL POINT SIX TIMES O CLOSE  (calc1442)
FOR_LOOP S EQUALS FIFTY FIVE  (calc1443)
C POWER OF V  (calc1444)
FOR_LOOP M EQUALS SIXTY FOUR POINT SEVEN ONE  (calc1445)
H OF FIVE HUNDRED COMMA C COMMA ONE HUNDRED AND EIGHTY SEVEN  (calc1446)
N OF Z COMMA TWENTY TWO COMMA Q  (calc1447)
LIMIT O LESS THAN OR EQUAL TO R  (calc1448)
J MINUS C  (calc1449)
SET A EQUAL V POWER OF EIGHTY THREE  (calc1450)
IF SEVEN THOUSAND NINE HUNDRED AND SIXTEEN GREATER THAN OR EQUAL TO W  (calc1451)
WHILE EIGHTY LESS THAN OR EQUAL TO J  (calc1452)
END.  (calc1453)
FOR_LOOP C EQUALS POINT THREE FOUR ONE  (calc1454)
D OF POINT SEVEN SIX  (calc1455)
FOR_LOOP T EQUALS W  (calc1456)
EXPONENTIAL OF NINE HUNDRED  (calc1457)
OPEN HUNDRED NINETY MULTIPLY BY FOUR HUNDRED CLOSE  (calc1458)
FOR_LOOP H EQUALS TEN  OVER M  (calc1459)
SQUARE ROOT  OF K  (calc1460)
DEFINE FUNCTION M ARGUMENT LIST L COMMA V.  (calc1461)
K OF ZERO COMMA FIVE HUNDRED AND FIFTEEN COMMA O  (calc1462)
OPEN PAREN FIFTY EIGHT TO THE POWER OF SIX CLOSE PAREN  (calc1463)
NATURAL LOG OF Y  (calc1464)
T OF POINT SIX NINE COMMA O DECIMAL POINT ONE COMMA DECIMAL EIGHT  (calc1465)
FOR_LOOP U EQUALS FIVE HUNDRED  (calc1466)
OPEN PAREN POINT TWO DIVIDED BY DECIMAL POINT TWO FOUR CLOSE PARENTHESIS  (calc1467)
TANGENT OF POINT NINE  (calc1468)
FOR_LOOP U EQUALS P  (calc1469)
SEVEN HUNDRED AND FIFTY TWO SUBTRACT SIXTY TWO  (calc1470)
SET R EQUALS Y DIVIDED BY SIXTY THOUSAND  (calc1471)
L OF K  (calc1472)
EIGHTY NINE DIVIDE TWENTY TWO OPEN MINUS HUNDRED AND FIFTY FOUR CLOSE  (calc1473)
J OF THOUSAND AND TWENTY COMMA SIXTY ONE POINT NINE COMMA O  (calc1474)
OPEN PAREN TWO POWER FORTY FOUR CLOSE PAREN  (calc1475)
FOR_LOOP D EQUALS R MULTIPLY BY NINE THOUSAND FIVE HUNDRED  (calc1476)
Z OF POINT FOUR COMMA HUNDRED AND FORTY SEVEN  (calc1477)
V SUBTRACT V  (calc1478)
TWO MINUS POINT FOUR FIVE  (calc1479)
OPEN PAREN POINT FOUR TO THE POWER OF THIRTY ONE CLOSE PAREN  (calc1480)
EXPONENTIAL OF U  (calc1481)
X OF THIRTY TWO  (calc1482)
OPEN FIFTEEN HUNDRED POWER EIGHT THOUSAND CLOSE  (calc1483)
FOR_LOOP Q EQUALS Z  (calc1484)
I OVER I  (calc1485)
G OF K COMMA T  (calc1486)
IF THOUSAND ONE HUNDRED TWO EQUALS F  (calc1487)
IF NOT F EQUALS H  (calc1488)
M OF J COMMA SEVENTY EIGHT  (calc1489)
SET A EQUAL TO NATURAL LOG Y  (calc1490)
O OF V  (calc1491)
FOR_LOOP B EQUALS K  (calc1492)
IF NOT N NOT EQUAL TO I  (calc1493)
C OF FIFTY EIGHT COMMA THREE THOUSAND ONE HUNDRED COMMA T  (calc1494)
SET J EQUAL TO LOG H  (calc1495)
SET U EQUAL TO A TO THE POWER OF HUNDRED NINETY TWO  (calc1496)
Y OF EIGHTY TWO COMMA N  (calc1497)
FOR_LOOP Z EQUALS L MINUS TWO HUNDRED ELEVEN  (calc1498)
U OF THIRTY EIGHT COMMA O  (calc1499)
J OF F  (calc1500)
FOR_LOOP U EQUALS SIXTY TWO MULTIPLY BY J  (calc1501)
W OF T COMMA ONE HUNDRED TWENTY EIGHT THOUSAND  (calc1502)
IF ONE HUNDRED EQUALS W  (calc1503)
A OF G COMMA T  (calc1504)
Z OF D COMMA POINT NINE O ONE EIGHT  (calc1505)
FOR_LOOP L EQUALS R  (calc1506)
F OF POINT SIX SEVEN EIGHT SIX NINE  (calc1507)
NATURAL LOG OF ZERO  (calc1508)
N OF P  (calc1509)
T OF C COMMA FIFTY FIVE  (calc1510)
SINE OF HUNDRED FORTY ONE  (calc1511)
OPEN PAREN FORTY EIGHT DIVIDE NINETEEN CLOSE PARENTHESIS  (calc1512)
B OF FORTY FIVE COMMA THREE HUNDRED AND NINETY NINE POINT EIGHT COMMA H  (calc1513)
DEFINE FUNCTION L ARGUMENT LIST T COMMA J COMMA K.  (calc1514)
G OF THREE COMMA DECIMAL POINT SIX COMMA EIGHTY TWO  (calc1515)
IF NOT T  (calc1516)
IF W  (calc1517)
B OF FIFTEEN HUNDRED COMMA FIVE HUNDRED AND THIRTY  (calc1518)
H SUBTRACT V  (calc1519)
FOR_LOOP V EQUALS C  (calc1520)
X OF NINETY NINE COMMA FORTY ONE COMMA W  (calc1521)
F OF FIFTEEN HUNDRED NINETY COMMA D  (calc1522)
FOR_LOOP A EQUALS X  (calc1523)
FOR_LOOP K EQUALS W  (calc1524)
NATURAL LOG OF T  (calc1525)
SET U EQUALS U MULTIPLY BY POINT FIVE NINE  (calc1526)
FOR_LOOP Q EQUALS E  (calc1527)
L OF M  (calc1528)
WHILE O LESS THAN EIGHT HUNDRED  (calc1529)
L DIVIDED BY S  (calc1530)
COMPUTER.  (calc1531)
C OF Z  (calc1532)
B OF ZERO  (calc1533)
O OF Y COMMA R  (calc1534)
U OF D  (calc1535)
F OF M COMMA FIVE THREE  (calc1536)
I DIVIDE E  (calc1537)
NATURAL LOG OF W  (calc1538)
FOR_LOOP P EQUALS H  (calc1539)
SEVENTY THREE TIMES NINETY NINE OPEN OVER THIRTEEN CLOSE PARENTHESIS  (calc1540)
FOR_LOOP V EQUALS ZERO  (calc1541)
DEFINE FUNCTION F ARGUMENT LIST Z.  (calc1542)
WHILE V EQUALS ELEVEN  (calc1543)
OPEN PARENTHESIS EIGHT HUNDRED POWER OF FOUR ONE ZERO O CLOSE PAREN  (calc1544)
FOR_LOOP R EQUALS EIGHT HUNDRED  (calc1545)
ENTER.  (calc1546)
U OVER R  (calc1547)
N OF SIXTEEN COMMA FORTY TWO POINT TWO FOUR SIX SEVEN  (calc1548)
LIMIT S GREATER THAN OR EQUAL TO MILLION HUNDRED AND SIXTY POINT ZERO  (calc1549)
ZERO DIVIDE THREE HUNDRED TWENTY OPEN TIMES HUNDRED AND THIRTY FOUR CLOSE PAREN  (calc1550)
END.  (calc1551)
END.  (calc1552)
FOR_LOOP B EQUALS C  (calc1553)
FOR_LOOP V EQUALS ONE NINE  (calc1554)
T POWER OF Y  (calc1555)
FOR_LOOP U EQUALS SIX  (calc1556)
C OF T COMMA C COMMA D  (calc1557)
WHILE G LESS THAN POINT SIX FIVE  (calc1558)
SET Q EQUAL O MULTIPLY BY ELEVEN THOUSAND  (calc1559)
K OF THIRTEEN HUNDRED AND SIXTY NINE COMMA SIXTEEN HUNDRED O SIX  (calc1560)
FOR_LOOP Q EQUALS NINETEEN POINT THREE NINE ONE  (calc1561)
OPEN SIXTY ONE TO THE POWER OF SEVENTY CLOSE PARENTHESIS  (calc1562)
WHILE N EQUALS F  (calc1563)
LIMIT NOT SIXTY SEVEN EQUALS K  (calc1564)
IF C LESS THAN P XOR M  (calc1565)
Z OF Z COMMA SIXTY  (calc1566)
Y OF E COMMA J COMMA B  (calc1567)
SINE OF E  (calc1568)
SIX HUNDRED DIVIDE POINT SIX  (calc1569)
FOR_LOOP G EQUALS NINETY FIVE MULTIPLY BY C  (calc1570)
OPEN FIFTEEN HUNDRED EIGHTY ONE TO THE POWER OF TEN  CLOSE  (calc1571)
FOR_LOOP C EQUALS L  (calc1572)
Z OF A COMMA O  (calc1573)
SET T EQUAL TO B SUBTRACT FORTY TWO  (calc1574)
FOR_LOOP X EQUALS THIRTEEN HUNDRED O SIX  (calc1575)
J OF FOUR HUNDRED AND FIFTY NINE THOUSAND COMMA HUNDRED EIGHTY FIVE  (calc1576)
K OF U COMMA POINT FIVE  (calc1577)
WHILE POINT ZERO LESS THAN V  (calc1578)
IF THREE HUNDRED TWENTY SEVEN LESS THAN C  (calc1579)
EXPONENTIAL OF T  (calc1580)
IF HUNDRED EIGHTEEN NOT EQUAL TO W  (calc1581)
F OF S COMMA ELEVEN COMMA O  (calc1582)
E OF EIGHTY NINE  (calc1583)
FOR_LOOP C EQUALS SEVENTEEN THOUSAND ONE HUNDRED AND TWENTY THREE  (calc1584)
Y OF NINETY COMMA FIFTEEN  (calc1585)
I OF H COMMA W COMMA SEVENTY  (calc1586)
OPEN PAREN SEVENTY TWO POWER OF O CLOSE PARENTHESIS  (calc1587)
J MINUS O  (calc1588)
DEFINE FUNCTION F ARGUMENT LIST N.  (calc1589)
LIMIT Y  (calc1590)
I OF EIGHT HUNDRED SIXTY ONE  (calc1591)
FOR_LOOP F EQUALS M  (calc1592)
LIMIT NOT F  (calc1593)
OPEN PARENTHESIS SEVEN TIMES FIVE HUNDRED CLOSE PAREN  (calc1594)
FOR_LOOP I EQUALS ELEVEN HUNDRED SEVENTY TWO DIVIDED BY A  (calc1595)
ONE SEVEN OVER EIGHT THOUSAND  (calc1596)
SET M EQUALS SQUARE ROOT  F  (calc1597)
TANGENT OF S  (calc1598)
DEFINE FUNCTION I ARGUMENT LIST Y COMMA U.  (calc1599)
SET B EQUALS P PLUS THIRTY NINE  (calc1600)
SEVENTY FIVE TO THE POWER OF NINETY NINE  (calc1601)
IF H LESS THAN F  (calc1602)
LIMIT C GREATER THAN OR EQUAL TO FIFTEEN  (calc1603)
WHILE R LESS THAN THOUSAND FORTY FIVE  (calc1604)
O SUBTRACT K  (calc1605)
FIVE SUBTRACT POINT SIX OPEN MULTIPLY BY O CLOSE PAREN  (calc1606)
LIMIT FORTY ONE GREATER THAN OR EQUAL TO J  (calc1607)
LIMIT D  (calc1608)
OPEN FIFTEEN PLUS THIRTEEN HUNDRED O FOUR CLOSE PAREN  (calc1609)
R OF K COMMA ONE HUNDRED AND SEVENTY SIX  (calc1610)
LIMIT Y AND B  (calc1611)
A OF R COMMA L  (calc1612)
U OF FIVE HUNDRED POINT NINE FOUR COMMA L  (calc1613)
IF M GREATER THAN NINETEEN  (calc1614)
IF G XOR R  (calc1615)
NATURAL LOG OF FIVE HUNDRED AND FORTY SEVEN  (calc1616)
SET M EQUAL TO P POWER OF TWO  (calc1617)
WHILE D GREATER THAN OR EQUAL TO FIFTY TWO  (calc1618)
WHILE NINETY NINE NOT EQUAL TO B  (calc1619)
IF I  (calc1620)
SINE OF THOUSAND TWO  (calc1621)
R OF SIXTY ONE COMMA HUNDRED AND FORTY THREE POINT SIX  (calc1622)
TANGENT OF FIFTEEN HUNDRED  (calc1623)
T MULTIPLY BY N  (calc1624)
DEFINE FUNCTION V ARGUMENT LIST I.  (calc1625)
FOR_LOOP Q EQUALS HUNDRED AND THIRTY FIVE  (calc1626)
DEFINE FUNCTION V ARGUMENT LIST O COMMA Q.  (calc1627)
THREE HUNDRED TIMES SIX POINT FOUR SIX  (calc1628)
NINE MINUS FORTY FOUR OPEN PARENTHESIS PLUS EIGHTY ONE CLOSE PARENTHESIS  (calc1629)
M OF F COMMA K COMMA ZERO  (calc1630)
WHILE N NOT EQUAL TO T  (calc1631)
LOG OF T  (calc1632)
D OF A  (calc1633)
FOR_LOOP E EQUALS EIGHT  (calc1634)
IF T AND DECIMAL POINT TWO SEVEN EQUALS E  (calc1635)
H POWER OF J  (calc1636)
DEFINE FUNCTION N ARGUMENT LIST U COMMA P COMMA W.  (calc1637)
LIMIT NOT O  (calc1638)
SIXTY NINE SUBTRACT O OPEN PAREN TIMES FIFTY CLOSE PAREN  (calc1639)
R OF DECIMAL POINT NINE COMMA HUNDRED AND FIFTY THREE  (calc1640)
SET J EQUAL TANGENT R  (calc1641)
D OF C COMMA E COMMA SEVENTY SIX  (calc1642)
SET W EQUALS NATURAL LOG A  (calc1643)
FOR_LOOP O EQUALS POINT SIX  (calc1644)
J OF FIFTY FIVE THOUSAND COMMA ONE HUNDRED THOUSAND FORTY  (calc1645)
P TIMES G  (calc1646)
DEFINE FUNCTION V ARGUMENT LIST Z.  (calc1647)
OPEN PAREN EIGHT HUNDRED AND SIXTEEN SUBTRACT THREE HUNDRED CLOSE PAREN  (calc1648)
K OF FIVE HUNDRED FORTY TWO COMMA THREE HUNDRED  (calc1649)
O POWER OF FORTY TWO OPEN PARENTHESIS DIVIDE ELEVEN CLOSE PAREN  (calc1650)
COSINE OF SIXTEEN HUNDRED FORTY POINT SIX FOUR THREE FIVE SIX  (calc1651)
STANDBY.  (calc1652)
FOR_LOOP C EQUALS ONE  (calc1653)
END.  (calc1654)
DEFINE FUNCTION Z ARGUMENT LIST H.  (calc1655)
IF NOT T NOT EQUAL TO W  (calc1656)
P OF FOUR HUNDRED AND SEVENTY SEVEN COMMA V COMMA EIGHTY EIGHT  (calc1657)
FOR_LOOP U EQUALS SIX HUNDRED EIGHTY SEVEN PLUS W  (calc1658)
FOR_LOOP E EQUALS D  (calc1659)
COSINE OF J  (calc1660)
L OF THOUSAND FIFTY NINE COMMA ONE HUNDRED AND TWENTY FIVE  (calc1661)
COSINE OF J  (calc1662)
THIRTEEN HUNDRED THIRTY ONE MINUS SIX HUNDRED  (calc1663)
END.  (calc1664)
K OF THOUSAND EIGHTY TWO COMMA Z  (calc1665)
FOR_LOOP M EQUALS Q  (calc1666)
ELEVEN HUNDRED MULTIPLY BY TEN   (calc1667)
X OF SIXTY EIGHT COMMA POINT FIVE  (calc1668)
STANDBY.  (calc1669)
SET L EQUAL TO L OVER NINETEEN  (calc1670)
SET G EQUALS COS N  (calc1671)
ENTER.  (calc1672)
OPEN PAREN THIRTY EIGHT MINUS HUNDRED AND FORTY THREE CLOSE PARENTHESIS  (calc1673)
LIMIT NOT W  (calc1674)
FOR_LOOP M EQUALS THOUSAND TWO HUNDRED SEVENTY ONE  (calc1675)
FOR_LOOP O EQUALS B  (calc1676)
SET G EQUAL TO SINE N  (calc1677)
FOR_LOOP N EQUALS NINETEEN MULTIPLY BY B  (calc1678)
FOR_LOOP W EQUALS TWO HUNDRED TIMES F  (calc1679)
LIMIT U LESS THAN MILLION HUNDRED EIGHTY SEVEN  (calc1680)
A MULTIPLY BY O  (calc1681)
SET J EQUAL TO SQUARE ROOT  P  (calc1682)
FOR_LOOP D EQUALS V  (calc1683)
DEFINE FUNCTION W ARGUMENT LIST G COMMA P COMMA D.  (calc1684)
SET Z EQUALS COSINE G  (calc1685)
K OF HUNDRED AND NINETY ONE COMMA L  (calc1686)
THIRTY FOUR POWER OF THOUSAND FORTY SIX OPEN PAREN OVER FIFTY SEVEN CLOSE PAREN  (calc1687)
FOR_LOOP K EQUALS SIX HUNDRED  (calc1688)
LOG OF N  (calc1689)
X OF M COMMA Y  (calc1690)
FOR_LOOP U EQUALS SEVEN HUNDRED AND TWENTY FOUR POINT FIVE PLUS N  (calc1691)
IF F GREATER THAN R  (calc1692)
OPEN EIGHTY NINE DECIMAL POINT FIVE FOUR SIX TIMES FORTY EIGHT CLOSE PAREN  (calc1693)
FOR_LOOP Q EQUALS E  (calc1694)
U PLUS V  (calc1695)
FOR_LOOP F EQUALS N  (calc1696)
FOR_LOOP O EQUALS Q MINUS DECIMAL POINT FOUR FIVE EIGHT  (calc1697)
WHILE HUNDRED AND SEVENTEEN GREATER THAN T  (calc1698)
SET H EQUALS Q SUBTRACT SEVEN HUNDRED  (calc1699)
W OF T COMMA C  (calc1700)
L OF ONE COMMA Y  (calc1701)
F SUBTRACT L  (calc1702)
FOR_LOOP J EQUALS FIFTY FOUR THOUSAND  (calc1703)
WHILE H LESS THAN A MILLION  (calc1704)
SET P EQUAL Q TIMES THOUSAND ONE HUNDRED AND FORTY  (calc1705)
COS OF E  (calc1706)
DEFINE FUNCTION H ARGUMENT LIST P COMMA M.  (calc1707)
FOR_LOOP A EQUALS C  (calc1708)
NINE THOUSAND AND SIXTY TWO POWER OF FIVE  (calc1709)
SET Y EQUAL LOG O  (calc1710)
FOR_LOOP S EQUALS K  (calc1711)
A OF E COMMA O  (calc1712)
WHILE F GREATER THAN OR EQUAL TO Z  (calc1713)
IF N AND T LESS THAN OR EQUAL TO O  (calc1714)
FOR_LOOP Q EQUALS L  (calc1715)
LIMIT I GREATER THAN FIVE HUNDRED  (calc1716)
DEFINE FUNCTION B ARGUMENT LIST V.  (calc1717)
COSINE OF HUNDRED EIGHTY FIVE POINT SEVEN  (calc1718)
EXPONENTIAL OF R  (calc1719)
M OF R COMMA SEVENTY THREE COMMA SEVENTEEN HUNDRED NINETY NINE  (calc1720)
OPEN POINT TWO POWER OF FOUR HUNDRED CLOSE  (calc1721)
Q OF SIXTY SIX  (calc1722)
COS OF SIXTY EIGHT  (calc1723)
U OF T COMMA A  (calc1724)
R POWER B  (calc1725)
WHILE C GREATER THAN OR EQUAL TO SEVENTEEN POINT FOUR  (calc1726)
WHILE FIVE THOUSAND TWO HUNDRED GREATER THAN X  (calc1727)
H OF POINT NINE COMMA G  (calc1728)
TWELVE HUNDRED AND THIRTY TWO DIVIDE FORTY  (calc1729)
NATURAL LOG OF A  (calc1730)
OPEN PAREN NINETY POINT THREE FOUR SEVEN SUBTRACT THOUSAND CLOSE  (calc1731)
SINE OF U  (calc1732)
TWENTY TWO TO THE POWER OF FIVE HUNDRED  (calc1733)
F OF FIVE HUNDRED AND FIFTY THOUSAND  (calc1734)
LIMIT NOT H  (calc1735)
COMPUTER.  (calc1736)
W OF L COMMA POINT NINE  (calc1737)
OPEN THREE HUNDRED NINETY NINE THOUSAND TIMES FIVE HUNDRED CLOSE PARENTHESIS  (calc1738)
Z OF ELEVEN  (calc1739)
BEGIN.  (calc1740)
F OF HUNDRED FIFTY COMMA SIXTY EIGHT  (calc1741)
F OF FOUR COMMA THREE ONE EIGHT ONE COMMA THIRTY NINE  (calc1742)
A OF O COMMA ONE  (calc1743)
FOR_LOOP E EQUALS L MINUS POINT ONE  (calc1744)
WHILE Z NOT EQUAL TO FOUR HUNDRED  (calc1745)
SET O EQUAL X DIVIDE ZERO  (calc1746)
SET N EQUAL TO P PLUS POINT NINE  (calc1747)
FOR_LOOP I EQUALS SIX MULTIPLY BY S  (calc1748)
LIMIT Q GREATER THAN OR EQUAL TO O  (calc1749)
Z OF FIVE HUNDRED COMMA K  (calc1750)
FOR_LOOP K EQUALS H  (calc1751)
FOR_LOOP M EQUALS EIGHTEEN  (calc1752)
DEFINE FUNCTION I ARGUMENT LIST I.  (calc1753)
FOR_LOOP O EQUALS HUNDRED  (calc1754)
FOR_LOOP P EQUALS Y TIMES TWELVE HUNDRED AND SEVENTY FIVE  (calc1755)
O POWER OF S  (calc1756)
ENTER.  (calc1757)
LIMIT NOT C  (calc1758)
LIMIT J LESS THAN J XOR D  (calc1759)
M OF V  (calc1760)
COS OF NINETY FIVE POINT SIX SIX NINE  (calc1761)
LOG OF T  (calc1762)
M OF SIXTY NINE  (calc1763)
EXPONENTIAL OF G  (calc1764)
V OF G COMMA THIRTY ONE POINT SEVEN SIX  (calc1765)
TANGENT OF FIFTY  (calc1766)
OPEN PAREN ONE HUNDRED SUBTRACT HUNDRED EIGHTY CLOSE  (calc1767)
SET I EQUAL COS P  (calc1768)
DEFINE FUNCTION O ARGUMENT LIST S.  (calc1769)
SET F EQUAL Y TIMES FIVE HUNDRED  (calc1770)
NATURAL LOG OF TWENTY THREE  (calc1771)
LIMIT HUNDRED SIXTY EIGHT LESS THAN E  (calc1772)
F OF E COMMA SEVEN COMMA D  (calc1773)
WHILE T EQUALS Z  (calc1774)
SET Y EQUAL TO L POWER TEN  THOUSAND EIGHTEEN POINT FIVE SIX TWO ZERO TWO FOUR  (calc1775)
TWELVE HUNDRED SIXTY SEVEN DIVIDED BY THIRTEEN HUNDRED O THREE POINT SIX  (calc1776)
SET F EQUAL TO F SUBTRACT O  (calc1777)
M OF R COMMA E COMMA SEVENTEEN POINT ONE  (calc1778)
FOR_LOOP C EQUALS EIGHTEEN HUNDRED TEN   (calc1779)
TANGENT OF B  (calc1780)
SET X EQUALS EXPONENTIAL J  (calc1781)
FOR_LOOP K EQUALS E OVER TWENTY SEVEN  (calc1782)
IF U EQUALS X OR L LESS THAN OR EQUAL TO HUNDRED SEVENTEEN  (calc1783)
SET P EQUAL TO A OVER HUNDRED AND EIGHTY FOUR  (calc1784)
IF NOT T  (calc1785)
J OF NINETY SIX COMMA X  (calc1786)
NATURAL LOG OF HUNDRED TWENTY TWO  (calc1787)
Y OF THREE COMMA THOUSAND NINETY TWO COMMA Y  (calc1788)
FOR_LOOP A EQUALS NINE HUNDRED  (calc1789)
END.  (calc1790)
SET G EQUALS COSINE G  (calc1791)
OPEN POINT SIX ONE SEVEN EIGHT MINUS NINETY SIX CLOSE PARENTHESIS  (calc1792)
K OF S COMMA THIRTY ONE  (calc1793)
EXPONENTIAL OF W  (calc1794)
FOR_LOOP K EQUALS NINETY SIX  (calc1795)
P OF THOUSAND ONE HUNDRED AND FORTY ONE COMMA FIFTY NINE  (calc1796)
LIMIT W LESS THAN H  (calc1797)
OPEN PAREN EIGHT THOUSAND SIX HUNDRED TEN  POWER NINE THREE SIX CLOSE PAREN  (calc1798)
U DIVIDED BY V  (calc1799)
OPEN PAREN POINT NINE OVER DECIMAL POINT FOUR CLOSE  (calc1800)
K OF J COMMA SEVENTEEN HUNDRED FORTY FIVE  (calc1801)
SET H EQUAL TO SQUARE ROOT  F  (calc1802)
WHILE V LESS THAN S  (calc1803)
DEFINE FUNCTION Y ARGUMENT LIST D COMMA D.  (calc1804)
LIMIT I OR D  (calc1805)
NATURAL LOG OF FIVE HUNDRED TEN  DECIMAL SIX SEVEN  (calc1806)
SIX HUNDRED SUBTRACT O  (calc1807)
IF O GREATER THAN B  (calc1808)
W OF I  (calc1809)
ENTER.  (calc1810)
OPEN PAREN HUNDRED AND TWENTY PLUS POINT EIGHT CLOSE PAREN  (calc1811)
FOR_LOOP T EQUALS W MINUS TWO HUNDRED  (calc1812)
OPEN PARENTHESIS TWENTY TWO MULTIPLY BY EIGHT CLOSE  (calc1813)
HUNDRED SEVENTEEN DIVIDE TEN  OPEN PAREN PLUS FIFTY SIX CLOSE  (calc1814)
NATURAL LOG OF FIFTY SEVEN  (calc1815)
SET Q EQUALS NATURAL LOG Z  (calc1816)
OPEN PAREN HUNDRED AND TEN  SUBTRACT TWO THOUSAND CLOSE PARENTHESIS  (calc1817)
WHILE V NOT EQUAL TO THOUSAND SEVENTY THREE  (calc1818)
Z POWER B  (calc1819)
SEVEN HUNDRED AND THIRTY NINE TO THE POWER OF HUNDRED FIFTY THREE  (calc1820)
DEFINE FUNCTION V ARGUMENT LIST K COMMA B.  (calc1821)
FOR_LOOP R EQUALS HUNDRED SEVENTY SEVEN THOUSAND AND FIFTY EIGHT  (calc1822)
SET O EQUAL TO V POWER OF SEVENTEEN HUNDRED O FIVE  (calc1823)
FOR_LOOP F EQUALS Q  (calc1824)
WHILE E GREATER THAN OR EQUAL TO M  (calc1825)
SET E EQUALS J TIMES O  (calc1826)
IF A XOR Y GREATER THAN OR EQUAL TO R  (calc1827)
SET O EQUAL TO H TO THE POWER OF HUNDRED FIFTY FOUR  (calc1828)
Y OF M COMMA U  (calc1829)
Y OF POINT NINE FIVE COMMA U COMMA T  (calc1830)
THREE HUNDRED PLUS SIXTEEN HUNDRED EIGHTY EIGHT POINT SIX  (calc1831)
IF R GREATER THAN C  (calc1832)
O SUBTRACT N  (calc1833)
P OF SIX HUNDRED AND SIXTY COMMA SEVENTY TWO DECIMAL ONE TWO  (calc1834)
Z OF DECIMAL FIVE NINE COMMA POINT TWO COMMA G  (calc1835)
FOR_LOOP H EQUALS TWENTY THREE THOUSAND MINUS O  (calc1836)
COMPUTER.  (calc1837)
X OF FIFTY EIGHT COMMA SIXTY THREE  (calc1838)
FOR_LOOP J EQUALS W  (calc1839)
FOR_LOOP C EQUALS Y  (calc1840)
FOR_LOOP C EQUALS Q  (calc1841)
COMPUTER.  (calc1842)
IF O  (calc1843)
ENTER.  (calc1844)
FOR_LOOP D EQUALS P  (calc1845)
OPEN PAREN POINT TWO PLUS O CLOSE PAREN  (calc1846)
SET Z EQUAL N TIMES SIX HUNDRED  (calc1847)
SET V EQUAL TO LOG Q  (calc1848)
FOR_LOOP X EQUALS EIGHT  (calc1849)
LIMIT Y  (calc1850)
FOR_LOOP R EQUALS U DIVIDED BY HUNDRED  (calc1851)
ENTER.  (calc1852)
FOR_LOOP W EQUALS V  (calc1853)
OPEN PAREN SEVEN POWER SEVENTY FIVE CLOSE  (calc1854)
WHILE HUNDRED GREATER THAN OR EQUAL TO C  (calc1855)
SET X EQUAL TO Y POWER EIGHTY ONE  (calc1856)
OPEN PAREN NINETY NINE SUBTRACT THIRTY FOUR CLOSE PAREN  (calc1857)
F OF N COMMA NINETY TWO COMMA W  (calc1858)
O OF EIGHTY FOUR COMMA NINETEEN HUNDRED EIGHTEEN  (calc1859)
FOR_LOOP C EQUALS F  (calc1860)
R OF O  (calc1861)
D OF A COMMA FIFTEEN HUNDRED SIXTY FIVE  (calc1862)
IF N GREATER THAN FOUR  (calc1863)
FOR_LOOP J EQUALS FORTY SIX POINT FOUR TWO TWO SIX FIVE  (calc1864)
Z DIVIDED BY J  (calc1865)
S OF SIXTY ONE  (calc1866)
SET F EQUAL TO SQUARE ROOT  G  (calc1867)
FOR_LOOP M EQUALS POINT NINE PLUS Y  (calc1868)
P OF B  (calc1869)
LOG OF K  (calc1870)
SET Y EQUALS COSINE Q  (calc1871)
FOR_LOOP P EQUALS K  (calc1872)
BEGIN.  (calc1873)
FOR_LOOP N EQUALS F OVER HUNDRED FIFTY EIGHT  (calc1874)
A OF H COMMA SEVEN COMMA EIGHTY NINE  (calc1875)
FOR_LOOP T EQUALS FOUR HUNDRED PLUS Y  (calc1876)
FOR_LOOP X EQUALS G  (calc1877)
G OF FOURTEEN COMMA U  (calc1878)
FIFTY SIX POINT EIGHT THREE NINE O FOUR ONE TWO SUBTRACT NINETEEN  (calc1879)
SET V EQUALS SQUARE ROOT  B  (calc1880)
SET D EQUALS NATURAL LOG U  (calc1881)
IF S EQUALS T  (calc1882)
O OF C COMMA FOUR THOUSAND  (calc1883)
R OF THOUSAND AND TEN  COMMA H  (calc1884)
TANGENT OF FIVE  (calc1885)
SET B EQUALS P TO THE POWER OF SEVENTY ONE  (calc1886)
THREE NINE MINUS EIGHT HUNDRED OPEN DIVIDED BY TWENTY SEVEN CLOSE PARENTHESIS  (calc1887)
ONE HUNDRED AND SEVENTY TWO TO THE POWER OF EIGHT NINE THREE  (calc1888)
FOR_LOOP J EQUALS O  (calc1889)
X OF POINT FIVE SIX  (calc1890)
LOG OF B  (calc1891)
B OF SEVEN FOUR  (calc1892)
I OF K COMMA U  (calc1893)
OPEN SEVEN HUNDRED TIMES FIFTY EIGHT CLOSE PARENTHESIS  (calc1894)
FOR_LOOP V EQUALS THIRTY THOUSAND NINETY SEVEN  (calc1895)
SET H EQUAL EXPONENTIAL P  (calc1896)
WHILE R GREATER THAN OR EQUAL TO G  (calc1897)
MILLION AND ONE DECIMAL POINT NINE OVER FORTY EIGHT  (calc1898)
FOR_LOOP L EQUALS D  (calc1899)
TWENTY FOUR POWER HUNDRED FIFTY FIVE OPEN PAREN TIMES NINETY SIX CLOSE PAREN  (calc1900)
X OF O COMMA TWO HUNDRED COMMA X  (calc1901)
FOR_LOOP U EQUALS ONE ONE ONE  (calc1902)
SET Y EQUAL TO SINE M  (calc1903)
SET F EQUAL LOG G  (calc1904)
OPEN PAREN TWELVE HUNDRED AND SIX DIVIDE THOUSAND EIGHTEEN CLOSE  (calc1905)
L OF ZERO COMMA G COMMA SEVEN EIGHT  (calc1906)
WHILE POINT EIGHT ONE SIX TWO NOT EQUAL TO T  (calc1907)
S POWER E  (calc1908)
FIVE HUNDRED POINT SIX ONE POWER OF SEVENTY EIGHT  (calc1909)
W MINUS Z  (calc1910)
FOR_LOOP D EQUALS N PLUS EIGHTEEN HUNDRED AND SEVENTY SIX  (calc1911)
SET E EQUAL NATURAL LOG U  (calc1912)
EIGHTY OVER SIX HUNDRED NINETY SIX  (calc1913)
A OF ELEVEN HUNDRED COMMA ONE HUNDRED  (calc1914)
OPEN PARENTHESIS ONE HUNDRED TWENTY FOUR TO THE POWER OF THREE HUNDRED CLOSE  (calc1915)
FOR_LOOP O EQUALS FIVE TIMES Z  (calc1916)
C SUBTRACT E  (calc1917)
FOR_LOOP F EQUALS POINT THREE  (calc1918)
FOR_LOOP P EQUALS Z  (calc1919)
WHILE K GREATER THAN OR EQUAL TO NINETY  (calc1920)
F OF B COMMA SEVENTY SEVEN COMMA B  (calc1921)
SINE OF POINT FOUR  (calc1922)
G OF TEN  THOUSAND COMMA U  (calc1923)
G OF L COMMA S  (calc1924)
FOR_LOOP D EQUALS SEVENTY TWO  (calc1925)
V OF EIGHTY TWO COMMA ZERO  (calc1926)
C OF S COMMA TWENTY SEVEN POINT THREE FIVE  (calc1927)
BEGIN.  (calc1928)
FOR_LOOP H EQUALS L TIMES THOUSAND NINE HUNDRED AND ELEVEN  (calc1929)
COMPUTER.  (calc1930)
ONE HUNDRED POWER HUNDRED NINETY THREE OPEN PAREN OVER ONE CLOSE  (calc1931)
FOR_LOOP S EQUALS THREE  (calc1932)
LIMIT G  (calc1933)
END.  (calc1934)
FOR_LOOP R EQUALS N  (calc1935)
C OF SEVENTY COMMA THOUSAND TEN   (calc1936)
DEFINE FUNCTION S ARGUMENT LIST A.  (calc1937)
T OF THREE FIVE FOUR COMMA SIX COMMA E  (calc1938)
WHILE THREE HUNDRED NOT EQUAL TO U  (calc1939)
FOR_LOOP T EQUALS Q  (calc1940)
O OF P COMMA C  (calc1941)
FOR_LOOP U EQUALS HUNDRED AND NINETY THREE  (calc1942)
LIMIT P EQUALS SIXTY AND L GREATER THAN G  (calc1943)
SET F EQUAL TO D DIVIDED BY SEVENTEEN HUNDRED AND EIGHTY TWO  (calc1944)
LIMIT NOT Q  (calc1945)
C OF FIFTY MILLION  (calc1946)
TWENTY PLUS ONE HUNDRED  (calc1947)
SEVEN DIVIDE TWO OPEN PARENTHESIS MINUS SEVENTY TWO CLOSE PARENTHESIS  (calc1948)
IF S GREATER THAN OR EQUAL TO O AND T LESS THAN ELEVEN  (calc1949)
OPEN SIXTY SEVEN MINUS EIGHT CLOSE  (calc1950)
FOR_LOOP O EQUALS FIFTY TWO  (calc1951)
I TO THE POWER OF V  (calc1952)
END.  (calc1953)
WHILE EIGHT HUNDRED AND ONE GREATER THAN J  (calc1954)
O OF I COMMA N  (calc1955)
C OF EIGHT NINE COMMA SEVENTY ONE POINT SIX SEVEN  (calc1956)
FOR_LOOP D EQUALS SEVENTY FOUR  (calc1957)
OPEN A MILLION MINUS EIGHTY EIGHT CLOSE PAREN  (calc1958)
V OF Z COMMA G COMMA EIGHT HUNDRED THIRTY SIX  (calc1959)
LOG OF THOUSAND TEN   (calc1960)
WHILE HUNDRED SIXTY SIX POINT SEVEN FIVE GREATER THAN N  (calc1961)
OPEN SIXTY EIGHT POWER SIX CLOSE  (calc1962)
FOR_LOOP P EQUALS DECIMAL ONE SIX  (calc1963)
OPEN PARENTHESIS EIGHTY SIX DIVIDED BY EIGHT CLOSE  (calc1964)
FOR_LOOP N EQUALS O TIMES TWO HUNDRED AND TEN   (calc1965)
FOR_LOOP N EQUALS HUNDRED TWELVE THOUSAND MULTIPLY BY X  (calc1966)
M OF Y COMMA O  (calc1967)
V OF SIXTEEN HUNDRED AND NINETY SIX  (calc1968)
N OF W COMMA X  (calc1969)
OPEN PAREN THREE MULTIPLY BY THOUSAND EIGHT HUNDRED CLOSE PAREN  (calc1970)
C OF L COMMA SIXTEEN HUNDRED COMMA FORTY NINE THOUSAND  (calc1971)
L OF THIRTY  (calc1972)
FOR_LOOP K EQUALS W TIMES NINE HUNDRED FIFTY FOUR  (calc1973)
N OF M COMMA B  (calc1974)
Q OF C COMMA Y  (calc1975)
WHILE FOUR ONE TWO ONE GREATER THAN OR EQUAL TO H  (calc1976)
WHILE POINT FIVE NINE THREE LESS THAN OR EQUAL TO F  (calc1977)
Q OF FIVE THOUSAND COMMA TEN  THOUSAND SIX HUNDRED  (calc1978)
FOR_LOOP P EQUALS K DIVIDED BY TWENTY FIVE  (calc1979)
FOR_LOOP M EQUALS D  (calc1980)
E OF N COMMA FIVE HUNDRED  (calc1981)
LIMIT THIRTY THREE GREATER THAN OR EQUAL TO X  (calc1982)
Q MULTIPLY BY L  (calc1983)
FOR_LOOP H EQUALS X OVER FIVE HUNDRED AND EIGHTY ONE POINT FOUR  (calc1984)
S OF SIXTY  (calc1985)
FOR_LOOP V EQUALS L MINUS TWENTY THOUSAND AND FIFTY FIVE  (calc1986)
NATURAL LOG OF THIRTEEN HUNDRED  (calc1987)
SQUARE ROOT  OF N  (calc1988)
OPEN PAREN EIGHTEEN HUNDRED DIVIDED BY THIRTY SEVEN CLOSE PAREN  (calc1989)
SINE OF TWENTY EIGHT POINT ONE  (calc1990)
A OF H COMMA B  (calc1991)
H POWER OF T  (calc1992)
OPEN SIX PLUS THOUSAND SIXTY CLOSE  (calc1993)
FOR_LOOP D EQUALS TEN  THOUSAND  (calc1994)
DEFINE FUNCTION E ARGUMENT LIST O COMMA N.  (calc1995)
FOR_LOOP I EQUALS EIGHT HUNDRED EIGHTY ONE  (calc1996)
FOR_LOOP A EQUALS L  (calc1997)
SINE OF POINT SIX  (calc1998)
NATURAL LOG OF NINETY TWO THOUSAND  (calc1999)
OPEN SIXTY TWO PLUS TWENTY THOUSAND CLOSE PAREN  (calc2000)
C OF R COMMA ONE HUNDRED MILLION  (calc2001)
SET C EQUAL TO LOG Y  (calc2002)
FOR_LOOP Z EQUALS H MINUS THOUSAND AND EIGHTEEN  (calc2003)
SET R EQUALS COSINE P  (calc2004)
O OF P COMMA THOUSAND ONE HUNDRED AND SIXTY THREE  (calc2005)
F OF T COMMA V COMMA F  (calc2006)
FOR_LOOP R EQUALS FIFTEEN HUNDRED AND FIFTY ONE  (calc2007)
O OF HUNDRED COMMA FORTY THREE THOUSAND  (calc2008)
EXPONENTIAL OF THOUSAND NINE HUNDRED EIGHTY ONE  (calc2009)
ENTER.  (calc2010)
OPEN PAREN O EIGHT NINE PLUS THOUSAND AND THIRTY SEVEN CLOSE PAREN  (calc2011)
E OF SIX HUNDRED AND SIXTEEN COMMA FIFTY EIGHT  (calc2012)
D OF N  (calc2013)
DEFINE FUNCTION Y ARGUMENT LIST U.  (calc2014)
SET U EQUALS J MINUS SEVENTEEN  (calc2015)
LIMIT J  (calc2016)
WHILE B LESS THAN OR EQUAL TO DECIMAL POINT SEVEN TWO EIGHT  (calc2017)
HUNDRED AND SIXTEEN POWER SEVENTY TWO POINT ONE FIVE  (calc2018)
IF NOT G  (calc2019)
FOR_LOOP C EQUALS FIFTY SIX  (calc2020)
IF POINT ZERO FIVE TWO O LESS THAN OR EQUAL TO A  (calc2021)
K OF C COMMA HUNDRED EIGHTY THREE THOUSAND NINETY COMMA K  (calc2022)
N OF G COMMA TWENTY ONE  (calc2023)
L OF S COMMA ONE HUNDRED AND ELEVEN  (calc2024)
OPEN TWENTY POWER OF NINETEEN CLOSE PAREN  (calc2025)
P OF U COMMA POINT SIX FOUR FIVE ONE COMMA S  (calc2026)
SET C EQUAL S DIVIDED BY FIFTEEN HUNDRED  (calc2027)
FOR_LOOP Y EQUALS K  (calc2028)
SET A EQUAL C DIVIDE HUNDRED AND FORTY  (calc2029)
ONE HUNDRED AND NINETY NINE POWER TWENTY EIGHT  (calc2030)
FOR_LOOP O EQUALS W  (calc2031)
DEFINE FUNCTION B ARGUMENT LIST K.  (calc2032)
EXPONENTIAL OF HUNDRED AND FIFTY SEVEN MILLION HUNDRED  (calc2033)
OPEN NINETY SUBTRACT THIRTY ONE CLOSE PAREN  (calc2034)
J OF W COMMA Y COMMA TWELVE HUNDRED  (calc2035)
X OF SIX SIX FOUR FIVE EIGHT  (calc2036)
P OF U COMMA C  (calc2037)
FOR_LOOP Y EQUALS T  (calc2038)
COSINE OF POINT ONE  (calc2039)
O OF O COMMA M  (calc2040)
O OF THIRTY FOUR  (calc2041)
SEVENTY SEVEN DIVIDE HUNDRED SIXTY TWO POINT EIGHT TWO FOUR NINE  (calc2042)
FOR_LOOP O EQUALS FOUR HUNDRED TWENTY TWO PLUS U  (calc2043)
L MINUS Z  (calc2044)
S OF FIFTEEN HUNDRED TWO  (calc2045)
FOR_LOOP O EQUALS F  (calc2046)
SET X EQUALS O OVER SEVEN HUNDRED EIGHTY FOUR  (calc2047)
IF U NOT EQUAL TO P  (calc2048)
FOR_LOOP U EQUALS TWELVE POINT SIX TWO  (calc2049)
FOR_LOOP D EQUALS X  (calc2050)
LOG OF G  (calc2051)
D OF FIFTY FIVE THOUSAND SIX HUNDRED AND SIXTY FOUR COMMA F  (calc2052)
OPEN PAREN FIFTY ONE DIVIDE HUNDRED CLOSE  (calc2053)
END.  (calc2054)
SET Z EQUAL SQUARE ROOT  X  (calc2055)
Z OF D COMMA J  (calc2056)
OPEN PARENTHESIS SEVENTY FIVE DIVIDED BY EIGHTY CLOSE PAREN  (calc2057)
FOR_LOOP O EQUALS F  (calc2058)
E OF U  (calc2059)
I POWER OF K  (calc2060)
Z OF EIGHT COMMA FOURTEEN HUNDRED O NINE  (calc2061)
FOR_LOOP H EQUALS SEVEN  (calc2062)
WHILE ZERO GREATER THAN OR EQUAL TO Z  (calc2063)
FOR_LOOP K EQUALS ONE HUNDRED AND FORTY NINE MINUS I  (calc2064)
FOR_LOOP W EQUALS ELEVEN  (calc2065)
P OF G  (calc2066)
N OF Z COMMA M  (calc2067)
COS OF SEVEN THOUSAND TWENTY EIGHT  (calc2068)
FOR_LOOP Y EQUALS SEVENTY FIVE MULTIPLY BY R  (calc2069)
HUNDRED AND FIFTY THREE POWER SIXTY TWO  (calc2070)
FOR_LOOP E EQUALS T  (calc2071)
LIMIT G GREATER THAN OR EQUAL TO X  (calc2072)
STANDBY.  (calc2073)
DEFINE FUNCTION F ARGUMENT LIST U COMMA O COMMA T.  (calc2074)
SET B EQUAL LOG F  (calc2075)
SET Q EQUALS W POWER OF FIVE HUNDRED EIGHTY ONE  (calc2076)
ZERO TO THE POWER OF POINT ONE OPEN PAREN TIMES EIGHTY TWO CLOSE PAREN  (calc2077)
DEFINE FUNCTION X ARGUMENT LIST L COMMA Q.  (calc2078)
NINETY SEVEN THOUSAND SIX HUNDRED FORTY FOUR PLUS POINT EIGHT  (calc2079)
ENTER.  (calc2080)
Z OF O COMMA EIGHTEEN HUNDRED O ONE  (calc2081)
FOR_LOOP Z EQUALS V  (calc2082)
HUNDRED SEVENTY MULTIPLY BY EIGHT  (calc2083)
IF L OR K NOT EQUAL TO N  (calc2084)
FOR_LOOP Q EQUALS R  (calc2085)
Y OF P COMMA Z  (calc2086)
SQUARE ROOT  OF B  (calc2087)
Q OF G COMMA POINT FIVE  (calc2088)
O OF G COMMA Y  (calc2089)
STANDBY.  (calc2090)
O OF Y COMMA FOUR THOUSAND COMMA FORTY SEVEN  (calc2091)
W OF HUNDRED FORTY SEVEN COMMA S  (calc2092)
FIFTY ONE POWER OF NINE HUNDRED  (calc2093)
C OF A  (calc2094)
Z OF E COMMA SEVENTY EIGHT COMMA L  (calc2095)
OPEN SIX HUNDRED TIMES SIX HUNDRED AND TWENTY SEVEN CLOSE PAREN  (calc2096)
END.  (calc2097)
T OF FORTY SIX COMMA I  (calc2098)
SET T EQUALS A TO THE POWER OF ONE MILLION FIFTY NINE  (calc2099)
M OF THREE  (calc2100)