subroutine __noahmpdrv_f90__::noahmpdrv_init |
( |
integer, intent(in) | lsm, |
|
|
integer, intent(in) | lsm_noahmp, |
|
|
integer, intent(in) | me, |
|
|
integer, intent(in) | isot, |
|
|
integer, intent(in) | ivegsrc, |
|
|
integer, intent(in) | nlunit, |
|
|
real (kind=kind_phys), dimension(:), intent(out) | pores, |
|
|
real (kind=kind_phys), dimension(:), intent(out) | resid, |
|
|
logical, intent(in) | do_mynnsfclay, |
|
|
logical, intent(in) | do_mynnedmf, |
|
|
character(len=*), intent(out) | errmsg, |
|
|
integer, intent(out) | errflg, |
|
|
type(land_iau_control_type), intent(inout), optional | land_iau_control, |
|
|
type(land_iau_external_data_type), intent(inout), optional | land_iau_data, |
|
|
type(land_iau_state_type), intent(inout), optional | land_iau_state ) |
|
private |