Go to the source code of this file.
|
subroutine, public | azimuth_emissivity_f6_module::azimuth_emissivity_f6 (AZCoeff, Wind_Speed, Azimuth_Angle, Frequency, Zenith_Angle, e_Azimuth, iVar) |
|
subroutine, public | azimuth_emissivity_f6_module::azimuth_emissivity_f6_tl (AZCoeff, Wind_Speed_TL, Azimuth_Angle_TL, e_Azimuth_TL, iVar) |
|
subroutine, public | azimuth_emissivity_f6_module::azimuth_emissivity_f6_ad (AZCoeff, e_Azimuth_AD, Wind_Speed_AD, Azimuth_Angle_AD, iVar) |
|
|
character(*), parameter | azimuth_emissivity_f6_module::module_version_id = '$Id: Azimuth_Emissivity_F6_Module.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $' |
|
real(fp), parameter | azimuth_emissivity_f6_module::zero = 0.0_fp |
|
real(fp), parameter | azimuth_emissivity_f6_module::point5 = 0.5_fp |
|
real(fp), parameter | azimuth_emissivity_f6_module::one = 1.0_fp |
|
real(fp), parameter | azimuth_emissivity_f6_module::two = 2.0_fp |
|
real(fp), parameter | azimuth_emissivity_f6_module::three = 3.0_fp |
|
real(fp), parameter | azimuth_emissivity_f6_module::four = 4.0_fp |
|
real(fp), parameter | azimuth_emissivity_f6_module::pi = 3.141592653589793238462643383279_fp |
|
real(fp), parameter | azimuth_emissivity_f6_module::degrees_to_radians = PI / 180.0_fp |
|
integer, parameter | azimuth_emissivity_f6_module::n_stokes = 2 |
|
integer, parameter | azimuth_emissivity_f6_module::ivpol = 1 |
|
integer, parameter | azimuth_emissivity_f6_module::ihpol = 2 |
|
integer, parameter | azimuth_emissivity_f6_module::n_frequencies = 6 |
|
real(fp), dimension(n_frequencies), parameter | azimuth_emissivity_f6_module::fit_frequency = [ 6.925_fp, 10.65_fp, 18.7_fp, 23.8_fp, 36.5_fp, 89.0_fp ] |
|
real(fp), parameter | azimuth_emissivity_f6_module::wind_speed_max18 = 18.0_fp |
|
real(fp), parameter | azimuth_emissivity_f6_module::wind_speed_max15 = 15.0_fp |
|
real(fp), parameter | azimuth_emissivity_f6_module::frequency_max37 = 37.0_fp |
|
real(fp), parameter | azimuth_emissivity_f6_module::xs11 = TWO |
|
real(fp), parameter | azimuth_emissivity_f6_module::xs12 = TWO |
|
real(fp), parameter | azimuth_emissivity_f6_module::xs21 = ONE |
|
real(fp), parameter | azimuth_emissivity_f6_module::xs22 = FOUR |
|
real(fp), parameter | azimuth_emissivity_f6_module::theta_ref = 55.2_fp |
|