Add utility to print bril from a CVar program

print-rvar-to-bril.rkt

@@ -0,0 +1,17 @@
+#lang racket
+
+(provide print-rvar-bril)
+
+(require (prefix-in bril: bril/lang))
+(require "cvar-to-bril.rkt")
+(require "uniquify.rkt")
+(require "remove-complex-oper.rkt")
+(require "explicate-control.rkt")
+(require "rvar.rkt")
+
+(define (print-rvar-bril program)
+ (bril:write-bril
+  (cvar-to-bril
+   (explicate-control
+    (remove-complex-opera*-2
+     (uniquify program))))))