SUBROUTINE RADMAXWIND(RMW,Pmin,yLAT,xLON,EPSILON)
      CONV = 1.1515555		! convert Naut Miles to Stat Miles

      deltaP = 1013. - Pmin
      TERM1 = 2.61367694542488
      TERM2 =  .0160549083534979*deltaP
      TERM3 = -.000172617750926259*deltaP*deltaP
      TERM4 = -.0157954510660923*xLON
      TERM5 =  .0490766279964485*yLAT
      ONENT = TERM1 + TERM2 + TERM3 + TERM4 + TERM5
      RMW = EXP(ONENT) + EPSILON
      RMW = RMW * CONV			! convert from N MI to statute mi
      IF(RMW.GT.63.5)RMW = 63.5
      IF(RMW.LT.4.6) RMW = 4.6
      RETURN
      END