subroutine surface_perturbation::cdfbet |
( |
real(kind=kind_phys), intent(in) | x, |
|
|
real(kind=kind_phys), intent(in) | p, |
|
|
real(kind=kind_phys), intent(in) | q, |
|
|
real(kind=kind_phys), intent(in) | eps, |
|
|
integer | iflag, |
|
|
real(kind=kind_phys), intent(out) | cdfx ) |
|
private |