subroutine gfs_radiation_surface::gfs_radiation_surface_init | ( | integer, intent(in) | me, |
integer, intent(in) | ialb, | ||
integer, intent(in) | iems, | ||
character(len=26), intent(in) | semis_file, | ||
real(kind_phys), intent(in) | con_pi, | ||
character(len=*), intent(out) | errmsg, | ||
integer, intent(out) | errflg | ||
) |