encoding utf-8 source marniosa_upstream_4.th export map -proj plan -layout local -o marniosa_upstream-4.pdf export map -proj extended -layout local -o marniosa_upstream-4E.pdf layout local symbol-set BCRA map-comment "Tresviso Caves Project www.tresvisocaves.info" map-header 50 100 sw legend off #legend-width 15 cm # printed size, based on scale #scale-bar 50 m #scale 1 500 #base-scale 1 500 # Achieves nice narrow lines #overlap 1 cm # margin sizem default 1cm #grid bottom #grid-size 50 50 50 m symbol-hide group cave-centreline symbol-hide line border symbol-assign area flowstone TEST debug off symbol-colour area water [25 50 100] #colour map-fg altitude colour map-fg [80 80 80] colour map-bg [70 90 70] code metapost initsymbol ("a_flowstone_TEST"); beginpattern(pattern_flowstone_TEST); pickup PenC;​ p:=(-.25u,0){dir -60} .. {dir 60}(0.25u,0);​ draw p;​ draw p shifted (0.35u,0.4u);​ patternxstep(0.9u);​ patternystep(0.30u);​ endpattern; def a_flowstone_TEST (expr Path) = T:=identity;​ thclean Path;​ thfill Path withpattern pattern_flowstone_TEST;​ enddef; endcode endlayout