Source code example_1

source code examples for geological columnar section

Simple columnar section

code sample on Gist

#gCS_sampleColor.tcl
#@VAR
namespace eval ::gCS {
	#variable _SIZE {width height};
	variable _SIZE {250 314};
	#
	#variable _FONT {CSS_font_value};
	variable _FONT {1em Times New Roman};
	#
	#variable; _TITLE {title_text};
	variable _TITLE {Southern part of Shiroyama Park Ehime color};
	#
	#variable _SCALE {scaleLabel width height};
	variable _SCALE {10m 10 50};
	#
	#===============================================
	#variable stratumName {standardWidth color|filePath};
	variable muddy_sandS {20 \#3399ff};
	variable alt_sandS_mudS {40 \#009933};
	variable sandS {60 \#ffff00};
	variable conglomerate {100 \#663300};
};
#@VAR
#stratumName:dy ?dx1 dx2?:text??;
#"---" indicates no data over given thickness
#@FIG
#sandS:7.5 0 0;
#---:59 0 0:No data;
#muddy_sandS:24 0 0;
#---:15;
#sandS:20 0 0;
#---:15 0 0;
#alt_sandS_mudS:97.5 0 0;
#---:14 0 0;
#sandS:56.5 0 0;
#conglomerate:2.5 0 0:Base conglomerate;
#@FIG
#@TXT
#General columnar section of the Southern part of Shiroyama Park, Ehime prefecture, Japan.
#This columnar section is based on the route columnar sections by Sode (2008-10-28 to 2009-01-04).
#@TXT

Result