(sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2)))))

(*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2)))

(/.f64 2 (/.f64 Om l))

(pow.f64 (/.f64 2 (/.f64 Om l)) 2)

(((-.f64 (exp.f64 (log1p.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 1 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (sqrt.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) (sqrt.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (cbrt.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) (cbrt.f64 (+.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (cbrt.f64 (+.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2))) (cbrt.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (sqrt.f64 (pow.f64 (cbrt.f64 (+.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2))) 2)) (sqrt.f64 (cbrt.f64 (+.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (pow.f64 1 1/2) (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (pow.f64 (pow.f64 (cbrt.f64 (+.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2))) 2) 1/2) (pow.f64 (cbrt.f64 (+.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2))) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (sqrt.f64 (+.f64 1 (pow.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2) 3))) (sqrt.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2) 2) (-.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (sqrt.f64 (-.f64 1 (pow.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2) 2))) (sqrt.f64 (-.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (+.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2)) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (sqrt.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (cbrt.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (pow.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((fabs.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((log.f64 (exp.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((cbrt.f64 (pow.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((expm1.f64 (log1p.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((exp.f64 (log.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((exp.f64 (*.f64 (log1p.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2)) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((exp.f64 (*.f64 (log.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((log1p.f64 (expm1.f64 (hypot.f64 1 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)))

(((+.f64 1 (-.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((+.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2) 0) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((+.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 kx)) 2) (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((+.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 kx)) 2) (-.f64 (+.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((+.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2) (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 kx)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((+.f64 (+.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 kx)) 2)) (-.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((+.f64 (*.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 kx)) 2) 1) (*.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((+.f64 (*.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2) 1) (*.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 kx)) 2) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((-.f64 (+.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((-.f64 (exp.f64 (log.f64 (+.f64 2 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((-.f64 (/.f64 1 (-.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2))) (+.f64 (/.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2) 2) (-.f64 1 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (*.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) (-.f64 (pow.f64 (sin.f64 kx) 4) (pow.f64 (sin.f64 ky) 4))) (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (*.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) (+.f64 (pow.f64 (sin.f64 kx) 6) (pow.f64 (sin.f64 ky) 6))) (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 kx) 4) (pow.f64 (sin.f64 ky) 4)) (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) 6) (pow.f64 (sin.f64 ky) 6)) (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 kx)) 2) (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 kx)) 2)) (*.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2) (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2))) (-.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 kx)) 2) (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (+.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 kx)) 2) 3) (pow.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2) 3)) (+.f64 (*.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 kx)) 2) (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 kx)) 2)) (-.f64 (*.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2) (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2)) (*.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 kx)) 2) (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) (-.f64 (pow.f64 (sin.f64 kx) 4) (pow.f64 (sin.f64 ky) 4))) 1) (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) (-.f64 (pow.f64 (sin.f64 kx) 4) (pow.f64 (sin.f64 ky) 4))) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2)))) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) (-.f64 (pow.f64 (sin.f64 kx) 4) (pow.f64 (sin.f64 ky) 4))) (*.f64 (cbrt.f64 (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (cbrt.f64 (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (cbrt.f64 (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) (-.f64 (pow.f64 (sin.f64 kx) 4) (pow.f64 (sin.f64 ky) 4))) (+.f64 (sin.f64 kx) (sin.f64 ky))) (-.f64 (sin.f64 kx) (sin.f64 ky))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) (+.f64 (pow.f64 (sin.f64 kx) 6) (pow.f64 (sin.f64 ky) 6))) 1) (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) (+.f64 (pow.f64 (sin.f64 kx) 6) (pow.f64 (sin.f64 ky) 6))) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4))))) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) (+.f64 (pow.f64 (sin.f64 kx) 6) (pow.f64 (sin.f64 ky) 6))) (*.f64 (cbrt.f64 (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4)))) (cbrt.f64 (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4)))))) (cbrt.f64 (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 kx) 4) (pow.f64 (sin.f64 ky) 4)) (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) 1) (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 kx) 4) (pow.f64 (sin.f64 ky) 4)) (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2)))) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 kx) 4) (pow.f64 (sin.f64 ky) 4)) (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) (*.f64 (cbrt.f64 (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (cbrt.f64 (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (cbrt.f64 (-.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 kx) 4) (pow.f64 (sin.f64 ky) 4)) (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) (+.f64 (sin.f64 kx) (sin.f64 ky))) (-.f64 (sin.f64 kx) (sin.f64 ky))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) 6) (pow.f64 (sin.f64 ky) 6)) (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) 1) (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) 6) (pow.f64 (sin.f64 ky) 6)) (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4))))) (sqrt.f64 (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 kx) 6) (pow.f64 (sin.f64 ky) 6)) (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) (*.f64 (cbrt.f64 (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4)))) (cbrt.f64 (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4)))))) (cbrt.f64 (-.f64 (pow.f64 (sin.f64 ky) 4) (-.f64 (pow.f64 (*.f64 (sin.f64 kx) (sin.f64 ky)) 2) (pow.f64 (sin.f64 kx) 4))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (cbrt.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2)) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((sqrt.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((log.f64 (exp.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((cbrt.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((expm1.f64 (log1p.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((exp.f64 (log.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2)) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((log1p.f64 (expm1.f64 (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (hypot.f64 (sin.f64 kx) (sin.f64 ky))) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((fma.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) (pow.f64 (sin.f64 kx) 2) (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((fma.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (*.f64 l (/.f64 2 Om)) 2) (pow.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sin.f64 ky)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)))

(((-.f64 (exp.f64 (log1p.f64 (*.f64 l (/.f64 2 Om)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 1 (*.f64 l (/.f64 2 Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 2 (/.f64 l Om)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 l (/.f64 2 Om)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (*.f64 l (/.f64 2 Om)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (sqrt.f64 (*.f64 l (/.f64 2 Om))) (sqrt.f64 (*.f64 l (/.f64 2 Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (cbrt.f64 (*.f64 l (/.f64 2 Om))) (cbrt.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (cbrt.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) (cbrt.f64 (*.f64 l (/.f64 2 Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (/.f64 2 Om) l) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (/.f64 l Om) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 -2 (/.f64 -1 (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 4))) (sqrt.f64 (cbrt.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (*.f64 (/.f64 2 Om) 1) l) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (*.f64 (/.f64 2 Om) (sqrt.f64 l)) (sqrt.f64 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (*.f64 (/.f64 2 Om) (cbrt.f64 (*.f64 l l))) (cbrt.f64 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (/.f64 -2 Om) (neg.f64 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (*.f64 l (/.f64 2 Om)) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (sqrt.f64 (*.f64 l (/.f64 2 Om))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (cbrt.f64 (*.f64 l (/.f64 2 Om))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((pow.f64 (/.f64 Om (*.f64 2 l)) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((sqrt.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((fabs.f64 (*.f64 l (/.f64 2 Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((log.f64 (pow.f64 (exp.f64 (/.f64 2 Om)) l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (*.f64 l (/.f64 2 Om))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((cbrt.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((expm1.f64 (log1p.f64 (*.f64 l (/.f64 2 Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((exp.f64 (log.f64 (*.f64 l (/.f64 2 Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((exp.f64 (*.f64 (log.f64 (*.f64 l (/.f64 2 Om))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((log1p.f64 (expm1.f64 (*.f64 l (/.f64 2 Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)))

(((-.f64 (exp.f64 (log1p.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 1 (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 2 (*.f64 (/.f64 l Om) (*.f64 l (/.f64 2 Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (*.f64 l (/.f64 2 Om)) (*.f64 l (/.f64 2 Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (sqrt.f64 (*.f64 l (/.f64 2 Om))) (*.f64 (sqrt.f64 (*.f64 l (/.f64 2 Om))) (*.f64 l (/.f64 2 Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (cbrt.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) (cbrt.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (cbrt.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2)) (*.f64 (cbrt.f64 (*.f64 l (/.f64 2 Om))) (*.f64 l (/.f64 2 Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (cbrt.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 4)) (cbrt.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 4 (*.f64 (/.f64 l Om) (/.f64 l Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 4 (pow.f64 (/.f64 l Om) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (/.f64 2 Om) (*.f64 l (*.f64 l (/.f64 2 Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (*.f64 (/.f64 2 Om) (/.f64 2 Om)) (*.f64 l l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (sqrt.f64 (*.f64 l (/.f64 2 Om)))) (sqrt.f64 (*.f64 l (/.f64 2 Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (/.f64 l Om)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (cbrt.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2))) (cbrt.f64 (*.f64 l (/.f64 2 Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (*.f64 (*.f64 l (/.f64 2 Om)) (/.f64 2 Om)) l) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((*.f64 (pow.f64 (/.f64 2 Om) 2) (*.f64 l l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 1 (*.f64 (/.f64 Om (*.f64 2 l)) (/.f64 Om (*.f64 2 l)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 2 (*.f64 (/.f64 Om (*.f64 2 l)) (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 2 (*.f64 (/.f64 Om l) (/.f64 Om (*.f64 2 l)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (*.f64 l (/.f64 2 Om)) (/.f64 Om (*.f64 2 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 4 (pow.f64 (/.f64 Om l) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 4 (*.f64 (/.f64 (neg.f64 Om) l) (/.f64 (neg.f64 Om) l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 -2 (*.f64 (/.f64 Om (*.f64 2 l)) (/.f64 (neg.f64 Om) l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 -2 (*.f64 (/.f64 (neg.f64 Om) l) (/.f64 Om (*.f64 2 l)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (/.f64 Om l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) -2) (/.f64 (neg.f64 Om) l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (/.f64 Om l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (*.f64 -2 (*.f64 l (/.f64 2 Om))) (/.f64 (neg.f64 Om) l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 -4 (*.f64 (/.f64 Om l) (/.f64 (neg.f64 Om) l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 -4 (*.f64 (/.f64 (neg.f64 Om) l) (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 2 (/.f64 Om (*.f64 2 l))) (/.f64 Om l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 l (/.f64 2 Om)) (/.f64 Om l)) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 l (/.f64 2 Om)) (sqrt.f64 (/.f64 Om (*.f64 2 l)))) (sqrt.f64 (/.f64 Om (*.f64 2 l)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 l (/.f64 2 Om)) (*.f64 (cbrt.f64 (/.f64 Om (*.f64 2 l))) (cbrt.f64 (/.f64 Om (*.f64 2 l))))) (cbrt.f64 (/.f64 Om (*.f64 2 l)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 4 Om) (*.f64 (/.f64 1 l) (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 4 (/.f64 Om l)) (/.f64 Om l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 4 (sqrt.f64 (/.f64 Om l))) (*.f64 (sqrt.f64 (/.f64 Om l)) (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 4 (pow.f64 (cbrt.f64 (/.f64 Om l)) 2)) (*.f64 (cbrt.f64 (/.f64 Om l)) (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 4 (*.f64 Om Om)) (*.f64 (/.f64 1 l) (/.f64 1 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 4 (*.f64 (/.f64 Om l) (sqrt.f64 (/.f64 Om l)))) (sqrt.f64 (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 4 (*.f64 (pow.f64 (cbrt.f64 (/.f64 Om l)) 2) (pow.f64 (cbrt.f64 (/.f64 Om l)) 2))) (pow.f64 (cbrt.f64 (/.f64 Om l)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 4 (*.f64 (/.f64 Om l) Om)) (/.f64 1 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 4 (*.f64 (/.f64 Om l) (pow.f64 (cbrt.f64 (/.f64 Om l)) 2))) (cbrt.f64 (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 4 (/.f64 (neg.f64 Om) l)) (/.f64 (neg.f64 Om) l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 -2 (/.f64 Om (*.f64 2 l))) (/.f64 (neg.f64 Om) l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) 1) (/.f64 Om l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) Om) (/.f64 1 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (sqrt.f64 Om)) (*.f64 (sqrt.f64 Om) (/.f64 1 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (sqrt.f64 (/.f64 Om l))) (sqrt.f64 (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (pow.f64 (cbrt.f64 Om) 2)) (*.f64 (cbrt.f64 Om) (/.f64 1 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (cbrt.f64 (/.f64 Om l))) (pow.f64 (cbrt.f64 (/.f64 Om l)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (pow.f64 (cbrt.f64 (/.f64 Om l)) 2)) (cbrt.f64 (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (/.f64 1 l)) Om) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (neg.f64 Om)) (/.f64 -1 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (/.f64 1 (sqrt.f64 l))) (/.f64 Om (sqrt.f64 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (/.f64 1 (cbrt.f64 (*.f64 l l)))) (/.f64 Om (cbrt.f64 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (/.f64 (sqrt.f64 Om) 1)) (/.f64 (sqrt.f64 Om) l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (/.f64 (sqrt.f64 Om) (cbrt.f64 (*.f64 l l)))) (/.f64 (sqrt.f64 Om) (cbrt.f64 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (/.f64 (pow.f64 (cbrt.f64 Om) 2) 1)) (/.f64 (cbrt.f64 Om) l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (/.f64 (pow.f64 (cbrt.f64 Om) 2) (sqrt.f64 l))) (/.f64 (cbrt.f64 Om) (sqrt.f64 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) 2) (/.f64 (pow.f64 (cbrt.f64 Om) 2) (cbrt.f64 (*.f64 l l)))) (cbrt.f64 (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) -2) 1) (/.f64 (neg.f64 Om) l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) -2) Om) (neg.f64 (/.f64 1 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) -2) (sqrt.f64 (/.f64 Om l))) (neg.f64 (sqrt.f64 (/.f64 Om l)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) -2) (pow.f64 (cbrt.f64 (/.f64 Om l)) 2)) (neg.f64 (cbrt.f64 (/.f64 Om l)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) -2) (neg.f64 Om)) (/.f64 1 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) -2) (sqrt.f64 (/.f64 (neg.f64 Om) l))) (sqrt.f64 (/.f64 (neg.f64 Om) l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) -2) (*.f64 (cbrt.f64 (/.f64 (neg.f64 Om) l)) (cbrt.f64 (/.f64 (neg.f64 Om) l)))) (cbrt.f64 (/.f64 (neg.f64 Om) l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) -2) -1) (/.f64 Om l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) -2) (neg.f64 (sqrt.f64 (/.f64 Om l)))) (sqrt.f64 (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 (*.f64 l (/.f64 2 Om)) -2) (neg.f64 (pow.f64 (cbrt.f64 (/.f64 Om l)) 2))) (cbrt.f64 (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) 1) (/.f64 Om l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) Om) (/.f64 1 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (sqrt.f64 Om)) (*.f64 (sqrt.f64 Om) (/.f64 1 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (sqrt.f64 (/.f64 Om l))) (sqrt.f64 (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (pow.f64 (cbrt.f64 Om) 2)) (*.f64 (cbrt.f64 Om) (/.f64 1 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (cbrt.f64 (/.f64 Om l))) (pow.f64 (cbrt.f64 (/.f64 Om l)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (pow.f64 (cbrt.f64 (/.f64 Om l)) 2)) (cbrt.f64 (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (/.f64 1 l)) Om) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (neg.f64 Om)) (/.f64 -1 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (/.f64 1 (sqrt.f64 l))) (/.f64 Om (sqrt.f64 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (/.f64 1 (cbrt.f64 (*.f64 l l)))) (/.f64 Om (cbrt.f64 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (/.f64 (sqrt.f64 Om) 1)) (/.f64 (sqrt.f64 Om) l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (/.f64 (sqrt.f64 Om) (cbrt.f64 (*.f64 l l)))) (/.f64 (sqrt.f64 Om) (cbrt.f64 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (/.f64 (pow.f64 (cbrt.f64 Om) 2) 1)) (/.f64 (cbrt.f64 Om) l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (/.f64 (pow.f64 (cbrt.f64 Om) 2) (sqrt.f64 l))) (/.f64 (cbrt.f64 Om) (sqrt.f64 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 2 (*.f64 l (/.f64 2 Om))) (/.f64 (pow.f64 (cbrt.f64 Om) 2) (cbrt.f64 (*.f64 l l)))) (cbrt.f64 (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 -2 (*.f64 l (/.f64 2 Om))) 1) (/.f64 (neg.f64 Om) l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 -2 (*.f64 l (/.f64 2 Om))) Om) (neg.f64 (/.f64 1 l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 -2 (*.f64 l (/.f64 2 Om))) (sqrt.f64 (/.f64 Om l))) (neg.f64 (sqrt.f64 (/.f64 Om l)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 -2 (*.f64 l (/.f64 2 Om))) (pow.f64 (cbrt.f64 (/.f64 Om l)) 2)) (neg.f64 (cbrt.f64 (/.f64 Om l)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 -2 (*.f64 l (/.f64 2 Om))) (neg.f64 Om)) (/.f64 1 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 -2 (*.f64 l (/.f64 2 Om))) (sqrt.f64 (/.f64 (neg.f64 Om) l))) (sqrt.f64 (/.f64 (neg.f64 Om) l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 -2 (*.f64 l (/.f64 2 Om))) (*.f64 (cbrt.f64 (/.f64 (neg.f64 Om) l)) (cbrt.f64 (/.f64 (neg.f64 Om) l)))) (cbrt.f64 (/.f64 (neg.f64 Om) l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 -2 (*.f64 l (/.f64 2 Om))) -1) (/.f64 Om l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 -2 (*.f64 l (/.f64 2 Om))) (neg.f64 (sqrt.f64 (/.f64 Om l)))) (sqrt.f64 (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 (*.f64 -2 (*.f64 l (/.f64 2 Om))) (neg.f64 (pow.f64 (cbrt.f64 (/.f64 Om l)) 2))) (cbrt.f64 (/.f64 Om l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 -4 (/.f64 Om l)) (/.f64 (neg.f64 Om) l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((/.f64 (/.f64 -4 (/.f64 (neg.f64 Om) l)) (/.f64 Om l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((sqrt.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((log.f64 (exp.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((cbrt.f64 (pow.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((expm1.f64 (log1p.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((exp.f64 (*.f64 2 (log.f64 (*.f64 l (/.f64 2 Om))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((exp.f64 (*.f64 (*.f64 2 (log.f64 (*.f64 l (/.f64 2 Om)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)) ((log1p.f64 (expm1.f64 (pow.f64 (*.f64 l (/.f64 2 Om)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((sqrt.f64 (+.f64 1 (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))))) (*.f64 (pow.f64 (/.f64 2 (/.f64 Om l)) 2) (+.f64 (pow.f64 (sin.f64 kx) 2) (pow.f64 (sin.f64 ky) 2))) (/.f64 2 (/.f64 Om l)) (pow.f64 (/.f64 2 (/.f64 Om l)) 2)) #f)))

(/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))

(/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))

(sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))))))

(pow.f64 (sin.f64 ky) 2)

(((-.f64 (exp.f64 (log1p.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 l (*.f64 l (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 Om Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 l (*.f64 1 (/.f64 l (pow.f64 (/.f64 Om (sin.f64 ky)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 Om Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 (/.f64 l Om) (/.f64 l Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 1 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) (*.f64 (/.f64 l Om) (sin.f64 ky))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (cbrt.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2)) (pow.f64 (cbrt.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2)) 2) (cbrt.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (cbrt.f64 (pow.f64 l 4)) (*.f64 (cbrt.f64 (*.f64 l l)) (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 Om Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) (pow.f64 (sin.f64 ky) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 Om Om)) (*.f64 l l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (neg.f64 (*.f64 l l)) (/.f64 1 (neg.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (*.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) (sin.f64 ky)) (sin.f64 ky)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (*.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) 1) (pow.f64 (sin.f64 ky) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (*.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) (cbrt.f64 (pow.f64 (sin.f64 ky) 4))) (pow.f64 (cbrt.f64 (sin.f64 ky)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 1 (*.f64 Om Om)) (*.f64 (*.f64 l l) (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 1 (*.f64 Om Om)) (/.f64 (*.f64 l l) (pow.f64 (sin.f64 ky) -2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (*.f64 (/.f64 1 Om) (sin.f64 ky)) (*.f64 (/.f64 (*.f64 l l) Om) (sin.f64 ky))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 1 (pow.f64 (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) 2)) (/.f64 (*.f64 l l) (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 l l) Om) (/.f64 (pow.f64 (sin.f64 ky) 2) Om)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 l l) 1) (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 Om Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 l l) (cbrt.f64 (pow.f64 Om 4))) (/.f64 (pow.f64 (sin.f64 ky) 2) (pow.f64 (cbrt.f64 Om) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 l (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) l) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 1 Om) (*.f64 (*.f64 l l) (/.f64 (pow.f64 (sin.f64 ky) 2) Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 1 (*.f64 Om (neg.f64 Om))) (*.f64 (*.f64 l l) (neg.f64 (pow.f64 (sin.f64 ky) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 l l) (*.f64 Om (neg.f64 Om))) (neg.f64 (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (*.f64 1 (/.f64 l (pow.f64 (/.f64 Om (sin.f64 ky)) 2))) l) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 1 (neg.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2))) (neg.f64 (*.f64 l l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 l Om) (*.f64 l (/.f64 (pow.f64 (sin.f64 ky) 2) Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 l 1) (*.f64 l (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 Om Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 l 1) (/.f64 l (pow.f64 (/.f64 Om (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 l (*.f64 Om Om)) (/.f64 l (pow.f64 (sin.f64 ky) -2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 l (*.f64 Om Om)) (*.f64 l (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 l l) (pow.f64 (cbrt.f64 Om) 2)) (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 (cbrt.f64 Om) Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (cbrt.f64 (pow.f64 l 4)) 1) (/.f64 (cbrt.f64 (*.f64 l l)) (pow.f64 (/.f64 Om (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 l (pow.f64 (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) 2)) (/.f64 l (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (cbrt.f64 (pow.f64 l 4)) (*.f64 Om Om)) (/.f64 (cbrt.f64 (*.f64 l l)) (pow.f64 (sin.f64 ky) -2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (cbrt.f64 (pow.f64 l 4)) (/.f64 Om (sin.f64 ky))) (/.f64 (cbrt.f64 (*.f64 l l)) (/.f64 Om (sin.f64 ky)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (cbrt.f64 (pow.f64 l 4)) (pow.f64 (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) 2)) (cbrt.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 l (*.f64 Om (neg.f64 Om))) (*.f64 l (neg.f64 (pow.f64 (sin.f64 ky) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 l l) -1) (neg.f64 (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 Om Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 l l) (neg.f64 Om)) (neg.f64 (/.f64 (pow.f64 (sin.f64 ky) 2) Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 l l) (neg.f64 (*.f64 Om (neg.f64 Om)))) (neg.f64 (neg.f64 (pow.f64 (sin.f64 ky) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 l l) (sqrt.f64 Om)) (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 (sqrt.f64 Om) Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 l (neg.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2))) (neg.f64 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 l (/.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2) (sqrt.f64 l))) (sqrt.f64 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 l (/.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2) (cbrt.f64 (*.f64 l l)))) (cbrt.f64 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (sin.f64 ky))) (sin.f64 ky)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) 1)) (pow.f64 (sin.f64 ky) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (cbrt.f64 (pow.f64 (sin.f64 ky) 4)))) (pow.f64 (cbrt.f64 (sin.f64 ky)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 1 (/.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2) (cbrt.f64 (pow.f64 l 4)))) (cbrt.f64 (*.f64 l l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (sqrt.f64 l) (/.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2) l)) (sqrt.f64 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (cbrt.f64 (*.f64 l l)) (/.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2) l)) (cbrt.f64 l)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (cbrt.f64 (pow.f64 l 4)) (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) (cbrt.f64 (*.f64 l l))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) 1) (pow.f64 (sin.f64 ky) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) (/.f64 1 (sin.f64 ky))) (sin.f64 ky)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) (/.f64 1 (cbrt.f64 (pow.f64 (sin.f64 ky) 4)))) (pow.f64 (cbrt.f64 (sin.f64 ky)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 (/.f64 l Om) (/.f64 l Om)) -1) (neg.f64 (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (neg.f64 (*.f64 l l)) -1) (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 Om Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (neg.f64 (*.f64 l l)) (neg.f64 Om)) (/.f64 (pow.f64 (sin.f64 ky) 2) Om)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (neg.f64 (*.f64 l l)) (neg.f64 (*.f64 Om (neg.f64 Om)))) (neg.f64 (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) 1) Om) (/.f64 (pow.f64 (sin.f64 ky) 2) Om)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) 1) 1) (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 Om Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) 1) (sqrt.f64 Om)) (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 (sqrt.f64 Om) Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) 1) (pow.f64 (cbrt.f64 Om) 2)) (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 (cbrt.f64 Om) Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) 1) (cbrt.f64 (pow.f64 Om 4))) (/.f64 (pow.f64 (sin.f64 ky) 2) (pow.f64 (cbrt.f64 Om) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) 1) (*.f64 Om (neg.f64 Om))) (neg.f64 (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) 1) (/.f64 (*.f64 Om Om) (sin.f64 ky))) (sin.f64 ky)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) 1) (/.f64 (*.f64 Om Om) 1)) (pow.f64 (sin.f64 ky) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) 1) (/.f64 (*.f64 Om Om) (cbrt.f64 (pow.f64 (sin.f64 ky) 4)))) (pow.f64 (cbrt.f64 (sin.f64 ky)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) 1) -1) (neg.f64 (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 Om Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) 1) (neg.f64 Om)) (neg.f64 (/.f64 (pow.f64 (sin.f64 ky) 2) Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) 1) (neg.f64 (*.f64 Om (neg.f64 Om)))) (neg.f64 (neg.f64 (pow.f64 (sin.f64 ky) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 (/.f64 (*.f64 l l) Om) (sin.f64 ky)) Om) (sin.f64 ky)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 (/.f64 (*.f64 l l) Om) (sin.f64 ky)) 1) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 Om Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 (/.f64 (*.f64 l l) Om) (sin.f64 ky)) (sqrt.f64 Om)) (sqrt.f64 (/.f64 (pow.f64 (sin.f64 ky) 2) Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 (/.f64 (*.f64 l l) Om) (sin.f64 ky)) (sqrt.f64 (*.f64 Om (neg.f64 Om)))) (sqrt.f64 (neg.f64 (pow.f64 (sin.f64 ky) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) (pow.f64 (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) 2)) 1) (cbrt.f64 (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 Om Om)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) (pow.f64 (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) 2)) (pow.f64 (cbrt.f64 Om) 2)) (pow.f64 (cbrt.f64 (sin.f64 ky)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) (pow.f64 (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) 2)) (cbrt.f64 Om)) (cbrt.f64 (/.f64 (pow.f64 (sin.f64 ky) 2) Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 l l) (pow.f64 (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) 2)) (cbrt.f64 (*.f64 Om (neg.f64 Om)))) (cbrt.f64 (neg.f64 (pow.f64 (sin.f64 ky) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (cbrt.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2)) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (pow.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (/.f64 1 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2)) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((neg.f64 (/.f64 (*.f64 l l) (neg.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((sqrt.f64 (pow.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((log.f64 (exp.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((cbrt.f64 (pow.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((cbrt.f64 (/.f64 (pow.f64 (*.f64 l l) 3) (pow.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((expm1.f64 (log1p.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((exp.f64 (*.f64 2 (log.f64 (*.f64 (/.f64 l Om) (sin.f64 ky))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((exp.f64 (*.f64 (*.f64 2 (log.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((log1p.f64 (expm1.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)))

(((-.f64 (exp.f64 (log1p.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 Om (*.f64 Om (pow.f64 (sin.f64 ky) -2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 Om (*.f64 (pow.f64 (sin.f64 ky) -2) Om)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) -2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 1 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 Om (sin.f64 ky)) (/.f64 Om (sin.f64 ky))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) (pow.f64 (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) 2) (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (cbrt.f64 (pow.f64 Om 4)) (*.f64 (pow.f64 (cbrt.f64 Om) 2) (pow.f64 (sin.f64 ky) -2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (pow.f64 (sin.f64 ky) -2) (*.f64 Om Om)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (*.f64 Om (neg.f64 Om)) (/.f64 1 (neg.f64 (pow.f64 (sin.f64 ky) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 1 (sin.f64 ky)) (/.f64 (*.f64 Om Om) (sin.f64 ky))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 1 (cbrt.f64 (pow.f64 (sin.f64 ky) 4))) (/.f64 (*.f64 Om Om) (pow.f64 (cbrt.f64 (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 Om (pow.f64 (sin.f64 ky) 2)) Om) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 -1 (neg.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (*.f64 (pow.f64 (sin.f64 ky) -2) Om) Om) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 1 (neg.f64 (pow.f64 (sin.f64 ky) 2))) (*.f64 Om (neg.f64 Om))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 Om 1) (/.f64 Om (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 Om (cbrt.f64 (pow.f64 (sin.f64 ky) 4))) (/.f64 Om (pow.f64 (cbrt.f64 (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (cbrt.f64 (pow.f64 Om 4)) (sin.f64 ky)) (/.f64 (pow.f64 (cbrt.f64 Om) 2) (sin.f64 ky))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (cbrt.f64 (pow.f64 Om 4)) 1) (/.f64 (pow.f64 (cbrt.f64 Om) 2) (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (cbrt.f64 (pow.f64 Om 4)) (cbrt.f64 (pow.f64 (sin.f64 ky) 4))) (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 Om (neg.f64 (pow.f64 (sin.f64 ky) 2))) (neg.f64 Om)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 Om (/.f64 (pow.f64 (sin.f64 ky) 2) (sqrt.f64 Om))) (sqrt.f64 Om)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 Om (/.f64 (pow.f64 (sin.f64 ky) 2) (pow.f64 (cbrt.f64 Om) 2))) (cbrt.f64 Om)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (*.f64 Om Om) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 1 (/.f64 (pow.f64 (sin.f64 ky) 2) (cbrt.f64 (pow.f64 Om 4)))) (pow.f64 (cbrt.f64 Om) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 1 (/.f64 1 (*.f64 Om Om))) (pow.f64 (sin.f64 ky) -2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 1 (/.f64 1 (pow.f64 (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) 2))) (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (sqrt.f64 Om) (/.f64 (pow.f64 (sin.f64 ky) 2) Om)) (sqrt.f64 Om)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (pow.f64 (cbrt.f64 Om) 2) (/.f64 (pow.f64 (sin.f64 ky) 2) Om)) (cbrt.f64 Om)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (cbrt.f64 (pow.f64 Om 4)) (pow.f64 (sin.f64 ky) 2)) (pow.f64 (cbrt.f64 Om) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (/.f64 (/.f64 (*.f64 Om Om) 1) (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky)))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (/.f64 Om (sin.f64 ky)) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (cbrt.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (pow.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (/.f64 (pow.f64 (sin.f64 ky) 2) (*.f64 Om Om)) -1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((neg.f64 (/.f64 (*.f64 Om Om) (neg.f64 (pow.f64 (sin.f64 ky) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((sqrt.f64 (/.f64 (pow.f64 Om 4) (pow.f64 (sin.f64 ky) 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((log.f64 (exp.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((cbrt.f64 (pow.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((cbrt.f64 (/.f64 (pow.f64 (*.f64 Om Om) 3) (pow.f64 (pow.f64 (sin.f64 ky) 2) 3))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((expm1.f64 (log1p.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((exp.f64 (*.f64 2 (log.f64 (/.f64 Om (sin.f64 ky))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((exp.f64 (*.f64 (*.f64 2 (log.f64 (/.f64 Om (sin.f64 ky)))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((log1p.f64 (expm1.f64 (pow.f64 (/.f64 Om (sin.f64 ky)) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)))

(((-.f64 (exp.f64 (log1p.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky)))))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 1 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (sqrt.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky))))) (sqrt.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (cbrt.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky))))) (cbrt.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 4 1))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (cbrt.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 4 1)) (cbrt.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (sqrt.f64 (cbrt.f64 (pow.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 4 1) 2))) (sqrt.f64 (cbrt.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 4 1)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (pow.f64 1 1/2) (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (pow.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 4 1) 2)) 1/2) (pow.f64 (cbrt.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 4 1)) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((/.f64 (sqrt.f64 (-.f64 1 (*.f64 16 (pow.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 2)))) (sqrt.f64 (+.f64 1 (*.f64 -4 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((/.f64 (sqrt.f64 (+.f64 1 (*.f64 64 (pow.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 3)))) (sqrt.f64 (+.f64 (*.f64 16 (pow.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 2)) (+.f64 1 (*.f64 -4 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (fma.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 4 1) 1/2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky)))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (sqrt.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky))))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (cbrt.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky))))) 3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((pow.f64 (pow.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky)))) 3) 1/3) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((fabs.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((log.f64 (exp.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky))))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((cbrt.f64 (pow.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky)))) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((expm1.f64 (log1p.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((exp.f64 (log.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((exp.f64 (*.f64 (log1p.f64 (*.f64 (pow.f64 (*.f64 (/.f64 l Om) (sin.f64 ky)) 2) 4)) 1/2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((exp.f64 (*.f64 (log.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky))))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((log1p.f64 (expm1.f64 (hypot.f64 1 (*.f64 2 (*.f64 (/.f64 l Om) (sin.f64 ky)))))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)))

(((-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 ky ky)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((-.f64 (exp.f64 (log1p.f64 (pow.f64 (sin.f64 ky) 2))) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (sin.f64 ky) (sin.f64 ky)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (pow.f64 (sin.f64 ky) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 1 (pow.f64 (sin.f64 ky) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (sqrt.f64 (sin.f64 ky)) (*.f64 (sqrt.f64 (sin.f64 ky)) (sin.f64 ky))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (sin.f64 ky)) 2) (cbrt.f64 (pow.f64 (sin.f64 ky) 4))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (pow.f64 (cbrt.f64 (sin.f64 ky)) 2) (*.f64 (cbrt.f64 (sin.f64 ky)) (sin.f64 ky))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (cbrt.f64 (pow.f64 (sin.f64 ky) 4)) (pow.f64 (cbrt.f64 (sin.f64 ky)) 2)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (*.f64 (sin.f64 ky) (sqrt.f64 (sin.f64 ky))) (sqrt.f64 (sin.f64 ky))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((*.f64 (*.f64 (sin.f64 ky) (pow.f64 (cbrt.f64 (sin.f64 ky)) 2)) (cbrt.f64 (sin.f64 ky))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((/.f64 (pow.f64 (sin.f64 ky) 2) 1) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((/.f64 (-.f64 (cos.f64 (-.f64 ky ky)) (cos.f64 (+.f64 ky ky))) 2) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((sqrt.f64 (pow.f64 (sin.f64 ky) 4)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((log.f64 (exp.f64 (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((log.f64 (+.f64 1 (expm1.f64 (pow.f64 (sin.f64 ky) 2)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((cbrt.f64 (pow.f64 (pow.f64 (sin.f64 ky) 2) 3)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((expm1.f64 (log1p.f64 (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((exp.f64 (*.f64 2 (log.f64 (sin.f64 ky)))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((exp.f64 (*.f64 (*.f64 2 (log.f64 (sin.f64 ky))) 1)) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)) ((log1p.f64 (expm1.f64 (pow.f64 (sin.f64 ky) 2))) #(struct:rr-input (#<rule *-un-lft-identity> #<rule add-sqr-sqrt> #<rule add-cube-cbrt> #<rule add-cbrt-cube> #<rule add-exp-log> #<rule add-log-exp> #<rule pow1> #<rule log1p-expm1-u> #<rule expm1-log1p-u> #<rule +-commutative> #<rule *-commutative> #<rule associate-+r+> #<rule associate-+l+> #<rule associate-+r-> #<rule associate-+l-> #<rule associate--r+> #<rule associate--l+> #<rule associate--l-> #<rule associate--r-> #<rule associate-*r*> #<rule associate-*l*> #<rule associate-*r/> #<rule associate-*l/> #<rule associate-/r*> #<rule associate-/l*> #<rule associate-/r/> #<rule associate-/l/> #<rule count-2> #<rule distribute-lft-in> #<rule distribute-rgt-in> #<rule distribute-lft-out> #<rule distribute-lft-out--> #<rule distribute-rgt-out> #<rule distribute-rgt-out--> #<rule distribute-lft1-in> #<rule distribute-rgt1-in> #<rule distribute-lft-neg-in> #<rule distribute-rgt-neg-in> #<rule distribute-lft-neg-out> #<rule distribute-rgt-neg-out> #<rule distribute-neg-in> #<rule distribute-neg-out> #<rule distribute-frac-neg> #<rule distribute-neg-frac> #<rule cancel-sign-sub> #<rule cancel-sign-sub-inv> #<rule swap-sqr> #<rule unswap-sqr> #<rule difference-of-squares> #<rule difference-of-sqr-1> #<rule difference-of-sqr--1> #<rule sqr-pow> #<rule pow-sqr> #<rule flip-+> #<rule flip--> #<rule remove-double-div> #<rule rgt-mult-inverse> #<rule lft-mult-inverse> #<rule +-inverses> #<rule *-inverses> #<rule div0> #<rule mul0-lft> #<rule mul0-rgt> #<rule +-lft-identity> #<rule +-rgt-identity> #<rule --rgt-identity> #<rule sub0-neg> #<rule remove-double-neg> #<rule *-lft-identity> #<rule *-rgt-identity> #<rule /-rgt-identity> #<rule mul-1-neg> #<rule sub-neg> #<rule unsub-neg> #<rule neg-sub0> #<rule neg-mul-1> #<rule div-inv> #<rule un-div-inv> #<rule clear-num> #<rule sum-cubes> #<rule difference-cubes> #<rule flip3-+> #<rule flip3--> #<rule div-sub> #<rule times-frac> #<rule sub-div> #<rule frac-add> #<rule frac-sub> #<rule frac-times> #<rule frac-2neg> #<rule rem-square-sqrt> #<rule rem-sqrt-square> #<rule sqr-neg> #<rule sqr-abs> #<rule fabs-fabs> #<rule fabs-sub> #<rule fabs-neg> #<rule fabs-sqr> #<rule fabs-mul> #<rule fabs-div> #<rule neg-fabs> #<rule mul-fabs> #<rule div-fabs> #<rule sqrt-prod> #<rule sqrt-div> #<rule sqrt-pow1> #<rule sqrt-pow2> #<rule sqrt-unprod> #<rule sqrt-undiv> #<rule rem-cube-cbrt> #<rule rem-cbrt-cube> #<rule rem-3cbrt-lft> #<rule rem-3cbrt-rft> #<rule cube-neg> #<rule cube-prod> #<rule cube-div> #<rule cube-mult> #<rule cbrt-prod> #<rule cbrt-div> #<rule cbrt-unprod> #<rule cbrt-undiv> #<rule cube-unmult> #<rule rem-exp-log> #<rule rem-log-exp> #<rule exp-0> #<rule exp-1-e> #<rule 1-exp> #<rule e-exp-1> #<rule exp-sum> #<rule exp-neg> #<rule exp-diff> #<rule prod-exp> #<rule rec-exp> #<rule div-exp> #<rule exp-prod> #<rule exp-sqrt> #<rule exp-cbrt> #<rule exp-lft-sqr> #<rule exp-lft-cube> #<rule unpow-1> #<rule unpow1> #<rule unpow0> #<rule pow-base-1> #<rule exp-to-pow> #<rule pow-plus> #<rule unpow1/2> #<rule unpow2> #<rule unpow3> #<rule unpow1/3> #<rule pow-exp> #<rule pow-to-exp> #<rule pow-prod-up> #<rule pow-prod-down> #<rule pow-pow> #<rule pow-neg> #<rule pow-flip> #<rule pow-div> #<rule pow-sub> #<rule pow-unpow> #<rule unpow-prod-up> #<rule unpow-prod-down> #<rule pow1/2> #<rule pow2> #<rule pow1/3> #<rule pow3> #<rule pow-base-0> #<rule inv-pow> #<rule log-prod> #<rule log-div> #<rule log-rec> #<rule log-pow> #<rule log-E> #<rule sum-log> #<rule diff-log> #<rule neg-log> #<rule cos-sin-sum> #<rule 1-sub-cos> #<rule 1-sub-sin> #<rule -1-add-cos> #<rule -1-add-sin> #<rule sub-1-cos> #<rule sub-1-sin> #<rule sin-PI/6> #<rule sin-PI/4> #<rule sin-PI/3> #<rule sin-PI/2> #<rule sin-PI> #<rule sin-+PI> #<rule sin-+PI/2> #<rule cos-PI/6> #<rule cos-PI/4> #<rule cos-PI/3> #<rule cos-PI/2> #<rule cos-PI> #<rule cos-+PI> #<rule cos-+PI/2> #<rule tan-PI/6> #<rule tan-PI/4> #<rule tan-PI/3> #<rule tan-PI> #<rule tan-+PI> #<rule tan-+PI/2> #<rule hang-0p-tan> #<rule hang-0m-tan> #<rule hang-p0-tan> #<rule hang-m0-tan> #<rule hang-p-tan> #<rule hang-m-tan> #<rule sin-0> #<rule cos-0> #<rule tan-0> #<rule sin-neg> #<rule cos-neg> #<rule tan-neg> #<rule sin-sum> #<rule cos-sum> #<rule tan-sum> #<rule sin-diff> #<rule cos-diff> #<rule sin-2> #<rule sin-3> #<rule 2-sin> #<rule 3-sin> #<rule cos-2> #<rule cos-3> #<rule 2-cos> #<rule 3-cos> #<rule tan-2> #<rule 2-tan> #<rule sqr-sin-a> #<rule sqr-cos-a> #<rule diff-sin> #<rule diff-cos> #<rule sum-sin> #<rule sum-cos> #<rule cos-mult> #<rule sin-mult> #<rule sin-cos-mult> #<rule diff-atan> #<rule sum-atan> #<rule tan-quot> #<rule quot-tan> #<rule tan-hang-p> #<rule tan-hang-m> #<rule sin-asin> #<rule cos-acos> #<rule tan-atan> #<rule atan-tan> #<rule asin-sin> #<rule acos-cos> #<rule atan-tan-s> #<rule asin-sin-s> #<rule acos-cos-s> #<rule cos-asin> #<rule tan-asin> #<rule sin-acos> #<rule tan-acos> #<rule sin-atan> #<rule cos-atan> #<rule asin-acos> #<rule acos-asin> #<rule asin-neg> #<rule acos-neg> #<rule atan-neg> #<rule sinh-def> #<rule cosh-def> #<rule tanh-def-a> #<rule tanh-def-b> #<rule tanh-def-c> #<rule sinh-cosh> #<rule sinh-+-cosh> #<rule sinh---cosh> #<rule sinh-undef> #<rule cosh-undef> #<rule tanh-undef> #<rule cosh-sum> #<rule cosh-diff> #<rule cosh-2> #<rule cosh-1/2> #<rule sinh-sum> #<rule sinh-diff> #<rule sinh-2> #<rule sinh-1/2> #<rule tanh-sum> #<rule tanh-2> #<rule tanh-1/2> #<rule tanh-1/2*> #<rule sum-sinh> #<rule sum-cosh> #<rule diff-sinh> #<rule diff-cosh> #<rule sinh-neg> #<rule sinh-0> #<rule cosh-neg> #<rule cosh-0> #<rule asinh-def> #<rule acosh-def> #<rule atanh-def> #<rule acosh-2> #<rule asinh-2> #<rule sinh-asinh> #<rule sinh-acosh> #<rule sinh-atanh> #<rule cosh-asinh> #<rule cosh-acosh> #<rule cosh-atanh> #<rule tanh-asinh> #<rule tanh-acosh> #<rule tanh-atanh> #<rule expm1-def> #<rule log1p-def> #<rule log1p-expm1> #<rule expm1-log1p> #<rule hypot-def> #<rule hypot-1-def> #<rule fma-def> #<rule fma-neg> #<rule fma-udef> #<rule expm1-udef> #<rule log1p-udef> #<rule hypot-udef> #<rule prod-diff> #<rule lt-same> #<rule gt-same> #<rule lte-same> #<rule gte-same> #<rule not-lt> #<rule not-gt> #<rule not-lte> #<rule not-gte> #<rule if-true> #<rule if-false> #<rule if-same> #<rule if-not> #<rule if-if-or> #<rule if-if-or-not> #<rule if-if-and> #<rule if-if-and-not> #<rule erf-odd> #<rule erf-erfc> #<rule erfc-erf> #<rule not-true> #<rule not-false> #<rule not-not> #<rule not-and> #<rule not-or> #<rule and-true-l> #<rule and-true-r> #<rule and-false-l> #<rule and-false-r> #<rule and-same> #<rule or-true-l> #<rule or-true-r> #<rule or-false-l> #<rule or-false-r> #<rule or-same>) ((/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2))) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)) (sqrt.f64 (+.f64 1 (*.f64 4 (/.f64 (*.f64 l l) (/.f64 (*.f64 Om Om) (pow.f64 (sin.f64 ky) 2)))))) (pow.f64 (sin.f64 ky) 2)) #f)))