test_pm_distBand Module Reference

This module contains tests of the module pm_distBand. More...

Data Types
type	BandSpec_type

Functions/Subroutines
subroutine	setTest ()
logical(LK) function	test_getBandEbreak ()
logical(LK) function	test_getBandParam_1 ()
logical(LK) function	test_getPhotonFluxLower_1 ()
logical(LK) function	test_getPhotonFlux_1 ()
logical(LK) function	test_getPhotonFlux_2 ()
logical(LK) function	test_getPhotonFlux_3 ()
logical(LK) function	test_getPhotonFlux_4 ()
logical(LK) function	test_getBandPhoton_3 ()
	Test the integration of both upper and lower tails. More...
logical(LK) function	test_getBandPhoton_5 ()
	Test the integration of when lower limit is larger than upper limit. More...
logical(LK) function	test_getBandPhoton_6 ()
	Test the integration of when lower limit is larger than upper limit. More...
logical(LK) function	test_getBandPhoton_7 ()
	Test with conflicting alpha photon index. More...
logical(LK) function	test_getBandPhoton_8 ()
	Test with conflicting alpha < beta photon indices. More...
logical(LK) function	test_getFluenceEnergy_3 ()
	Test the integration of both upper and lower tails. More...
logical(LK) function	test_getFluenceEnergy_6 ()
	Test the integration of when lower limit is larger than upper limit. More...
logical(LK) function	test_getFluenceEnergy_7 ()
	Test with conflicting alpha photon index. More...
logical(LK) function	test_getFluenceEnergy_8 ()
	Test with conflicting alpha < beta photon indices. More...
logical(LK) function	test_getBandPhotonFromEnergyFluence_6 ()
	Test the integration of when lower limit is larger than upper limit. More...
logical(LK) function	test_getBandPhotonFromEnergyFluence_7 ()
	Test with conflicting alpha photon index alpha < -2. More...
logical(LK) function	test_getBandPhotonFromEnergyFluence_8 ()
	Test with conflicting alpha < beta photon indices. More...
logical(LK) function	test_getBandPhoton_1 ()
	Test the integration of both the upper and lower tails. More...
logical(LK) function	test_getBandPhoton_2 ()
	Test the integration of only the upper tail. More...
logical(LK) function	test_getBandPhoton_4 ()
	Test the integration of both upper and upper tails with steep slopes. More...
logical(LK) function	test_getFluenceEnergy_1 ()
	Test the integration of both upper and upper tails. More...
logical(LK) function	test_getFluenceEnergy_2 ()
	Test the integration of only the upper tail. More...
logical(LK) function	test_getFluenceEnergy_4 ()
	Test the integration of both upper and upper tails with steep slopes. More...
logical(LK) function	test_getBandPhotonFromEnergyFluence_1 ()
logical(LK) function	test_getBandPhotonFromEnergyFluence_2 ()
logical(LK) function	test_getBandPhotonFromEnergyFluence_3 ()
logical(LK) function	test_getBandPhotonFromEnergyFluence_4 ()
logical(LK) function	test_getBandPhotonFromEnergyFluence_5 ()

Variables
type(test_type)	test
type(BandSpec_type), parameter	BAND_SPEC1 = BandSpec_type( epk = 700._RK, alpha = -0.5_RK, beta = -2.5_RK, ebrk = 9.333333333333334e2_RK, coef = 1.178920689527826e5_RK, Limit = [1._RK,10000._RK], photonFluence = 37.226409565894123_RK, energyFluence = 1.195755906912896e4_RK, tolerance = 1.e-7_RK )
type(BandSpec_type), parameter	BAND_SPEC2 = BandSpec_type( epk = 700._RK, alpha = -0.5_RK, beta = -2.5_RK, ebrk = 9.333333333333334e2_RK, coef = 1.178920689527826e5_RK, Limit = [1._RK,500._RK], photonFluence = 30.806431300618090_RK, energyFluence = 4.079656304178462e3_RK, tolerance = 1.e-7_RK )
type(BandSpec_type), parameter	BAND_SPEC3 = BandSpec_type( epk = 700._RK, alpha = -0.5_RK, beta = -2.5_RK, ebrk = 9.333333333333334e2_RK, coef = 1.178920689527826e5_RK, Limit = [1000._RK,10000._RK], photonFluence = 2.406788327100909_RK, energyFluence = 5.098307740152641e3_RK, tolerance = 1.e-7_RK )
type(BandSpec_type), parameter	BAND_SPEC4 = BandSpec_type( epk = 700._RK, alpha = -1.9_RK, beta = -3.5_RK, ebrk = 1.119999999999999e4_RK, coef = 6.079637221508616e5_RK, Limit = [1._RK,10000._RK], photonFluence = 1.108858577351433_RK, energyFluence = 12.769650780448401_RK, tolerance = 1.e-6_RK )

