scmdoc

 1;;> This is a library with a record type definition.
 2(define-library (scmdoc record)
 3  (export kons pare? kar set-kar! kdr)
 4
 5  (begin
 6    ;;> This is my custom record type
 7    (define-record-type pare
 8      ;;> Create a new pare.
 9      (kons x y)
10      ;;> Predicate to check if the given `obj` is a pare.
11      pare?
12      (x
13        ;;> Obtain the first element of the pare.
14        kar
15        ;;> Modify the first element of the pare.
16        set-kar!)
17      (y
18        ;;> Obtain the second element of the pare.
19        kdr))))