This code is a helper module that provides various operations on longwave flux variables.
fms_mod
rad_utilities_mod
call longwave_fluxes_init
call longwave_fluxes_ks ( source, trans, source2, trans2, & cld_trans, cld_ind, Lw_diagnostics)
source | source is longwave source function. [real] |
trans | trans is longwve transmittance function [real] |
source2 | source2 is longwave source function [real] |
trans2 | trans2 is longwve transmittance function [real] |
cld_trans | cld_trans is longwave cloud transmittance function [real] |
cld_ind | cld_ind is a lookup table to translate longwave band index to cloud index [real] |
Lw_diagnostics | Lw_diagnostics contains the longwave diagnostics flux values [lw_diagnostics_type] |
call longwave_fluxes_k_down (klevel, source, trans, trans2, & cld_trans, cld_ind, Lw_diagnostics)
klevel | klevel is the starting vertical level to calculate longwave fluxes [integer] |
source | source is longwave flux source function [real] |
trans | trans is longwave flux transmittance function [real] |
trans2 | trans2 is longwave flux transmittance function [real] |
cld_trans | cld_trans is longwave cloud transmittance function [real] |
cld_ind | cld_ind is a lookup table to translate longwave band index to cloud index [real] |
Lw_diagnostics | Lw_diagnostics contains the longwave diagnostics flux values [lw_diagnostics_type] |
call longwave_fluxes_KE_KEp1 (source, trans, trans2, & cld_trans, cld_ind, Lw_diagnostics)
source | source is longwave flux source function [real] |
trans | trans is longwave flux transmittance function [real] |
trans2 | trans2 is longwave flux transmittance function [real] |
cld_trans | cld_trans is longwave cloud transmittance function [real] |
cld_ind | cld_ind is a lookup table to translate longwave band index to cloud index [real] |
Lw_diagnostics | Lw_diagnostics contains the longwave diagnostics flux values [lw_diagnostics_type] |
call longwave_fluxes_diag (source, trans, & cld_trans, cld_ind, Lw_diagnostics)
source | source is longwave flux source function [real] |
trans | trans is longwave flux transmittance function [real] |
cld_trans | cld_trans is longwave cloud transmittance function [real] |
cld_ind | cld_ind is a lookup table to translate longwave band index to cloud index [real] |
Lw_diagnostics | Lw_diagnostics contains the longwave diagnostics flux values [lw_diagnostics_type] |
call longwave_fluxes_sum (is, ie, js, je, flux, NBTRGE, & Lw_diagnostics, fluxcf)
is | Obsolete [integer] |
ie | Obsolete [integer] |
js | Obsolete [integer] |
je | Obsolete [integer] |
NBTRGE | number of longwave flux bands [integer] |
Lw_diagnostics | longwave flux diagnostics [lw_diagnostics_type] |
flux | all sky total longwave flux [real] |
fluxcf | clear sky total longwave flux [real] |