Object Orientation in Scala

From Martin Oder’s Scala course, I have the following exercise (this is a video exercise that answers):

"Provide an implementation of the abstract class Nat, which represents non-negative integers

Do not use standard references in this implementation. Rather, implement a sub-object and subclass.

One for the number zero, the other for strictly saturated numbers. "

Here is the code:

abstract class Nat {
  def isZero : scala.Boolean
  def predecessor : Nat
  def successor = new Succ(this)
  def + (that : Nat) : Nat
  def - (that : Nat) : Nat
}

object Zero extends Nat {
  def isZero = true
  def predecessor = throw new Error("0.predecessor")
  def + (that: Nat) = that
  def - (that: Nat) = if(that.isZero) this else throw new Error("negative number")
}

class Succ(n : Nat) extends Nat {
  def isZero = false
  def predecessor = n
  def +(that : Nat) = new Succ(n + that)
  def -(that: Nat) = n - that.predecessor
}

In the Scala sheet, I have:

object NatTests {
  new Successor(Zero).+(new Successor(Zero))  
}

Which brings back the new Suzerson. I don’t think I fully understand this code, so how can I add non-zero objects without a code extension? If so, how is this achieved?

+5
source share
3 answers

/ Nat, Zero Succ. natObj Nat new Succ(natObject), , , natObj .

, , :

abstract class Nat {
  def isZero : Boolean
  def predecessor : Nat
  def successor = new Succ(this)
  def + (that : Nat) : Nat
  def - (that : Nat) : Nat
}

object Zero extends Nat {
  def isZero = true
  def predecessor = throw new Error("0.predecessor")
  def + (that: Nat) = that
  def - (that: Nat) = if(that.isZero) this else throw new Error("negative number")

  override def toString = "0 => Zero"
}

class Succ(n : Nat) extends Nat {
  def isZero = false
  def predecessor = n
  def + (that : Nat) = new Succ(n + that)
  def - (that: Nat) = if (that.isZero) this else n - that.predecessor

  override def toString = {
    def findNumber(nat: Nat): Int = 
      if (nat.isZero) 0 
      else 1 + findNumber(nat.predecessor)
    val number = findNumber(this)
    String.valueOf(number) + " => " + 
            ((1 to number) fold ("Zero")) ( (s,_) => "Succ(" + s + ")")
  }
}

Scala , , :

object NatTests extends App {
  val nat0 = Zero                                 
  val nat1 = new Succ(Zero)                       
  val nat2 = new Succ(nat1) // or new Succ(new Succ(Zero))
  val nat3 = new Succ(nat2) // or new Succ(new Succ(new Succ(Zero)))

  println(nat0)             //> 0 => Zero
  println(nat1)             //> 1 => Succ(Zero)
  println(nat2)             //> 2 => Succ(Succ(Zero))
  println(nat3)             //> 3 => Succ(Succ(Succ(Zero)))
  println(nat2 + nat2)      //> 4 => Succ(Succ(Succ(Succ(Zero))))
  println(nat3 + nat2)      //> 5 => Succ(Succ(Succ(Succ(Succ(Zero)))))
}
+3

, ,

, -

def +(that : Nat) = (this.predecessor + that.successor)
def -(that: Nat) = if (that.isZero) this else (this.predecessor - that.predecessor) 

, , .

0

:

sealed trait Nat {
  def isZero : scala.Boolean
  def predecessor : Nat
  def successor = Succ(this)
  def + (that : Nat) : Nat
  def - (that : Nat) : Nat  = 
       if (that.isZero) this else this.predecessor - that.predecessor
}

case object Zero extends Nat {
  def isZero = true
  def predecessor = sys.error("predecessor of zero")
  def + (that: Nat) = that
}

case class Succ(predecessor : Nat) extends Nat {
  def isZero = false
  def +(that : Nat) = this.predecessor + that.successor
}
0

All Articles