Detailed Description

This module contains tests of the module pm_distBand.

Author:

Amir Shahmoradi

Function/Subroutine Documentation

setTest()

subroutine test_pm_distBand::setTest

Definition at line 97 of file test_pm_distBand.F90.

test_getBandEbreak()

logical(LK) function test_pm_distBand::test_getBandEbreak

Definition at line 136 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandParam_1()

logical(LK) function test_pm_distBand::test_getBandParam_1

Definition at line 156 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhoton_1()

logical(LK) function test_pm_distBand::test_getBandPhoton_1

Test the integration of both the upper and lower tails.

Definition at line 777 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhoton_2()

logical(LK) function test_pm_distBand::test_getBandPhoton_2

Test the integration of only the upper tail.

Definition at line 809 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhoton_3()

logical(LK) function test_pm_distBand::test_getBandPhoton_3

Test the integration of both upper and lower tails.

Definition at line 404 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhoton_4()

logical(LK) function test_pm_distBand::test_getBandPhoton_4

Test the integration of both upper and upper tails with steep slopes.

Definition at line 841 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhoton_5()

logical(LK) function test_pm_distBand::test_getBandPhoton_5

Test the integration of when lower limit is larger than upper limit.

Definition at line 436 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhoton_6()

logical(LK) function test_pm_distBand::test_getBandPhoton_6

Test the integration of when lower limit is larger than upper limit.

Definition at line 469 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhoton_7()

logical(LK) function test_pm_distBand::test_getBandPhoton_7

Test with conflicting alpha photon index.

Definition at line 499 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhoton_8()

logical(LK) function test_pm_distBand::test_getBandPhoton_8

Test with conflicting alpha < beta photon indices.

Definition at line 529 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhotonFromEnergyFluence_1()

logical(LK) function test_pm_distBand::test_getBandPhotonFromEnergyFluence_1

Definition at line 966 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhotonFromEnergyFluence_2()

logical(LK) function test_pm_distBand::test_getBandPhotonFromEnergyFluence_2

Definition at line 997 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhotonFromEnergyFluence_3()

logical(LK) function test_pm_distBand::test_getBandPhotonFromEnergyFluence_3

Definition at line 1028 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhotonFromEnergyFluence_4()

logical(LK) function test_pm_distBand::test_getBandPhotonFromEnergyFluence_4

Definition at line 1059 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhotonFromEnergyFluence_5()

logical(LK) function test_pm_distBand::test_getBandPhotonFromEnergyFluence_5

Definition at line 1090 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhotonFromEnergyFluence_6()

logical(LK) function test_pm_distBand::test_getBandPhotonFromEnergyFluence_6

Test the integration of when lower limit is larger than upper limit.

Definition at line 682 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhotonFromEnergyFluence_7()

logical(LK) function test_pm_distBand::test_getBandPhotonFromEnergyFluence_7

Test with conflicting alpha photon index alpha < -2.

Definition at line 713 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getBandPhotonFromEnergyFluence_8()

logical(LK) function test_pm_distBand::test_getBandPhotonFromEnergyFluence_8

Test with conflicting alpha < beta photon indices.

Definition at line 744 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getFluenceEnergy_1()

logical(LK) function test_pm_distBand::test_getFluenceEnergy_1

Test the integration of both upper and upper tails.

