<?xml version="1.0"?>
<feed xmlns="http://www.w3.org/2005/Atom" xml:lang="en">
	<id>https://ascend4.org/api.php?action=feedcontributions&amp;feedformat=atom&amp;user=Ohmic</id>
	<title>ASCEND - User contributions [en]</title>
	<link rel="self" type="application/atom+xml" href="https://ascend4.org/api.php?action=feedcontributions&amp;feedformat=atom&amp;user=Ohmic"/>
	<link rel="alternate" type="text/html" href="https://ascend4.org/Special:Contributions/Ohmic"/>
	<updated>2026-05-01T03:49:32Z</updated>
	<subtitle>User contributions</subtitle>
	<generator>MediaWiki 1.43.6</generator>
	<entry>
		<id>https://ascend4.org/index.php?title=Compton_scatter&amp;diff=2199</id>
		<title>Compton scatter</title>
		<link rel="alternate" type="text/html" href="https://ascend4.org/index.php?title=Compton_scatter&amp;diff=2199"/>
		<updated>2011-04-23T21:31:04Z</updated>

		<summary type="html">&lt;p&gt;Ohmic: /* Compton Scatter */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;== Compton Scatter ==&lt;br /&gt;
&lt;br /&gt;
Below is a program that will calculate the scattering energy of a photon based off of the initial energy and the scattering angle. It also calculates the microscopic cross section of a particular atom with Z number of electrons&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;a4c&amp;quot;&amp;gt;&lt;br /&gt;
REQUIRE &amp;quot;system.a4l&amp;quot;;&lt;br /&gt;
REQUIRE &amp;quot;atoms.a4l&amp;quot;;&lt;br /&gt;
&lt;br /&gt;
MODEL ComptonScatterEnergyvsAngle;&lt;br /&gt;
	theta IS_A angle; (*Degrees in Radians*)&lt;br /&gt;
	Escat IS_A energy; (*Scattering Energy*)&lt;br /&gt;
	E IS_A energy; (*Incident Energy (MeV)*)&lt;br /&gt;
	ERM IS_A energy; (*Electron Rest Mass Energy (MeV*)&lt;br /&gt;
	degree IS_A solver_var; (*Scattering Angle (degrees) *)&lt;br /&gt;
&lt;br /&gt;
	convert: theta = degree * 1{PI} / 180.;&lt;br /&gt;
	Escat = E/(1 + (E/ERM)*(1 - cos(theta)));&lt;br /&gt;
METHODS&lt;br /&gt;
METHOD on_load;&lt;br /&gt;
	RUN values;&lt;br /&gt;
	RUN specify;&lt;br /&gt;
END on_load;&lt;br /&gt;
&lt;br /&gt;
METHOD values;&lt;br /&gt;
	E := 1.0 {MeV};&lt;br /&gt;
	ERM := 0.511 {MeV};&lt;br /&gt;
	degree := 1;&lt;br /&gt;
END values;	&lt;br /&gt;
&lt;br /&gt;
METHOD specify;&lt;br /&gt;
	FIX E, ERM, degree;&lt;br /&gt;
END specify;&lt;br /&gt;
&lt;br /&gt;
END ComptonScatterEnergyvsAngle;&lt;br /&gt;
&lt;br /&gt;
MODEL ComptonScatterEnergyvsCrosssection;&lt;br /&gt;
	E IS_A energy;&lt;br /&gt;
	Z IS_A solver_var;&lt;br /&gt;
	Lambda IS_A solver_var;&lt;br /&gt;
	Re IS_A solver_var;&lt;br /&gt;
	Xsection IS_A solver_var;&lt;br /&gt;
	ERM IS_A energy;&lt;br /&gt;
&lt;br /&gt;
	calculate: Lambda = ERM/E;&lt;br /&gt;
	Xsection = 1{PI} * Z * Re^2 * Lambda*((1 - 2*Lambda - 2*Lambda^2 )*ln(1 + 2/Lambda) + 2*(1 + 9*Lambda + 8*Lambda^2 + 2*Lambda^3)/(Lambda+2)^2);&lt;br /&gt;
&lt;br /&gt;
METHODS&lt;br /&gt;
METHOD on_load;&lt;br /&gt;
	RUN values;&lt;br /&gt;
	RUN specify;&lt;br /&gt;
END on_load;&lt;br /&gt;
&lt;br /&gt;
METHOD values;&lt;br /&gt;
	E := 0.01 {MeV};&lt;br /&gt;
	Z := 207.0;&lt;br /&gt;
	Re := 2.8179e-13;&lt;br /&gt;
	ERM := .511 {MeV};&lt;br /&gt;
END values;&lt;br /&gt;
&lt;br /&gt;
METHOD specify;&lt;br /&gt;
	FIX E, Z, Re, ERM;&lt;br /&gt;
END specify;&lt;br /&gt;
END ComptonScatterEnergyvsCrosssection;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
This is a very basic model that can be improved in many ways. One of the ways would be to make the degree variable automatically convert to radians instead of having to manually convert it. The actually calculation is correct however. One bug that I am having is making the cross section calculation refresh when I change a parameter, as of now I have to change in manually in the code, any bug fixes are welcome.&lt;br /&gt;
&lt;br /&gt;
Note: The cross section calculation yields results in cm^2, not barns. These two models fail when the photon energy approaches the binding energy of the atom.&lt;br /&gt;
&lt;br /&gt;
== References ==&lt;br /&gt;
Kenneth, J., and Richard E. Fundamentals of nuclear science and engineering. 2nd. CRC, 2008. 179. Print.&lt;/div&gt;</summary>
		<author><name>Ohmic</name></author>
	</entry>
	<entry>
		<id>https://ascend4.org/index.php?title=Compton_scatter&amp;diff=2198</id>
		<title>Compton scatter</title>
		<link rel="alternate" type="text/html" href="https://ascend4.org/index.php?title=Compton_scatter&amp;diff=2198"/>
		<updated>2011-04-23T21:28:10Z</updated>

		<summary type="html">&lt;p&gt;Ohmic: /* Compton Scatter */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;== Compton Scatter ==&lt;br /&gt;
&lt;br /&gt;
Below is a program that will calculate the scattering energy of a photon based off of the initial energy and the scattering angle. It also calculates the microscopic cross section of a particular atom with Z number of electrons&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;a4c&amp;quot;&amp;gt;&lt;br /&gt;
REQUIRE &amp;quot;system.a4l&amp;quot;;&lt;br /&gt;
REQUIRE &amp;quot;atoms.a4l&amp;quot;;&lt;br /&gt;
&lt;br /&gt;
MODEL ComptonScatterEnergyvsAngle;&lt;br /&gt;
	theta IS_A angle; (*Degrees in Radians*)&lt;br /&gt;
	Escat IS_A energy; (*Scattering Energy*)&lt;br /&gt;
	E IS_A energy; (*Incident Energy (MeV)*)&lt;br /&gt;
	ERM IS_A energy; (*Electron Rest Mass Energy (MeV*)&lt;br /&gt;
	degree IS_A solver_var; (*Scattering Angle (degrees) *)&lt;br /&gt;
&lt;br /&gt;
	convert: theta = degree * 1{PI} / 180.;&lt;br /&gt;
	Escat = E/(1 + (E/ERM)*(1 - cos(theta)));&lt;br /&gt;
METHODS&lt;br /&gt;
METHOD on_load;&lt;br /&gt;
	RUN values;&lt;br /&gt;
	RUN specify;&lt;br /&gt;
END on_load;&lt;br /&gt;
&lt;br /&gt;
METHOD values;&lt;br /&gt;
	E := 1.0 {MeV};&lt;br /&gt;
	ERM := 0.511 {MeV};&lt;br /&gt;
	degree := 1;&lt;br /&gt;
END values;	&lt;br /&gt;
&lt;br /&gt;
METHOD specify;&lt;br /&gt;
	FIX E, ERM, degree;&lt;br /&gt;
END specify;&lt;br /&gt;
&lt;br /&gt;
END ComptonScatterEnergyvsAngle;&lt;br /&gt;
&lt;br /&gt;
MODEL ComptonScatterEnergyvsCrosssection;&lt;br /&gt;
	E IS_A energy;&lt;br /&gt;
	Z IS_A solver_var;&lt;br /&gt;
	Lambda IS_A solver_var;&lt;br /&gt;
	Re IS_A solver_var;&lt;br /&gt;
	Xsection IS_A solver_var;&lt;br /&gt;
	ERM IS_A energy;&lt;br /&gt;
&lt;br /&gt;
	calculate: Lambda = ERM/E;&lt;br /&gt;
	Xsection = 1{PI} * Z * Re^2 * Lambda*((1 - 2*Lambda - 2*Lambda^2 )*ln(1 + 2/Lambda) + 2*(1 + 9*Lambda + 8*Lambda^2 + 2*Lambda^3)/(Lambda+2)^2);&lt;br /&gt;
&lt;br /&gt;
METHODS&lt;br /&gt;
METHOD on_load;&lt;br /&gt;
	RUN values;&lt;br /&gt;
	RUN specify;&lt;br /&gt;
END on_load;&lt;br /&gt;
&lt;br /&gt;
METHOD values;&lt;br /&gt;
	E := 0.01 {MeV};&lt;br /&gt;
	Z := 207.0;&lt;br /&gt;
	Re := 2.8179e-13;&lt;br /&gt;
	ERM := .511 {MeV};&lt;br /&gt;
END values;&lt;br /&gt;
&lt;br /&gt;
METHOD specify;&lt;br /&gt;
	FIX E, Z, Re, ERM;&lt;br /&gt;
END specify;&lt;br /&gt;
END ComptonScatterEnergyvsCrosssection;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
This is a very basic model that can be improved in many ways. One of the ways would be to use specific variables instead of the general solver_var. Another would be to make the degree variable automatically convert to radians instead of having to manually convert it. The actually calculation is correct however. One bug that I am having is making the cross section calculation refresh when I change a parameter, as of now I have to change in manually in the code, any bug fixes are welcome.&lt;br /&gt;
&lt;br /&gt;
Note: The cross section calculation yields results in cm^2, not barns. These two models fail when the photon energy approaches the binding energy of the atom.&lt;br /&gt;
&lt;br /&gt;
== References ==&lt;br /&gt;
Kenneth, J., and Richard E. Fundamentals of nuclear science and engineering. 2nd. CRC, 2008. 179. Print.&lt;/div&gt;</summary>
		<author><name>Ohmic</name></author>
	</entry>
	<entry>
		<id>https://ascend4.org/index.php?title=Compton_scatter&amp;diff=2197</id>
		<title>Compton scatter</title>
		<link rel="alternate" type="text/html" href="https://ascend4.org/index.php?title=Compton_scatter&amp;diff=2197"/>
		<updated>2011-04-23T21:23:03Z</updated>

		<summary type="html">&lt;p&gt;Ohmic: /* Compton Scatter */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;== Compton Scatter ==&lt;br /&gt;
&lt;br /&gt;
Below is a program that will calculate the scattering energy of a photon based off of the initial energy and the scattering angle. It also calculates the microscopic cross section of a particular atom with Z number of electrons&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;a4c&amp;quot;&amp;gt;&lt;br /&gt;
REQUIRE &amp;quot;system.a4l&amp;quot;;&lt;br /&gt;
REQUIRE &amp;quot;atoms.a4l&amp;quot;;&lt;br /&gt;
&lt;br /&gt;
MODEL ComptonScatterEnergyvsAngle;&lt;br /&gt;
	theta IS_A angle; (*Degrees in Radians*)&lt;br /&gt;
	Escat IS_A energy; (*Scattering Energy*)&lt;br /&gt;
	E IS_A energy; (*Incident Energy (MeV)*)&lt;br /&gt;
	ERM IS_A energy; (*Electron Rest Mass Energy (MeV*)&lt;br /&gt;
	degree IS_A solver_var; (*Scattering Angle (degrees) *)&lt;br /&gt;
&lt;br /&gt;
	convert: theta = degree * 1{PI} / 180.;&lt;br /&gt;
	Escat = E/(1 + (E/ERM)*(1 - cos(theta)));&lt;br /&gt;
METHODS&lt;br /&gt;
METHOD on_load;&lt;br /&gt;
	RUN values;&lt;br /&gt;
	RUN specify;&lt;br /&gt;
END on_load;&lt;br /&gt;
&lt;br /&gt;
METHOD values;&lt;br /&gt;
	E := 1.0 {MeV};&lt;br /&gt;
	ERM := 0.511 {MeV};&lt;br /&gt;
	degree := 1;&lt;br /&gt;
END values;	&lt;br /&gt;
&lt;br /&gt;
METHOD specify;&lt;br /&gt;
	FIX E, ERM, degree;&lt;br /&gt;
END specify;&lt;br /&gt;
&lt;br /&gt;
END ComptonScatterEnergyvsAngle;&lt;br /&gt;
&lt;br /&gt;
MODEL ComptonScatterEnergyvsCrosssection;&lt;br /&gt;
	E IS_A solver_var;&lt;br /&gt;
	Z IS_A solver_var;&lt;br /&gt;
	Lambda IS_A solver_var;&lt;br /&gt;
	Re IS_A solver_var;&lt;br /&gt;
	Xsection IS_A solver_var;&lt;br /&gt;
	ERM IS_A solver_var;&lt;br /&gt;
&lt;br /&gt;
	calculate: Lambda = ERM/E;&lt;br /&gt;
	Xsection = 1{PI} * Z * Re^2 * Lambda*((1 - 2*Lambda - 2*Lambda^2 )*ln(1 + 2/Lambda) + 2*(1 + 9*Lambda + 8*Lambda^2 + 2*Lambda^3)/(Lambda+2)^2);&lt;br /&gt;
&lt;br /&gt;
METHODS&lt;br /&gt;
METHOD on_load;&lt;br /&gt;
	RUN values;&lt;br /&gt;
	RUN specify;&lt;br /&gt;
END on_load;&lt;br /&gt;
&lt;br /&gt;
METHOD values;&lt;br /&gt;
	E := 0.01;&lt;br /&gt;
	Z := 207.0;&lt;br /&gt;
	Re := 2.8179e-13;&lt;br /&gt;
	ERM := .511;&lt;br /&gt;
END values;&lt;br /&gt;
&lt;br /&gt;
METHOD specify;&lt;br /&gt;
	FIX E, Z, Re, ERM;&lt;br /&gt;
END specify;&lt;br /&gt;
END ComptonScatterEnergyvsCrosssection;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
This is a very basic model that can be improved in many ways. One of the ways would be to use specific variables instead of the general solver_var. Another would be to make the degree variable automatically convert to radians instead of having to manually convert it. The actually calculation is correct however. One bug that I am having is making the cross section calculation refresh when I change a parameter, as of now I have to change in manually in the code, any bug fixes are welcome.&lt;br /&gt;
&lt;br /&gt;
Note: The cross section calculation yields results in cm^2, not barns. These two models fail when the photon energy approaches the binding energy of the atom.&lt;br /&gt;
&lt;br /&gt;
== References ==&lt;br /&gt;
Kenneth, J., and Richard E. Fundamentals of nuclear science and engineering. 2nd. CRC, 2008. 179. Print.&lt;/div&gt;</summary>
		<author><name>Ohmic</name></author>
	</entry>
	<entry>
		<id>https://ascend4.org/index.php?title=Compton_scatter&amp;diff=2123</id>
		<title>Compton scatter</title>
		<link rel="alternate" type="text/html" href="https://ascend4.org/index.php?title=Compton_scatter&amp;diff=2123"/>
		<updated>2011-04-08T03:31:37Z</updated>

		<summary type="html">&lt;p&gt;Ohmic: /* Compton Scatter */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;== Compton Scatter ==&lt;br /&gt;
&lt;br /&gt;
Below is a program that will calculate the scattering energy of a photon based off of the initial energy and the scattering angle. It also calculates the microscopic cross section of a particular atom with Z number of electrons&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;a4c&amp;quot;&amp;gt;&lt;br /&gt;
REQUIRE &amp;quot;system.a4l&amp;quot;;&lt;br /&gt;
REQUIRE &amp;quot;atoms.a4l&amp;quot;;&lt;br /&gt;
&lt;br /&gt;
MODEL ComptonScatterEnergyvsAngle;&lt;br /&gt;
	theta IS_A angle; (*Degrees in Radians*)&lt;br /&gt;
	Escat IS_A solver_var; (*Scattering Energy*)&lt;br /&gt;
	E IS_A solver_var; (*Incident Energy (MeV)*)&lt;br /&gt;
	ERM IS_A solver_var; (*Electron Rest Mass Energy (MeV*)&lt;br /&gt;
	degree IS_A solver_var; (*Scattering Angle (degrees) *)&lt;br /&gt;
&lt;br /&gt;
	convert: theta = degree * 1{PI} / 180.;&lt;br /&gt;
	Escat = E/(1 + (E/ERM)*(1 - cos(theta)));&lt;br /&gt;
METHODS&lt;br /&gt;
METHOD on_load;&lt;br /&gt;
	RUN values;&lt;br /&gt;
	RUN specify;&lt;br /&gt;
END on_load;&lt;br /&gt;
&lt;br /&gt;
METHOD values;&lt;br /&gt;
	E := 1.0;&lt;br /&gt;
	ERM := 0.511;&lt;br /&gt;
	degree := 1;&lt;br /&gt;
END values;	&lt;br /&gt;
&lt;br /&gt;
METHOD specify;&lt;br /&gt;
	FIX E, ERM, degree;&lt;br /&gt;
END specify;&lt;br /&gt;
&lt;br /&gt;
END ComptonScatterEnergyvsAngle;&lt;br /&gt;
&lt;br /&gt;
MODEL ComptonScatterEnergyvsCrosssection;&lt;br /&gt;
	E IS_A solver_var;&lt;br /&gt;
	Z IS_A solver_var;&lt;br /&gt;
	Lambda IS_A solver_var;&lt;br /&gt;
	Re IS_A solver_var;&lt;br /&gt;
	Xsection IS_A solver_var;&lt;br /&gt;
	ERM IS_A solver_var;&lt;br /&gt;
&lt;br /&gt;
	calculate: Lambda = ERM/E;&lt;br /&gt;
	Xsection = 1{PI} * Z * Re^2 * Lambda*((1 - 2*Lambda - 2*Lambda^2 )*ln(1 + 2/Lambda) + 2*(1 + 9*Lambda + 8*Lambda^2 + 2*Lambda^3)/(Lambda+2)^2);&lt;br /&gt;
&lt;br /&gt;
METHODS&lt;br /&gt;
METHOD on_load;&lt;br /&gt;
	RUN values;&lt;br /&gt;
	RUN specify;&lt;br /&gt;
END on_load;&lt;br /&gt;
&lt;br /&gt;
METHOD values;&lt;br /&gt;
	E := 0.01;&lt;br /&gt;
	Z := 207.0;&lt;br /&gt;
	Re := 2.8179e-13;&lt;br /&gt;
	ERM := .511;&lt;br /&gt;
END values;&lt;br /&gt;
&lt;br /&gt;
METHOD specify;&lt;br /&gt;
	FIX E, Z, Re, ERM;&lt;br /&gt;
END specify;&lt;br /&gt;
END ComptonScatterEnergyvsCrosssection;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
This is a very basic model that can be improved in many ways. One of the ways would be to use specific variables instead of the general solver_var. Another would be to make the degree variable automatically convert to radians instead of having to manually convert it. The actually calculation is correct however. One bug that I am having is making the cross section calculation refresh when I change a parameter, as of now I have to change in manually in the code, any bug fixes are welcome.&lt;br /&gt;
&lt;br /&gt;
Note: The cross section calculation yields results in cm^2, not barns. These two models fail when the photon energy approaches the binding energy of the atom.&lt;br /&gt;
&lt;br /&gt;
== References ==&lt;br /&gt;
Kenneth, J., and Richard E. Fundamentals of nuclear science and engineering. 2nd. CRC, 2008. 179. Print.&lt;/div&gt;</summary>
		<author><name>Ohmic</name></author>
	</entry>
	<entry>
		<id>https://ascend4.org/index.php?title=Compton_scatter&amp;diff=2064</id>
		<title>Compton scatter</title>
		<link rel="alternate" type="text/html" href="https://ascend4.org/index.php?title=Compton_scatter&amp;diff=2064"/>
		<updated>2011-04-03T23:05:24Z</updated>

		<summary type="html">&lt;p&gt;Ohmic: /* Compton Scatter */&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;== Compton Scatter ==&lt;br /&gt;
&lt;br /&gt;
Below is a program that will calculate the scattering energy of a photon based off of the initial energy and the scattering angle.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;a4c&amp;quot;&amp;gt;&lt;br /&gt;
REQUIRE &amp;quot;system.a4l&amp;quot;;&lt;br /&gt;
REQUIRE &amp;quot;atoms.a4l&amp;quot;;&lt;br /&gt;
&lt;br /&gt;
MODEL ComptonScatter;&lt;br /&gt;
	theta IS_A angle; (*Degrees in Radians*)&lt;br /&gt;
	Escat IS_A solver_var; (*Scattering Energy*)&lt;br /&gt;
	E IS_A solver_var; (*Incident Energy (MeV)*)&lt;br /&gt;
	ERM IS_A solver_var; (*Electron Rest Mass Energy (MeV)*)&lt;br /&gt;
	degree IS_A solver_var; (*Scattering Angle (degrees) *)&lt;br /&gt;
&lt;br /&gt;
	convert: theta = degree * 1{PI} / 180.;&lt;br /&gt;
	Escat = E/(1 + (E/ERM)*(1 - cos(theta)));&lt;br /&gt;
METHODS&lt;br /&gt;
METHOD on_load;&lt;br /&gt;
	RUN values;&lt;br /&gt;
	RUN specify;&lt;br /&gt;
END on_load;&lt;br /&gt;
&lt;br /&gt;
METHOD values;&lt;br /&gt;
	E := 1.0;&lt;br /&gt;
	ERM := 0.511;&lt;br /&gt;
	degree := 1;&lt;br /&gt;
END values;	&lt;br /&gt;
&lt;br /&gt;
METHOD specify;&lt;br /&gt;
	FIX E, ERM, degree;&lt;br /&gt;
END specify;&lt;br /&gt;
&lt;br /&gt;
END ComptonScatter;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
This is a very basic model that can be improved in many ways. One of the ways would be to use specific variables instead of the general solver_var. Another would be to make the degree variable automatically convert to radians instead of having to manually convert it. The actually calculation is correct however.&lt;br /&gt;
&lt;br /&gt;
== References ==&lt;br /&gt;
Kenneth, J., and Richard E. Fundamentals of nuclear science and engineering. 2nd. CRC, 2008. 179. Print.&lt;/div&gt;</summary>
		<author><name>Ohmic</name></author>
	</entry>
	<entry>
		<id>https://ascend4.org/index.php?title=Compton_scatter&amp;diff=2062</id>
		<title>Compton scatter</title>
		<link rel="alternate" type="text/html" href="https://ascend4.org/index.php?title=Compton_scatter&amp;diff=2062"/>
		<updated>2011-04-03T22:43:47Z</updated>

		<summary type="html">&lt;p&gt;Ohmic: Created page with &amp;#039;== Compton Scatter ==  Below is a program that will calculate the scattering energy of a photon based off of the initial energy and the scattering angle.  &amp;lt;source lang=&amp;quot;a4c&amp;quot;&amp;gt; REQ…&amp;#039;&lt;/p&gt;
&lt;hr /&gt;
&lt;div&gt;== Compton Scatter ==&lt;br /&gt;
&lt;br /&gt;
Below is a program that will calculate the scattering energy of a photon based off of the initial energy and the scattering angle.&lt;br /&gt;
&lt;br /&gt;
&amp;lt;source lang=&amp;quot;a4c&amp;quot;&amp;gt;&lt;br /&gt;
REQUIRE &amp;quot;system.a4l&amp;quot;;&lt;br /&gt;
REQUIRE &amp;quot;atoms.a4l&amp;quot;;&lt;br /&gt;
&lt;br /&gt;
MODEL ComptonScatter;&lt;br /&gt;
	theta IS_A angle; (*Degrees in Radians*)&lt;br /&gt;
	Escat IS_A solver_var; (*Scattering Energy*)&lt;br /&gt;
	E IS_A solver_var; (*Incident Energy (MeV)*)&lt;br /&gt;
	ERM IS_A solver_var; (*Electron Rest Mass Energy (MeV*)&lt;br /&gt;
	degree IS_A solver_var; (*Scattering Angle (degrees) *)&lt;br /&gt;
&lt;br /&gt;
	convert: theta = degree * 1{PI} / 180.;&lt;br /&gt;
	Escat = E/(1 + (E/ERM)*(1 - cos(theta)));&lt;br /&gt;
METHODS&lt;br /&gt;
METHOD on_load;&lt;br /&gt;
	RUN values;&lt;br /&gt;
	RUN specify;&lt;br /&gt;
END on_load;&lt;br /&gt;
&lt;br /&gt;
METHOD values;&lt;br /&gt;
	E := 1.0;&lt;br /&gt;
	ERM := 0.511;&lt;br /&gt;
	degree := 1;&lt;br /&gt;
END values;	&lt;br /&gt;
&lt;br /&gt;
METHOD specify;&lt;br /&gt;
	FIX E, ERM, degree;&lt;br /&gt;
END specify;&lt;br /&gt;
&lt;br /&gt;
END ComptonScatter;&lt;br /&gt;
&amp;lt;/source&amp;gt;&lt;br /&gt;
&lt;br /&gt;
This is a very basic model that can be improved in many ways. One of the ways would be to use specific variables instead of the general solver_var. Another would be to make the degree variable automatically convert to radians instead of having to manually convert it. The actually calculation is correct however.&lt;br /&gt;
&lt;br /&gt;
&lt;br /&gt;
== References ==&lt;br /&gt;
Kenneth, J., and Richard E. Fundamentals of nuclear science and engineering. 2nd. CRC, 2008. 179. Print.&lt;/div&gt;</summary>
		<author><name>Ohmic</name></author>
	</entry>
</feed>