diff --git a/feasibility_analysis/gui/windows2.rkt b/feasibility_analysis/gui/windows2.rkt
new file mode 100644
index 0000000..3f60c80
--- /dev/null
+++ b/feasibility_analysis/gui/windows2.rkt
@@ -0,0 +1,15 @@
+#lang racket
+
+(require racket/gui/base)
+
+(define frame (new frame%
+                   [label "Example"]
+                   [width 300]
+                   [height 300]))
+(new canvas% [parent frame]
+             [paint-callback
+               (lambda (canvas dc)
+                 (send dc set-scale 3 3)
+                 (send dc set-text-foreground "blue")
+                 (send dc draw-text "Don't Panic!" 0 0))])
+(send frame show #t)