subroutine, private noahmp_glacier_routines::error_glacier ( integer, intent(in)  iloc, integer, intent(in)  jloc, real, intent(in)  swdown, real, intent(in)  fsa, real, intent(in)  fsr, real, intent(in)  fira, real, intent(in)  fsh, real, intent(in)  fgev, real, intent(in)  ssoil, real, intent(in)  sag, real, intent(in)  prcp, real, intent(in)  edir,   ifdef,   CCPP  )

private

Referenced by noahmp_glacier().