playground:playground
Differences
This shows you the differences between two versions of the page.
Both sides previous revisionPrevious revisionNext revision | Previous revision | ||
playground:playground [2023/06/05 13:11] – johnsoevans | playground:playground [2024/01/23 07:45] (current) – external edit 127.0.0.1 | ||
---|---|---|---|
Line 1: | Line 1: | ||
- | Add what you want here | + | ====== PlayGround ====== |
- | + | Play with any wiki page tests you like here. | |
- | | + | |
- | out phasename.ins append | ||
- | Out_Str | ||
- | Out_String(" | ||
- | macro Out_Ins(phasename) { | ||
- | out phasename## | ||
- | Out_String(" | ||
- | Out(Get(phase_name), | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out(Lam, " | ||
- | Out_String("/ | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out(If(And((Lam > 0.559), (Lam < 0.564))," | ||
- | Out(If(And((Lam > 0.709), (Lam < 0.714))," | ||
- | Out(If(And((Lam > 1.389), (Lam < 1.394))," | ||
- | Out(If(And((Lam > 1.540), (Lam < 1.545))," | ||
- | Out(If(And((Lam > 1.788), (Lam < 1.793))," | ||
- | Out(If(And((Lam > 1.935), (Lam < 1.940))," | ||
- | Out(If(And((Lam > 2.289), (Lam < 2.294))," | ||
- | Out_String(" | ||
- | Out((Cos(lpf Deg))^2, " | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out((If(Prm_There(FPlength), | ||
- | Out(Rp," | ||
- | Out(If(Prm_There(FPlength), | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out(Lam, " | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out((Cos(lpf Deg))^2, " | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | atom_out phasename## | ||
- | load out_record out_fmt out_eqn | ||
- | | ||
- | " | ||
- | out phasename## | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | atom_out phasename## | ||
- | load out_record out_fmt out_eqn | ||
- | | ||
- | out phasename## | ||
- | Out_String("/ | ||
- | atom_out phasename## | ||
- | load out_record out_fmt out_eqn | ||
- | | ||
- | out phasename## | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String("# | ||
- | Out_String("# | ||
- | Out_String("# | ||
- | Out_String("# | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out(Get(phase_name)," | ||
- | Out_String(" | ||
- | Out(Get(sp_grp_char)," | ||
- | Out(Get(sp_grp_char)," | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String("# | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out(Get(scale)," | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out(Get(a), " | ||
- | Out(Get(b), " | ||
- | Out(Get(c), " | ||
- | Out(Get(al), | ||
- | Out(Get(be), | ||
- | Out(Get(ga), | ||
- | Out_String(" | ||
- | atom_out phasename## | ||
- | load out_record out_fmt out_eqn | ||
- | | ||
- | " | ||
- | " | ||
- | " | ||
- | " | ||
- | " | ||
- | " | ||
- | " | ||
- | } | ||
- | out phasename## | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out(6(Round(Get(a)/ | ||
- | Out_String(" | ||
- | Out(6(Round(Get(b)/ | ||
- | Out_String(" | ||
- | Out(6(Round(Get(c)/ | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | atom_out phasename## | ||
- | load out_record out_fmt out_eqn | ||
- | | ||
- | " | ||
- | out phasename## | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String("# | ||
- | Out_String("# | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
- | Out_String(" | ||
+ | <code topas> | ||
+ | /* this is a comment */ | ||
+ | ' this is a quotation comment | ||
+ | | ||
+ | local !two_theta 145 | ||
+ | local !Lf 25 | ||
+ | local mu 0 min 0 | ||
+ | Abs_Lobanov | ||
+ | | ||
+ | local !two_theta 90 | ||
+ | local !Lf 26 | ||
+ | local mu 0 min 0 | ||
+ | Abs_Lobanov | ||
+ | | ||
- | | + | macro Abs_Lobanov |
+ | { | ||
+ | prm !Lf 60.183 /* POWGEN 90 degree flightpath */ | ||
+ | prm !h_bar 6.626176e-34 /* Plank' | ||
+ | prm !m_n 1.67495e-27 /* neutron mass */ | ||
+ | prm !td_const = 10^4 h_bar/(m_n Lf); | ||
+ | local !sintheta = Sin(Deg_on_2 two_theta); | ||
+ | local !lambda = Xo 10^4 h_bar/(m_n Lf); | ||
+ | local !k0 = 1.697653; | ||
+ | local !k1 = (25.99978 - (0.01911 sintheta^0.5)Exp(-0.024514 sintheta^2)) + 0.109561 sintheta - 26.0456; | ||
+ | local !k2 = -0.02489 - (0.39499 sintheta^2) + (1.219077 sintheta^3) - (1.31268 sintheta^4) + (0.871081 sintheta^5) - (0.2327 sintheta^6); | ||
+ | local !k3 = 0.003045 + (0.018167 sintheta^2) - (0.03305 sintheta^4); | ||
+ | local !k4 = 1.433902 + (11.07504 sintheta^2) - (8.77629 sintheta^4) + (10.02088 sintheta^6) - (3.36778 sintheta^8); | ||
+ | local !k5 = ((0.013869 - 0.01249 sintheta^2)Exp(3.27094 sintheta^2)) + ((0.337894 + (13.77317 sintheta^2))/ | ||
+ | local !k6 = (1.933433 / (1 + 23.12967 sintheta^2)^1.686715) - 0.13576 sintheta + 1.163198; | ||
+ | local !k7 = 0.044365 - (0.04259/ | ||
+ | scale_pks = If( (mu*lambda) < 3, Exp(-k0 (mu*lambda) - k1 (mu*lambda)^2 - k2 (mu*lambda)^3 - k3 (mu*lambda)^4), | ||
+ | Exp((k4 - k7/(1 + k5 ((mu*lambda)-3))^k6)+k7) | ||
+ | ); | ||
+ | } | ||
+ | </ |
playground/playground.1685970665.txt.gz · Last modified: 2023/06/05 13:11 by johnsoevans