Opal (programming language)
Jump to navigation Jump to search
This is an example OPAL program, which calculates the GCD recursively.
- Signature file (declaration)
SIGNATURE GCD FUN GCD: nat ** nat -> nat
- Implementation file (definition)
IMPLEMENTATION GCD IMPORT Nat COMPLETELY DEF GCD(a,b) == IF a % b = 0 THEN b ELSE IF a-b < b THEN GCD(b,a-b) ELSE GCD(a-b,b) FI FI
|This programming-language-related article is a stub. You can help Wikipedia by expanding it.|