#lang scheme/signature ;; type: [VM X] make-visible ;; [Matrix X] -> [VM X] visible-matrix ;; [VM X] -> [Matrix M] visible? ;; Any -> Boolean