| 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 ) |