Definition at line 872 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getFluenceEnergy_2()

logical(LK) function test_pm_distBand::test_getFluenceEnergy_2

Test the integration of only the upper tail.

Definition at line 904 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getFluenceEnergy_3()

logical(LK) function test_pm_distBand::test_getFluenceEnergy_3

Test the integration of both upper and lower tails.

Definition at line 560 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getFluenceEnergy_4()

logical(LK) function test_pm_distBand::test_getFluenceEnergy_4

Test the integration of both upper and upper tails with steep slopes.

Definition at line 936 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getFluenceEnergy_6()

logical(LK) function test_pm_distBand::test_getFluenceEnergy_6

Test the integration of when lower limit is larger than upper limit.

Definition at line 592 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getFluenceEnergy_7()

logical(LK) function test_pm_distBand::test_getFluenceEnergy_7

Test with conflicting alpha photon index.

Definition at line 622 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getFluenceEnergy_8()

logical(LK) function test_pm_distBand::test_getFluenceEnergy_8

Test with conflicting alpha < beta photon indices.

Definition at line 652 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getPhotonFlux_1()

logical(LK) function test_pm_distBand::test_getPhotonFlux_1

Definition at line 260 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getPhotonFlux_2()

logical(LK) function test_pm_distBand::test_getPhotonFlux_2

Definition at line 299 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getPhotonFlux_3()

logical(LK) function test_pm_distBand::test_getPhotonFlux_3

Definition at line 339 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getPhotonFlux_4()

logical(LK) function test_pm_distBand::test_getPhotonFlux_4

Definition at line 371 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

test_getPhotonFluxLower_1()

logical(LK) function test_pm_distBand::test_getPhotonFluxLower_1

Definition at line 220 of file test_pm_distBand.F90.

References pm_kind::IK, and pm_kind::RK.

Variable Documentation

BAND_SPEC1

type(BandSpec_type), parameter test_pm_distBand::BAND_SPEC1 = BandSpec_type( epk = 700._RK, alpha = -0.5_RK, beta = -2.5_RK, ebrk = 9.333333333333334e2_RK, coef = 1.178920689527826e5_RK, Limit = [1._RK,10000._RK], photonFluence = 37.226409565894123_RK, energyFluence = 1.195755906912896e4_RK, tolerance = 1.e-7_RK )

Definition at line 41 of file test_pm_distBand.F90.

BAND_SPEC2

type(BandSpec_type), parameter test_pm_distBand::BAND_SPEC2 = BandSpec_type( epk = 700._RK, alpha = -0.5_RK, beta = -2.5_RK, ebrk = 9.333333333333334e2_RK, coef = 1.178920689527826e5_RK, Limit = [1._RK,500._RK], photonFluence = 30.806431300618090_RK, energyFluence = 4.079656304178462e3_RK, tolerance = 1.e-7_RK )

Definition at line 54 of file test_pm_distBand.F90.

BAND_SPEC3

type(BandSpec_type), parameter test_pm_distBand::BAND_SPEC3 = BandSpec_type( epk = 700._RK, alpha = -0.5_RK, beta = -2.5_RK, ebrk = 9.333333333333334e2_RK, coef = 1.178920689527826e5_RK, Limit = [1000._RK,10000._RK], photonFluence = 2.406788327100909_RK, energyFluence = 5.098307740152641e3_RK, tolerance = 1.e-7_RK )

Definition at line 67 of file test_pm_distBand.F90.

BAND_SPEC4

type(BandSpec_type), parameter test_pm_distBand::BAND_SPEC4 = BandSpec_type( epk = 700._RK, alpha = -1.9_RK, beta = -3.5_RK, ebrk = 1.119999999999999e4_RK, coef = 6.079637221508616e5_RK, Limit = [1._RK,10000._RK], photonFluence = 1.108858577351433_RK, energyFluence = 12.769650780448401_RK, tolerance = 1.e-6_RK )

Definition at line 80 of file test_pm_distBand.F90.

test

type(test_type) test_pm_distBand::test

Definition at line 29 of file test_pm_distBand.F90.