Index | Rundeck: P1SoM40 | Created: Mon May 20 03:30:14 EDT 2024 |
set_n_source_coeff | Module: SET_N_SOURCE_COEFF_MOD | File: set_n_source_coeff.F90 |
Author :
Version:
Declaration:
function set_n_source_coeff(isolir, l_ir_source_quad)
- ip_solar : used from rad_pcf
- lhook : used from yomhook
- dr_hook : used from yomhook
- jprb : used from parkind1
- jpim : used from parkind1
- isolir :
integer, intent(in)
- l_ir_source_quad :
logical, intent(in)
- set_n_source_coeff :
integer
- zhook_in :
integer(kind=jpim), parameter
- Initial Value
= 0
- zhook_out :
integer(kind=jpim), parameter
- Initial Value
= 1
- zhook_handle :
real(kind=jprb)
- routinename :
character(len=*), parameter
- Initial Value
= 'SET_N_SOURCE_COEFF'