Index | Rundeck: P1SoM40 | Created: Mon May 20 03:30:14 EDT 2024 |
gauss_angle | Module: | File: gauss_angle.F90 |
Author :
Version:
Declaration:
subroutine gauss_angle(n_profile, n_layer &
- realk : used from realtype_rd
- pi : used from rad_ccf
- gauss_weight : used from gaussian_weight_pcf
- gauss_point : used from gaussian_weight_pcf
- lhook : used from yomhook
- dr_hook : used from yomhook
- jprb : used from parkind1
- jpim : used from parkind1
- 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
= 'GAUSS_ANGLE'