This is racket and is using plait as the language

The following Tree datatype implements a binary tree with a number in each node and leaf:

(define-type Tree

(leaf [val : Number])

(node [val : Number]

[left : Tree]

[right : Tree]))

How would I go about implementing a sum function that takes the tree and outputs the sum of the numbers in that tree?

Any help is appreciated! Thanks!