#lang racket (require "tnetstrings.rkt") (define-struct dude (name age strength)) (define (write-dude/tnetstring dude) ())