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 |