Add files via upload

gCS_template.tcl

@@ -0,0 +1,21 @@
+#gCS_template.tcl
+#@VAR
+namespace eval ::gCS {
+	#variable _SIZE {width height};
+	#
+	#variable _FONT {CSS_font_value};
+	#
+	#variable; _TITLE {title_text};
+	#
+	#variable _SCALE {scaleLabel width height};
+	#
+	#===============================================
+	#variable stratumName {standardWidth color|filePath};
+};
+#@VAR
+#stratumName:dy ?dx1 dx2?:text??;
+#"---" indicates no data over given thickness
+#@FIG
+#@FIG
+#@TXT
+#@TXT