val 0.3.6

An arbitrary precision calculator language
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

fn newton_sqrt(x) {
  if (x < 0) {
    println('Cannot compute square root of negative number')
    return 0
  }

  if (x == 0) {
    return 0
  }

  guess = x / 2
  epsilon = 0.0001

  while (abs(guess * guess - x) > epsilon) {
    guess = (guess + x / guess) / 2
  }

  return guess
}

println('Square root of 16 is approximately ' + newton_sqrt(16))
println('Square root of 2 is approximately ' + newton_sqrt(2))