Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
real(kind=krs), | public | :: | fdc | ||||
real(kind=krs), | public | :: | ftt | ||||
real(kind=krs), | public | :: | qtf(4) | ||||
real(kind=krs), | public | :: | gtc | ||||
real(kind=krs), | public | :: | atf(4) |
setup truncation parameter lookup table for geometrical truncated phase matrices
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(DeltaGeom_Vector_T), | intent(out) | :: | Geom | |||
real(kind=krs), | intent(in) | :: | csa(:) | |||
real(kind=krs), | intent(in) | :: | ang(:) | |||
real(kind=krs), | intent(in) | :: | cump(:,:) | |||
real(kind=krs), | intent(in) | :: | phs(:,:) | |||
real(kind=krs), | intent(in) | :: | pdf(:,:) | |||
real(kind=krs), | intent(in) | :: | dph(:,:) | |||
real(kind=krs), | intent(in) | :: | g1 | |||
real(kind=krs), | intent(in) | :: | fde |
calculate maximum value of delta fraction for geometrical truncated phase matrices
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(DeltaGeom_Vector_T), | intent(out) | :: | Geom | |||
real(kind=krs), | intent(in) | :: | cosa(:) | |||
real(kind=krs), | intent(in) | :: | ang(:) | |||
real(kind=krs), | intent(in) | :: | phs(:,:) | |||
real(kind=krs), | intent(in) | :: | pdf(:,:) | |||
real(kind=krs), | intent(in) | :: | dph(:,:) | |||
real(kind=krs), | intent(in) | :: | g1 | |||
real(kind=krs), | intent(in), | optional | :: | qmax | ||
real(kind=krs), | intent(in), | optional | :: | phsmin | ||
real(kind=krs), | intent(out) | :: | fdmax |
pick scattering angle from Flat truncated phase matrices randomly using the inverse methods
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(DeltaFlat_Vector_T), | intent(in) | :: | DeltaGeom | |||
real(kind=krs), | intent(out) | :: | q | |||
real(kind=krs), | intent(out) | :: | sinq | |||
real(kind=krs), | intent(out) | :: | cosq |
calculate angular distribution function of Flat truncated phase matrices
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(DeltaFlat_Vector_T), | intent(in) | :: | DeltaGeom | |||
real(kind=krs), | intent(in) | :: | q | |||
integer(kind=kis), | intent(in) | :: | istokes |
initialize necessary parameters of Flat truncated phase matrices for non-truncation case
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(DeltaFlat_Vector_T), | intent(out) | :: | geom | |||
real(kind=krs), | intent(in) | :: | g1 |
calculate truncation parameters of Flat truncated phase matrices
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(DeltaFlat_Vector_T), | intent(inout) | :: | geom | |||
real(kind=krs), | intent(in) | :: | g1 | |||
real(kind=krs), | intent(in) | :: | g0f | |||
real(kind=krs), | intent(in) | :: | g1f | |||
real(kind=krs), | intent(in) | :: | angf | |||
real(kind=krs), | intent(in) | :: | cosf | |||
real(kind=krs), | intent(in) | :: | phsf | |||
real(kind=krs), | intent(in) | :: | dphf | |||
real(kind=krs), | intent(out) | :: | fdel | |||
logical, | intent(in) | :: | is_save | |||
integer(kind=kis), | intent(in) | :: | istokes |