YES

Problem:
 le(0(),y) -> true()
 le(s(x),0()) -> false()
 le(s(x),s(y)) -> le(x,y)
 pred(s(x)) -> x
 minus(x,0()) -> x
 minus(x,s(y)) -> pred(minus(x,y))
 mod(0(),y) -> 0()
 mod(s(x),0()) -> 0()
 mod(s(x),s(y)) -> if_mod(le(y,x),s(x),s(y))
 if_mod(true(),s(x),s(y)) -> mod(minus(x,y),s(y))
 if_mod(false(),s(x),s(y)) -> s(x)

Proof:
 DP Processor:
  DPs:
   le#(s(x),s(y)) -> le#(x,y)
   minus#(x,s(y)) -> minus#(x,y)
   minus#(x,s(y)) -> pred#(minus(x,y))
   mod#(s(x),s(y)) -> le#(y,x)
   mod#(s(x),s(y)) -> if_mod#(le(y,x),s(x),s(y))
   if_mod#(true(),s(x),s(y)) -> minus#(x,y)
   if_mod#(true(),s(x),s(y)) -> mod#(minus(x,y),s(y))
  TRS:
   le(0(),y) -> true()
   le(s(x),0()) -> false()
   le(s(x),s(y)) -> le(x,y)
   pred(s(x)) -> x
   minus(x,0()) -> x
   minus(x,s(y)) -> pred(minus(x,y))
   mod(0(),y) -> 0()
   mod(s(x),0()) -> 0()
   mod(s(x),s(y)) -> if_mod(le(y,x),s(x),s(y))
   if_mod(true(),s(x),s(y)) -> mod(minus(x,y),s(y))
   if_mod(false(),s(x),s(y)) -> s(x)
  TDG Processor:
   DPs:
    le#(s(x),s(y)) -> le#(x,y)
    minus#(x,s(y)) -> minus#(x,y)
    minus#(x,s(y)) -> pred#(minus(x,y))
    mod#(s(x),s(y)) -> le#(y,x)
    mod#(s(x),s(y)) -> if_mod#(le(y,x),s(x),s(y))
    if_mod#(true(),s(x),s(y)) -> minus#(x,y)
    if_mod#(true(),s(x),s(y)) -> mod#(minus(x,y),s(y))
   TRS:
    le(0(),y) -> true()
    le(s(x),0()) -> false()
    le(s(x),s(y)) -> le(x,y)
    pred(s(x)) -> x
    minus(x,0()) -> x
    minus(x,s(y)) -> pred(minus(x,y))
    mod(0(),y) -> 0()
    mod(s(x),0()) -> 0()
    mod(s(x),s(y)) -> if_mod(le(y,x),s(x),s(y))
    if_mod(true(),s(x),s(y)) -> mod(minus(x,y),s(y))
    if_mod(false(),s(x),s(y)) -> s(x)
   graph:
    if_mod#(true(),s(x),s(y)) -> mod#(minus(x,y),s(y)) ->
    mod#(s(x),s(y)) -> if_mod#(le(y,x),s(x),s(y))
    if_mod#(true(),s(x),s(y)) -> mod#(minus(x,y),s(y)) ->
    mod#(s(x),s(y)) -> le#(y,x)
    if_mod#(true(),s(x),s(y)) -> minus#(x,y) ->
    minus#(x,s(y)) -> pred#(minus(x,y))
    if_mod#(true(),s(x),s(y)) -> minus#(x,y) ->
    minus#(x,s(y)) -> minus#(x,y)
    mod#(s(x),s(y)) -> if_mod#(le(y,x),s(x),s(y)) ->
    if_mod#(true(),s(x),s(y)) -> mod#(minus(x,y),s(y))
    mod#(s(x),s(y)) -> if_mod#(le(y,x),s(x),s(y)) ->
    if_mod#(true(),s(x),s(y)) -> minus#(x,y)
    mod#(s(x),s(y)) -> le#(y,x) -> le#(s(x),s(y)) -> le#(x,y)
    minus#(x,s(y)) -> minus#(x,y) ->
    minus#(x,s(y)) -> pred#(minus(x,y))
    minus#(x,s(y)) -> minus#(x,y) -> minus#(x,s(y)) -> minus#(x,y)
    le#(s(x),s(y)) -> le#(x,y) -> le#(s(x),s(y)) -> le#(x,y)
   SCC Processor:
    #sccs: 3
    #rules: 4
    #arcs: 10/49
    DPs:
     if_mod#(true(),s(x),s(y)) -> mod#(minus(x,y),s(y))
     mod#(s(x),s(y)) -> if_mod#(le(y,x),s(x),s(y))
    TRS:
     le(0(),y) -> true()
     le(s(x),0()) -> false()
     le(s(x),s(y)) -> le(x,y)
     pred(s(x)) -> x
     minus(x,0()) -> x
     minus(x,s(y)) -> pred(minus(x,y))
     mod(0(),y) -> 0()
     mod(s(x),0()) -> 0()
     mod(s(x),s(y)) -> if_mod(le(y,x),s(x),s(y))
     if_mod(true(),s(x),s(y)) -> mod(minus(x,y),s(y))
     if_mod(false(),s(x),s(y)) -> s(x)
    Arctic Interpretation Processor:
     dimension: 1
     interpretation:
      [if_mod#](x0, x1, x2) = x1,
      
      [mod#](x0, x1) = x0,
      
      [if_mod](x0, x1, x2) = x0 + x1 + 2x2,
      
      [mod](x0, x1) = x0 + 2x1 + -16,
      
      [minus](x0, x1) = 2x0,
      
      [pred](x0) = x0,
      
      [false] = 2,
      
      [s](x0) = 4x0,
      
      [true] = 4,
      
      [le](x0, x1) = 2x0 + x1,
      
      [0] = 2
     orientation:
      if_mod#(true(),s(x),s(y)) = 4x >= 2x = mod#(minus(x,y),s(y))
      
      mod#(s(x),s(y)) = 4x >= 4x = if_mod#(le(y,x),s(x),s(y))
      
      le(0(),y) = y + 4 >= 4 = true()
      
      le(s(x),0()) = 6x + 2 >= 2 = false()
      
      le(s(x),s(y)) = 6x + 4y >= 2x + y = le(x,y)
      
      pred(s(x)) = 4x >= x = x
      
      minus(x,0()) = 2x >= x = x
      
      minus(x,s(y)) = 2x >= 2x = pred(minus(x,y))
      
      mod(0(),y) = 2y + 2 >= 2 = 0()
      
      mod(s(x),0()) = 4x + 4 >= 2 = 0()
      
      mod(s(x),s(y)) = 4x + 6y + -16 >= 4x + 6y = if_mod(le(y,x),s(x),s(y))
      
      if_mod(true(),s(x),s(y)) = 4x + 6y + 4 >= 2x + 6y + -16 = mod(minus(x,y),s(y))
      
      if_mod(false(),s(x),s(y)) = 4x + 6y + 2 >= 4x = s(x)
     problem:
      DPs:
       mod#(s(x),s(y)) -> if_mod#(le(y,x),s(x),s(y))
      TRS:
       le(0(),y) -> true()
       le(s(x),0()) -> false()
       le(s(x),s(y)) -> le(x,y)
       pred(s(x)) -> x
       minus(x,0()) -> x
       minus(x,s(y)) -> pred(minus(x,y))
       mod(0(),y) -> 0()
       mod(s(x),0()) -> 0()
       mod(s(x),s(y)) -> if_mod(le(y,x),s(x),s(y))
       if_mod(true(),s(x),s(y)) -> mod(minus(x,y),s(y))
       if_mod(false(),s(x),s(y)) -> s(x)
     SCC Processor:
      #sccs: 0
      #rules: 0
      #arcs: 2/1
      
    
    DPs:
     minus#(x,s(y)) -> minus#(x,y)
    TRS:
     le(0(),y) -> true()
     le(s(x),0()) -> false()
     le(s(x),s(y)) -> le(x,y)
     pred(s(x)) -> x
     minus(x,0()) -> x
     minus(x,s(y)) -> pred(minus(x,y))
     mod(0(),y) -> 0()
     mod(s(x),0()) -> 0()
     mod(s(x),s(y)) -> if_mod(le(y,x),s(x),s(y))
     if_mod(true(),s(x),s(y)) -> mod(minus(x,y),s(y))
     if_mod(false(),s(x),s(y)) -> s(x)
    Subterm Criterion Processor:
     simple projection:
      pi(minus#) = 1
     problem:
      DPs:
       
      TRS:
       le(0(),y) -> true()
       le(s(x),0()) -> false()
       le(s(x),s(y)) -> le(x,y)
       pred(s(x)) -> x
       minus(x,0()) -> x
       minus(x,s(y)) -> pred(minus(x,y))
       mod(0(),y) -> 0()
       mod(s(x),0()) -> 0()
       mod(s(x),s(y)) -> if_mod(le(y,x),s(x),s(y))
       if_mod(true(),s(x),s(y)) -> mod(minus(x,y),s(y))
       if_mod(false(),s(x),s(y)) -> s(x)
     Qed
    
    DPs:
     le#(s(x),s(y)) -> le#(x,y)
    TRS:
     le(0(),y) -> true()
     le(s(x),0()) -> false()
     le(s(x),s(y)) -> le(x,y)
     pred(s(x)) -> x
     minus(x,0()) -> x
     minus(x,s(y)) -> pred(minus(x,y))
     mod(0(),y) -> 0()
     mod(s(x),0()) -> 0()
     mod(s(x),s(y)) -> if_mod(le(y,x),s(x),s(y))
     if_mod(true(),s(x),s(y)) -> mod(minus(x,y),s(y))
     if_mod(false(),s(x),s(y)) -> s(x)
    Subterm Criterion Processor:
     simple projection:
      pi(le#) = 1
     problem:
      DPs:
       
      TRS:
       le(0(),y) -> true()
       le(s(x),0()) -> false()
       le(s(x),s(y)) -> le(x,y)
       pred(s(x)) -> x
       minus(x,0()) -> x
       minus(x,s(y)) -> pred(minus(x,y))
       mod(0(),y) -> 0()
       mod(s(x),0()) -> 0()
       mod(s(x),s(y)) -> if_mod(le(y,x),s(x),s(y))
       if_mod(true(),s(x),s(y)) -> mod(minus(x,y),s(y))
       if_mod(false(),s(x),s(y)) -> s(x)
     Qed