subroutine sfc_nst_pre::sfc_nst_pre_run |
( |
integer, intent(in) | im, |
|
|
logical, dimension(:), intent(in) | wet, |
|
|
real (kind=kind_phys), intent(in) | tgice, |
|
|
real (kind=kind_phys), dimension(:), intent(in) | tsfco, |
|
|
real (kind=kind_phys), dimension(:), intent(inout) | tsurf_wat, |
|
|
real (kind=kind_phys), dimension(:), intent(inout) | tseal, |
|
|
real (kind=kind_phys), dimension(:), intent(in), optional | xt, |
|
|
real (kind=kind_phys), dimension(:), intent(in), optional | xz, |
|
|
real (kind=kind_phys), dimension(:), intent(in), optional | dt_cool, |
|
|
real (kind=kind_phys), dimension(:), intent(in), optional | z_c, |
|
|
real (kind=kind_phys), dimension(:), intent(inout), optional | tref, |
|
|
logical, intent(in) | cplflx, |
|
|
real (kind=kind_phys), dimension(:), intent(in) | oceanfrac, |
|
|
integer, intent(in) | nthreads, |
|
|
character(len=*), intent(out) | errmsg, |
|
|
integer, intent(out) | errflg ) |