;; run with mzscheme -r runme.scm

(load-extension "example.so")

; Call our gcd() function

(define x 42)
(define y 105)
(define g (gcd x y))
(display "The gcd of ")
(display x)
(display " and ")
(display y)
(display " is ")
(display g)
(newline)

; Manipulate the Foo global variable

; Output its current value
(display "Foo = ")
(display (Foo))
(newline)

; Change its value
(Foo 3.1415926)

; See if the change took effect
(display "Foo = ")
(display (Foo))
(newline)