; An indented-syntax program importing a package written in the paren
; syntax. main.flan is the other direction.

import geo "geo"

fn far?(a: geo/Pt, b: geo/Pt, limit: i32) -> bool = geo/dist2(a, b) > limit * limit

fn main() -> i32
  let a = geo/pt(1, 2)
  let b = geo/Pt{.x 4, .y 6}
  println(geo/dist2(a, b))
  println(a.x + b.y)
  if far?(a, b, 4)
    println("far")
  else
    println("near")
  let n = 0
  while n < 3
    n += 1
  println(n)
  0