Go to the source code of this file.
|
| subroutine | surface_cd (PRI, PZREF, PUREF, PZ0EFF, PZ0H, PCD, PCDN) |
| |
◆ surface_cd()
| subroutine surface_cd |
( |
real, dimension(:), intent(in) |
PRI, |
|
|
real, dimension(:), intent(in) |
PZREF, |
|
|
real, dimension(:), intent(in) |
PUREF, |
|
|
real, dimension(:), intent(in) |
PZ0EFF, |
|
|
real, dimension(:), intent(in) |
PZ0H, |
|
|
real, dimension(:), intent(out) |
PCD, |
|
|
real, dimension(:), intent(out) |
PCDN |
|
) |
| |