Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(KORC_PARAMS), | intent(in) | :: | params | |||
type(SPECIES), | intent(inout) | :: | spp |
SUBROUTINE get_Hollmann_distribution(params,spp)
TYPE(KORC_PARAMS), INTENT(IN) :: params
TYPE(SPECIES), INTENT(INOUT) :: spp
! REAL(rp), DIMENSION(:), ALLOCATABLE, INTENT(INOUT) :: g
! REAL(rp), DIMENSION(:), ALLOCATABLE, INTENT(INOUT) :: eta
! REAL(rp), INTENT(OUT) :: go
! REAL(rp), INTENT(OUT) :: etao
call initialize_Hollmann_params(params)
call save_Hollmann_params(params)
call sample_Hollmann_distribution(params,spp)
END SUBROUTINE get_Hollmann_distribution