layout extra_points
	# C��digos metapost para defini����o de s��mbolos extra
	code metapost
		picture notwheelchair_raw;
		notwheelchair_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (591.965027,447.699005)..controls (591.965027,295.476990) and (465.324005,172.074005)..(309.105011,172.074005)
				..controls (152.891006,172.074005) and (26.250000,295.476990)..(26.250000,447.699005)
				..controls (26.250000,599.921997) and (152.891006,723.323975)..(309.105011,723.323975)
				..controls (465.324005,723.323975) and (591.965027,599.921997)..(591.965027,447.699005)
				--cycle withcolor white;
			fill (260.250000,282.113007)..controls (248.195007,283.492004) and (243.151993,284.300995)..(236.863007,285.871002)
				..controls (185.647995,298.648010) and (145.852005,340.722992)..(137.608994,390.808990)
				..controls (128.695007,444.988007) and (155.022995,497.621002)..(204.750000,525.034973)
				..controls (218.397995,532.554993) and (225.742004,534.898010)..(231.688004,533.625000)
				..controls (240.770004,531.676025) and (246.276993,523.551025)..(244.414001,514.851990)
				..controls (243.272995,509.546997) and (239.714996,505.906006)..(232.733994,502.910004)
				..controls (203.906006,490.539001) and (183.820007,469.671997)..(174.104996,442.011993)
				..controls (170.434006,431.566010) and (169.188004,423.738007)..(169.223007,411.433990)
				..controls (169.276993,394.613007) and (172.070007,382.855011)..(179.453003,368.398010)
				..controls (193.070007,341.734009) and (218.542999,322.542999)..(249.375000,315.722992)
				..controls (257.585999,313.906006) and (277.851990,313.507996)..(286.500000,314.992004)
				..controls (326.503998,321.859009) and (357.753998,349.492004)..(368.660004,387.632996)
				..controls (370.539001,394.207001) and (372.628998,397.679993)..(376.156006,400.097992)
				..controls (381.507996,403.765991) and (387.429993,403.855011)..(393.906006,400.375000)
				..controls (402.406006,395.808990) and (403.757996,388.308990)..(398.738007,373.558990)
				..controls (395.742004,364.742004) and (389.175995,350.457001)..(385.296997,344.308990)
				..controls (365.308990,312.625000) and (332.300995,290.769989)..(294.000000,283.851990)
				..controls (286.496002,282.496002) and (266.089996,281.445007)..(260.250000,282.113007)
				--cycle;
			fill (467.046997,312.886993)..controls (460.328003,314.953003) and (459.062988,316.832001)..(429.351990,368.847992)
				--(401.625000,417.390991)--(350.574005,417.410004)..controls (294.496002,417.433990) and (295.515991,417.359009)..(288.488007,422.011993)
				..controls (283.910004,425.042999) and (280.011993,430.167999)..(278.609009,435.000000)
				..controls (276.437988,442.480011) and (255.000000,547.281006)..(255.000000,550.418030)
				..controls (255.000000,561.828003) and (262.167999,572.448975)..(273.425995,577.723022)
				..controls (277.445007,579.604980) and (278.671997,579.804993)..(286.125000,579.804993)
				..controls (293.894989,579.804993) and (294.664001,579.664001)..(299.304993,577.395020)
				..controls (305.285004,574.468994) and (311.304993,568.382996)..(313.964996,562.573975)
				..controls (314.996002,560.312988) and (316.761993,553.648010)..(317.878998,547.762024)
				--(319.914001,537.054993)--(388.125000,536.304993)--(391.703003,534.203003)
				..controls (396.632996,531.304993) and (399.203003,527.210999)..(399.609009,521.612976)
				..controls (400.128998,514.421997) and (397.351990,509.363007)..(391.207001,506.300995)
				--(387.457001,504.429993)--(326.972992,504.429993)--(327.367004,502.742004)
				..controls (327.582001,501.816010) and (329.292999,493.460999)..(331.167999,484.179993)
				..controls (333.039001,474.898010) and (334.757996,466.558990)..(334.984009,465.644989)
				--(335.398010,463.984009)--(373.781006,463.769989)--(412.160004,463.554993)
				--(417.015991,461.164001)..controls (419.687988,459.847992) and (422.953003,457.652008)..(424.273010,456.289001)
				..controls (427.167999,453.292999) and (490.937988,342.886993)..(492.855011,337.554993)
				..controls (495.515991,330.144989) and (493.949005,323.308990)..(488.285004,317.644989)
				..controls (482.695007,312.054993) and (475.207001,310.378998)..(467.046997,312.886993)
				--cycle;
			fill (265.523010,590.382996)..controls (252.574005,593.862976) and (241.207001,605.551025)..(238.147995,618.534973)
				..controls (235.007996,631.851990) and (238.602005,644.034973)..(248.625000,654.059021)
				..controls (257.054993,662.492004) and (267.546997,666.476990)..(278.589996,665.445007)
				..controls (291.546997,664.237976) and (304.082001,655.718994)..(309.386993,644.520020)
				..controls (316.609009,629.265991) and (313.773010,612.031006)..(302.121002,600.395020)
				..controls (299.457001,597.734009) and (295.539001,594.612976)..(293.414001,593.460999)
				..controls (286.046997,589.465027) and (273.917999,588.125000)..(265.523010,590.382996)
				--cycle;
			fill (481.250000,197.550995)..controls (482.925995,198.742004) and (488.730011,203.207001)..(494.148010,207.477005)
				..controls (585.690979,279.574005) and (628.534973,396.152008)..(605.468994,510.375000)
				..controls (598.546997,544.637024) and (587.534973,573.164001)..(569.078003,604.640991)
				..controls (551.426025,634.745972) and (533.632996,656.590027)..(508.593994,678.882996)
				..controls (426.164001,752.270020) and (312.156006,775.796997)..(207.011993,741.112976)
				..controls (184.641006,733.734009) and (175.645004,729.515991)..(149.039001,713.929993)
				..controls (122.433998,698.348022) and (114.351997,692.562988)..(96.976601,676.659973)
				..controls (9.855470,596.937988) and (-24.203100,475.480011)..(8.941410,362.707001)
				..controls (16.246099,337.839996) and (24.953100,317.933990)..(39.003899,293.945007)
				..controls (57.386700,262.554993) and (76.851601,239.078003)..(103.535004,216.102005)
				..controls (184.238007,146.617004) and (294.851990,123.917999)..(396.695007,155.945007)
				..controls (419.683990,163.171997) and (430.769989,168.151993)..(455.578003,182.395004)
				..controls (468.019989,189.539001) and (479.570007,196.358994)..(481.250000,197.550995)
				--cycle--(277.601990,213.636993)..controls (233.565994,218.679993) and (193.539001,235.098007)..(157.531006,262.871002)
				..controls (147.410004,270.679993) and (125.598000,292.492004)..(117.789001,302.613007)
				..controls (84.257797,346.082001) and (67.269501,395.371002)..(67.273399,449.175995)
				..controls (67.273399,487.957001) and (75.441399,522.137024)..(92.996101,556.831970)
				..controls (98.546898,567.809021) and (111.301003,588.296997)..(112.578003,588.296997)
				..controls (113.430000,588.296997) and (443.218994,258.511993)..(443.218994,257.660004)
				..controls (443.218994,256.382996) and (422.730011,243.632996)..(411.750000,238.078003)
				..controls (385.773010,224.934006) and (359.667999,216.996002)..(331.425995,213.656006)
				..controls (318.093994,212.078003) and (291.273010,212.070007)..(277.601990,213.632996)
				--cycle--(328.210999,473.515991)--(162.276993,639.448975)--(173.772995,647.090027)
				..controls (195.973007,661.848022) and (226.550995,674.929993)..(251.934006,680.520020)
				..controls (271.328003,684.793030) and (279.609009,685.585999)..(304.515991,685.559021)
				..controls (330.675995,685.526978) and (342.062988,684.237976)..(362.359009,679.000000)
				..controls (387.902008,672.409973) and (413.476990,661.065979)..(434.562988,646.968994)
				..controls (449.218994,637.168030) and (456.722992,631.085999)..(469.609009,618.551025)
				..controls (506.695007,582.473022) and (530.120972,537.034973)..(538.559021,484.800995)
				..controls (541.000000,469.695007) and (541.581970,439.566010)..(539.745972,423.511993)
				..controls (535.359009,385.167999) and (522.723022,350.160004)..(501.964996,318.828003)
				..controls (497.867004,312.640991) and (494.429993,307.582001)..(494.328003,307.582001)
				..controls (494.226990,307.582001) and (419.472992,382.250000)..(328.210999,473.515991)
				--cycle withcolor red;
		);
		picture notwheelchair;
		notwheelchair := notwheelchair_raw shifted (-(llcorner notwheelchair_raw)-(urcorner notwheelchair_raw - llcorner notwheelchair_raw)/2) scaled (u / max((xpart urcorner notwheelchair_raw) - (xpart llcorner notwheelchair_raw), (ypart urcorner notwheelchair_raw) - (ypart llcorner notwheelchair_raw)));

		def p_u_notwheelchair(expr pos, theta, sc, al) =
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw notwheelchair;
		enddef;

		picture wheelchair_raw;
		wheelchair_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (260.250000,282.113007)..controls (248.195007,283.492004) and (243.151993,284.300995)..(236.863007,285.871002)
				..controls (185.647995,298.648010) and (145.852005,340.722992)..(137.608994,390.808990)
				..controls (128.695007,444.988007) and (155.022995,497.621002)..(204.750000,525.034973)
				..controls (218.397995,532.554993) and (225.742004,534.898010)..(231.688004,533.625000)
				..controls (240.770004,531.676025) and (246.276993,523.551025)..(244.414001,514.851990)
				..controls (243.272995,509.546997) and (239.714996,505.906006)..(232.733994,502.910004)
				..controls (203.906006,490.539001) and (183.820007,469.671997)..(174.104996,442.011993)
				..controls (170.434006,431.566010) and (169.188004,423.738007)..(169.223007,411.433990)
				..controls (169.276993,394.613007) and (172.070007,382.855011)..(179.453003,368.398010)
				..controls (193.070007,341.734009) and (218.542999,322.542999)..(249.375000,315.722992)
				..controls (257.585999,313.906006) and (277.851990,313.507996)..(286.500000,314.992004)
				..controls (326.503998,321.859009) and (357.753998,349.492004)..(368.660004,387.632996)
				..controls (370.539001,394.207001) and (372.628998,397.679993)..(376.156006,400.097992)
				..controls (381.507996,403.765991) and (387.429993,403.855011)..(393.906006,400.375000)
				..controls (402.406006,395.808990) and (403.757996,388.308990)..(398.738007,373.558990)
				..controls (395.742004,364.742004) and (389.175995,350.457001)..(385.296997,344.308990)
				..controls (365.308990,312.625000) and (332.300995,290.769989)..(294.000000,283.851990)
				..controls (286.496002,282.496002) and (266.089996,281.445007)..(260.250000,282.113007)
				--cycle;
			fill (467.046997,312.886993)..controls (460.328003,314.953003) and (459.062988,316.832001)..(429.351990,368.847992)
				--(401.625000,417.390991)--(350.574005,417.410004)..controls (294.496002,417.433990) and (295.515991,417.359009)..(288.488007,422.011993)
				..controls (283.910004,425.042999) and (280.011993,430.167999)..(278.609009,435.000000)
				..controls (276.437988,442.480011) and (255.000000,547.281006)..(255.000000,550.418030)
				..controls (255.000000,561.828003) and (262.167999,572.448975)..(273.425995,577.723022)
				..controls (277.445007,579.604980) and (278.671997,579.804993)..(286.125000,579.804993)
				..controls (293.894989,579.804993) and (294.664001,579.664001)..(299.304993,577.395020)
				..controls (305.285004,574.468994) and (311.304993,568.382996)..(313.964996,562.573975)
				..controls (314.996002,560.312988) and (316.761993,553.648010)..(317.878998,547.762024)
				--(319.914001,537.054993)--(388.125000,536.304993)--(391.703003,534.203003)
				..controls (396.632996,531.304993) and (399.203003,527.210999)..(399.609009,521.612976)
				..controls (400.128998,514.421997) and (397.351990,509.363007)..(391.207001,506.300995)
				--(387.457001,504.429993)--(326.972992,504.429993)--(327.367004,502.742004)
				..controls (327.582001,501.816010) and (329.292999,493.460999)..(331.167999,484.179993)
				..controls (333.039001,474.898010) and (334.757996,466.558990)..(334.984009,465.644989)
				--(335.398010,463.984009)--(373.781006,463.769989)--(412.160004,463.554993)
				--(417.015991,461.164001)..controls (419.687988,459.847992) and (422.953003,457.652008)..(424.273010,456.289001)
				..controls (427.167999,453.292999) and (490.937988,342.886993)..(492.855011,337.554993)
				..controls (495.515991,330.144989) and (493.949005,323.308990)..(488.285004,317.644989)
				..controls (482.695007,312.054993) and (475.207001,310.378998)..(467.046997,312.886993)
				--cycle;
			fill (265.523010,590.382996)..controls (252.574005,593.862976) and (241.207001,605.551025)..(238.147995,618.534973)
				..controls (235.007996,631.851990) and (238.602005,644.034973)..(248.625000,654.059021)
				..controls (257.054993,662.492004) and (267.546997,666.476990)..(278.589996,665.445007)
				..controls (291.546997,664.237976) and (304.082001,655.718994)..(309.386993,644.520020)
				..controls (316.609009,629.265991) and (313.773010,612.031006)..(302.121002,600.395020)
				..controls (299.457001,597.734009) and (295.539001,594.612976)..(293.414001,593.460999)
				..controls (286.046997,589.465027) and (273.917999,588.125000)..(265.523010,590.382996)
				--cycle;
		);
		picture wheelchair;
		wheelchair := wheelchair_raw shifted (-(llcorner wheelchair_raw)-(urcorner wheelchair_raw - llcorner wheelchair_raw)/2) scaled (u / max((xpart urcorner wheelchair_raw) - (xpart llcorner wheelchair_raw), (ypart urcorner wheelchair_raw) - (ypart llcorner wheelchair_raw)));

		def p_u_wheelchair(expr pos, theta, sc, al) =
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw wheelchair;
		enddef;

		picture walkway_raw;
	 	walkway_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (100.746002,152.141006)..controls (107.078003,151.656006) and (112.616997,156.395004)..(113.121002,162.688004)
				..controls (113.625000,169.022995) and (108.905998,174.559006)..(102.573997,175.063004)
				..controls (96.242203,175.546997) and (90.683601,170.848007)..(90.199203,164.516006)
				..controls (89.714798,158.184006) and (94.433601,152.625000)..(100.746002,152.141006)
				--cycle;
			fill (91.015602,147.438004)..controls (93.269501,148.992004) and (96.066399,150.059006)..(99.078102,149.824005)
				..controls (103.019997,149.477005) and (106.285004,147.046997)..(108.226997,144.054993)
				--(119.844002,121.078003)--(135.656006,110.180000)..controls (137.016006,109.148003) and (137.832001,107.441002)..(137.695007,105.633003)
				..controls (137.479996,102.777000) and (134.977005,100.660004)..(132.102005,100.894997)
				..controls (131.246002,100.914001) and (130.565994,101.262001)..(129.729996,101.652000)
				--(112.460999,113.519997)..controls (111.938004,113.964996) and (111.527000,114.473000)..(111.180000,115.073997)
				--(106.808998,123.680000)--(101.640999,100.737999)--(122.039001,76.632797)
				..controls (122.484001,75.875000) and (122.796997,75.039101)..(122.987999,74.183601)
				--(128.488007,45.066399)..controls (128.468994,44.425800) and (128.565994,44.015598)..(128.526993,43.472698)
				..controls (128.175995,39.199200) and (124.426003,36.011700)..(120.133003,36.343800)
				..controls (116.598000,36.613300) and (113.957001,39.277302)..(113.121002,42.500000)
				--(107.914001,69.773399)--(91.382797,87.917999)--(87.500000,70.222702)
				..controls (87.382797,69.386703) and (86.296898,67.656303)..(85.945297,66.917999)
				--(70.074203,40.152302)..controls (68.460899,37.683601) and (65.820297,36.128899)..(62.769501,36.343800)
				..controls (58.476601,36.691399) and (55.273399,40.441399)..(55.621101,44.734402)
				..controls (55.718800,45.937500) and (56.226601,47.203098)..(56.652302,48.074200)
				--(71.453102,72.882797)--(83.750000,127.527000)--(75.707001,121.000000)
				--(71.453102,101.535004)..controls (70.890602,99.066399) and (68.617203,97.007797)..(65.917999,97.242203)
				..controls (63.082001,97.476601) and (60.925800,99.941399)..(61.140598,102.816002)
				--(61.253899,103.496002)--(66.324203,126.183998)..controls (66.597702,127.214996) and (67.160202,128.050995)..(67.937500,128.690994)
				--cycle;
			fill (18.835899,65.625000)--(30.664101,65.625000)--(30.664101,56.226601)
				--(18.835899,56.226601)--cycle;
			fill (42.203098,65.625000)--(54.035198,65.625000)--(54.035198,56.226601)
				--(42.203098,56.226601)--cycle;
			fill (89.250000,65.625000)--(101.082001,65.625000)--(101.082001,56.226601)
				--(89.250000,56.226601)--cycle;
			fill (136.608994,65.625000)--(148.440994,65.625000)--(148.440994,56.226601)
				--(136.608994,56.226601)--cycle;
			fill (159.979996,65.625000)--(171.809006,65.625000)--(171.809006,56.226601)
				--(159.979996,56.226601)--cycle;
			fill (18.835899,31.339800)--(30.664101,31.339800)--(30.664101,21.937500)
				--(18.835899,21.937500)--cycle;
			fill (42.203098,31.339800)--(54.035198,31.339800)--(54.035198,21.937500)
				--(42.203098,21.937500)--cycle;
			fill (65.882797,31.339800)--(77.714798,31.339800)--(77.714798,21.937500)
				--(65.882797,21.937500)--cycle;
			fill (113.241997,31.339800)--(125.070000,31.339800)--(125.070000,21.937500)
				--(113.241997,21.937500)--cycle;
			fill (89.250000,31.339800)--(101.082001,31.339800)--(101.082001,21.937500)
				--(89.250000,21.937500)--cycle;
			fill (136.608994,31.339800)--(148.440994,31.339800)--(148.440994,21.937500)
				--(136.608994,21.937500)--cycle;
			fill (159.979996,31.339800)--(171.809006,31.339800)--(171.809006,21.937500)
				--(159.979996,21.937500)--cycle;
		);
		picture walkway;
		walkway := walkway_raw shifted (-(llcorner walkway_raw)-(urcorner walkway_raw - llcorner walkway_raw)/2) scaled (u / max((xpart urcorner walkway_raw) - (xpart llcorner walkway_raw), (ypart urcorner walkway_raw) - (ypart llcorner walkway_raw)));

		def p_u_walkway(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw walkway;
		enddef;

		def p_u_walkway_metalic(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw walkway withcolor (0.71, 0.71, 0.71);
		enddef;

		def p_u_walkway_soil(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw walkway withcolor (0.7, 0.49, 0);
		enddef;

		def p_u_walkway_stone(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw walkway withcolor (0.32, 0.32, 0.32);
		enddef;

		def p_u_walkway_wood(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw walkway withcolor (0.45, 0.22, 0);
		enddef;

		picture nameplate_raw;
	 	nameplate_raw := image(
	 		pickup pencircle scaled 24bp;
			linecap := butt;
			linejoin := mitered;
			draw (77.027298,563.448975)--(505.574005,563.448975)--(505.574005,340.082001)
				--(77.027298,340.082001)--cycle;
			pickup pencircle scaled 10bp;
			draw (208.195007,496.167999)--(422.667999,496.167999);
			draw (117.796997,450.808990)--(358.480011,450.808990);
			draw (264.453003,401.781006)--(470.472992,401.781006);
		);
		picture nameplate;
		nameplate := nameplate_raw shifted (-(llcorner nameplate_raw)-(urcorner nameplate_raw - llcorner nameplate_raw)/2) scaled (u / max((xpart urcorner nameplate_raw) - (xpart llcorner nameplate_raw), (ypart urcorner nameplate_raw) - (ypart llcorner nameplate_raw)));

		def p_u_nameplate(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw nameplate;
		enddef;

		picture masonry_raw;
	 	masonry_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (247.164001,458.144989)--(317.664001,458.144989)--(317.664001,426.644989)
				--(247.164001,426.644989)--cycle;
			fill (286.914001,416.894989)--(358.164001,416.894989)--(358.164001,385.394989)
				--(286.914001,385.394989)--cycle;
			fill (206.664001,416.894989)--(277.914001,416.894989)--(277.914001,385.394989)
				--(206.664001,385.394989)--cycle;
			fill (327.414001,375.644989)--(397.914001,375.644989)--(397.914001,344.144989)
				--(327.414001,344.144989)--cycle;
			fill (247.164001,375.644989)--(317.664001,375.644989)--(317.664001,344.144989)
				--(247.164001,344.144989)--cycle;
			fill (327.414001,458.195007)--(397.914001,458.195007)--(397.914001,426.695007)
				--(327.414001,426.695007)--cycle;
			fill (286.914001,499.234009)--(358.164001,499.234009)--(358.164001,467.734009)
				--(286.914001,467.734009)--cycle;
		);
		picture masonry;
		masonry := masonry_raw shifted (-(llcorner masonry_raw)-(urcorner masonry_raw - llcorner masonry_raw)/2) scaled (u / max((xpart urcorner masonry_raw) - (xpart llcorner masonry_raw), (ypart urcorner masonry_raw) - (ypart llcorner masonry_raw)));

		def p_u_masonry(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw masonry;
		enddef;

		picture gate_raw;
	 	gate_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (338.621002,237.011993)--(339.371002,587.020020)..controls (403.007996,573.179993) and (458.531006,520.043030)..(483.359009,475.855011)
				..controls (487.066010,469.152008) and (490.230011,462.218994)..(493.308990,455.218994)
				--(492.746002,209.358994)--cycle;
			fill (109.308998,455.218994)--(112.019997,461.382996)..controls (113.512001,464.773010) and (116.769997,471.289001)..(119.262001,475.855011)
				..controls (147.313004,527.296997) and (187.516006,563.835999)..(233.320007,579.523010)
				..controls (241.257996,582.237976) and (253.089996,585.348022)..(258.558990,586.151978)
				..controls (260.417999,586.426025) and (262.527008,586.815979)..(263.246002,587.020020)
				--(264.558990,436.539001)--(282.558990,436.539001)--(282.558990,372.039001)
				--(264.558990,372.039001)--(264.558990,237.160004)--(262.496002,236.742004)
				--(110.996002,209.647995)--(109.308998,209.261993)--cycle;
			fill (138.190994,293.816010)--(170.738007,299.394989)--(170.738007,240.852005)
				--(138.190994,235.445007)--cycle withcolor white;
			fill (198.789001,304.433990)--(231.332001,310.011993)--(231.332001,251.468994)
				--(198.789001,246.063004)--cycle withcolor white;
			fill (138.190994,460.031006)..controls (147.214996,481.824005) and (158.628998,495.542999)..(170.738007,506.910004)
				--(170.738007,330.257996)--(138.190994,324.851990)--cycle withcolor white;
			fill (198.789001,526.476990)..controls (206.746002,537.781006) and (221.828003,547.804993)..(231.332001,552.101990)
				--(231.332001,342.710999)--(198.789001,337.304993)--cycle withcolor white;
			fill (460.500000,293.816010)--(427.953003,299.394989)--(427.953003,240.852005)
				--(460.500000,235.445007)--cycle withcolor white;
			fill (399.902008,304.433990)--(367.359009,310.011993)--(367.359009,251.468994)
				--(399.902008,246.063004)--cycle withcolor white;
			fill (460.500000,460.031006)..controls (451.476990,481.824005) and (440.062988,495.542999)..(427.953003,506.910004)
				--(427.953003,330.257996)--(460.500000,324.851990)--cycle withcolor white;
			fill (399.902008,526.476990)..controls (391.945007,537.781006) and (376.863007,547.804993)..(367.359009,552.101990)
				--(367.359009,342.710999)--(399.902008,337.304993)--cycle withcolor white;
		);
		picture gate;
		gate := gate_raw shifted (-(llcorner gate_raw)-(urcorner gate_raw - llcorner gate_raw)/2) scaled (u / max((xpart urcorner gate_raw) - (xpart llcorner gate_raw), (ypart urcorner gate_raw) - (ypart llcorner gate_raw)));

		def p_u_gate(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw gate;
		enddef;

		picture ex_voto_raw;
	 	ex_voto_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (144.440994,285.171997)..controls (142.253998,285.957001) and (138.085999,289.632996)..(128.938004,298.835999)
			    ..controls (118.323997,309.511993) and (116.344002,311.863007)..(115.894997,314.308990)
			    ..controls (114.848000,319.980011) and (118.344002,326.144989)..(125.605003,331.421997)
			    ..controls (130.171997,334.742004) and (136.438004,334.351990)..(140.703003,330.476990)
			    ..controls (142.214996,329.109009) and (142.574005,329.441010)..(173.406006,360.382996)
			    --(204.585999,391.675995)--(207.035004,398.425995)..controls (212.535004,413.589996) and (222.854996,435.929993)..(231.214996,450.761993)
			    --(234.929993,457.351990)--(254.070007,439.351990)--(246.313004,423.847992)
			    ..controls (242.046997,415.324005) and (238.554993,408.070007)..(238.554993,407.738007)
			    ..controls (238.554993,407.402008) and (239.820007,407.648010)..(241.367004,408.285004)
			    ..controls (244.608994,409.621002) and (264.433990,419.535004)..(269.019989,422.117004)
			    ..controls (271.960999,423.769989) and (272.191010,423.792999)..(273.894989,422.582001)
			    ..controls (274.875000,421.886993) and (279.968994,418.136993)..(285.210999,414.250000)
			    --(294.742004,407.187988)--(284.835999,401.574005)..controls (267.179993,391.570007) and (250.671997,383.746002)..(232.929993,376.964996)
			    --(223.179993,373.238007)--(191.914001,342.007996)--(160.651993,310.777008)
			    --(162.449005,308.640991)..controls (163.438004,307.464996) and (164.464996,305.335999)..(164.733994,303.902008)
			    ..controls (165.632996,299.109009) and (164.496002,296.140991)..(159.938004,291.359009)
			    ..controls (153.688004,284.808990) and (149.789001,283.250000)..(144.440994,285.171997)
			    --cycle;
			fill (410.542999,391.675995)--(441.710999,360.382996)..controls (472.535004,329.441010) and (472.894989,329.109009)..(474.406006,330.476990)
			    ..controls (476.960999,332.796997) and (479.039001,333.550995)..(482.894989,333.550995)
			    ..controls (487.144989,333.550995) and (490.675995,331.398010)..(495.300995,325.996002)
			    ..controls (498.648010,322.085999) and (499.941010,318.226990)..(499.214996,314.308990)
			    ..controls (498.761993,311.859009) and (496.742004,309.472992)..(485.820007,298.476990)
			    ..controls (471.304993,283.855011) and (469.757996,282.929993)..(463.128998,284.851990)..controls (459.652008,285.863007) and (451.046997,295.121002)..(450.406006,298.539001)
			    ..controls (449.691010,302.351990) and (450.531006,306.109009)..(452.660004,308.640991)
			    --(454.457001,310.777008)--(423.195007,342.007996)--(391.929993,373.238007)
			    --(382.179993,376.964996)..controls (341.175995,392.636993) and (303.601990,415.191010)..(269.304993,444.718994)
			    ..controls (244.914001,465.722992) and (214.270004,498.890991)..(191.695007,528.723022)
			    --(185.035004,537.523010)--(180.796997,533.479980)..controls (172.960999,526.004028) and (167.395004,526.090027)..(159.684006,533.801025)
			    ..controls (157.281006,536.203003) and (154.977005,539.062988)..(154.563004,540.156006)
			    ..controls (153.477005,543.007996) and (153.628998,547.793030)..(154.878998,550.148010)
			    ..controls (155.468994,551.262024) and (173.440994,569.609009)..(194.815994,590.918030)
			    ..controls (231.156006,627.145020) and (233.882996,629.690979)..(236.815994,630.159973)
			    ..controls (241.246002,630.870972) and (245.477005,628.770020)..(250.688004,623.270020)
			    ..controls (257.574005,616.004028) and (257.625000,610.632996)..(250.875000,603.554993)
			    ..controls (248.636993,601.206970) and (246.804993,599.117004)..(246.804993,598.906006)
			    ..controls (246.804993,598.695007) and (250.266006,595.879028)..(254.492004,592.648010)
			    ..controls (281.414001,572.062988) and (310.250000,546.145020)..(329.769989,524.984009)
			    ..controls (363.707001,488.195007) and (390.632996,444.906006)..(407.316010,400.300995)
			    --(410.542999,391.675995)--(370.320007,420.917999)..controls (350.242004,461.816010) and (325.628998,494.781006)..(290.027008,528.445007)
			    ..controls (272.394989,545.117004) and (250.707001,563.487976)..(235.574005,574.570007)
			    --(227.718994,580.323975)--(215.585999,568.203003)--(203.449005,556.085999)
			    --(208.761993,548.879028)..controls (221.867004,531.098022) and (241.742004,507.820007)..(260.011993,488.859009)
			    ..controls (282.808990,465.199005) and (311.394989,442.527008)..(339.054993,426.171997)
			    ..controls (348.562988,420.550995) and (375.855011,406.847992)..(376.417999,407.414001)
			    ..controls (376.613007,407.609009) and (373.871002,413.687988)..(370.320007,420.917999)
			    --cycle;
			fill (380.828003,482.750000)..controls (380.113007,483.960999) and (376.828003,488.703003)..(373.523010,493.296997)
			    --(367.519989,501.640991)--(369.601990,504.085999)..controls (370.742004,505.429993) and (376.023010,511.570007)..(381.335999,517.726990)
			    ..controls (389.816010,527.562988) and (402.820007,543.835999)..(409.500000,552.973022)
			    --(411.726990,556.020020)--(387.375000,580.340027)--(381.027008,575.695007)
			    ..controls (371.800995,568.945007) and (361.812988,560.945007)..(350.312988,551.093994)
			    ..controls (344.750000,546.323975) and (339.273010,541.640991)..(338.144989,540.687988)
			    --(336.093994,538.948975)--(326.988007,547.995972)--(317.882996,557.039001)
			    --(321.847992,560.609009)..controls (329.953003,567.901978) and (347.960999,582.901978)..(356.601990,589.554993)
			    ..controls (361.507996,593.331970) and (366.218994,596.976990)..(367.074005,597.648010)
			    ..controls (368.609009,598.859009) and (368.578003,598.929993)..(364.375000,603.468994)
			    ..controls (357.488007,610.906006) and (357.500000,615.965027)..(364.421997,623.270020)
			    ..controls (369.632996,628.770020) and (373.863007,630.870972)..(378.292999,630.159973)
			    ..controls (381.226990,629.690979) and (383.953003,627.145020)..(420.292999,590.918030)
			    ..controls (441.667999,569.609009) and (459.640991,551.262024)..(460.230011,550.148010)
			    ..controls (460.820007,549.034973) and (461.304993,546.468994)..(461.304993,544.448975)
			    ..controls (461.304993,540.210999) and (459.148010,536.671997)..(453.750000,532.051025)
			    ..controls (446.953003,526.234009) and (441.488007,526.632996)..(434.312988,533.479980)
			    --(430.074005,537.523010)--(426.386993,532.473022)..controls (416.437988,518.854980) and (384.097992,480.550995)..(382.546997,480.550995)
			    ..controls (382.316010,480.550995) and (381.542999,481.539001)..(380.828003,482.750000)
			    --cycle;
		);
		picture ex_voto;
		ex_voto := ex_voto_raw shifted (-(llcorner ex_voto_raw)-(urcorner ex_voto_raw - llcorner ex_voto_raw)/2) scaled (u / max((xpart urcorner ex_voto_raw) - (xpart llcorner ex_voto_raw), (ypart urcorner ex_voto_raw) - (ypart llcorner ex_voto_raw)));

		def p_u_ex_voto(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw ex_voto;
		enddef;

		picture electric_light_raw;
	 	electric_light_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (312.281006,246.093994)--(338.015991,246.093994)--(338.015991,178.391006)
				--(312.281006,178.391006)--cycle;
			fill (218.410004,315.015991)--(233.921997,294.480011)--(159.772995,238.473007)
				--(144.261993,259.011993)--cycle;
			fill (255.895004,273.328003)--(278.421997,260.886993)--(255.804993,219.925995)
				--(233.272995,232.363007)--cycle;
			fill (365.992004,254.324005)--(388.085999,267.519989)--(412.078003,227.343994)
				--(389.980011,214.147995)--cycle;
			fill (415.234009,293.105011)--(430.609009,313.742004)--(497.339996,264.031006)
				--(481.964996,243.391006)--cycle;
			fill (334.898010,564.601990)..controls (341.363007,561.979980) and (346.621002,556.770020)..(349.535004,550.448975)
				..controls (350.480011,548.304993) and (351.718994,546.137024)..(351.832001,543.757996)
				..controls (349.957001,543.234009) and (347.644989,543.640991)..(345.609009,543.500000)
				..controls (329.324005,543.487976) and (313.035004,543.882996)..(296.753998,543.770020)
				..controls (294.925995,545.104980) and (296.812988,548.284973)..(297.398010,550.098022)
				..controls (300.550995,556.335999) and (305.988007,561.320007)..(312.234009,564.379028)
				..controls (317.988007,567.020020) and (324.632996,567.176025)..(330.757996,565.918030)
				..controls (332.171997,565.598022) and (333.562988,565.176025)..(334.898010,564.601990)
				--cycle;
			fill (364.085999,463.929993)..controls (366.878998,436.507996) and (387.468994,416.441010)..(400.875000,393.757996)
				..controls (410.078003,379.117004) and (415.148010,361.457001)..(411.886993,344.195007)
				..controls (406.910004,312.937988) and (380.675995,287.886993)..(350.445007,280.519989)
				..controls (316.863007,271.582001) and (278.199005,283.062988)..(256.773010,310.906006)
				..controls (238.589996,333.367004) and (236.082001,367.238007)..(251.733994,391.734009)
				..controls (264.613007,414.308990) and (284.738007,433.878998)..(288.917999,460.523010)
				..controls (287.445007,468.585999) and (296.238007,466.203003)..(301.132996,466.457001)
				..controls (322.117004,466.457001) and (343.101990,466.457001)..(364.085999,466.457001)
				..controls (364.085999,465.613007) and (364.085999,464.773010)..(364.085999,463.929993)
				--cycle;
			fill (375.562988,501.335999)..controls (381.000000,499.441010) and (383.906006,492.808990)..(381.714996,487.496002)
				..controls (379.886993,482.332001) and (374.710999,478.496002)..(369.167999,478.648010)
				..controls (350.718994,477.902008) and (332.242004,478.191010)..(313.777008,478.070007)
				..controls (301.625000,478.175995) and (289.449005,477.925995)..(277.316010,478.617004)
				..controls (270.535004,481.242004) and (268.699005,491.222992)..(274.007996,496.191010)
				..controls (277.027008,500.101990) and (281.769989,502.003998)..(286.632996,501.406006)
				..controls (315.250000,501.886993) and (343.878998,501.816010)..(372.496002,501.851990)
				..controls (373.531006,501.765991) and (374.562988,501.625000)..(375.562988,501.335999)
				--cycle;
			fill (377.675995,534.401978)..controls (381.796997,532.065979) and (383.015991,526.914001)..(381.816010,522.573975)
				..controls (380.843994,518.237976) and (377.011993,514.898010)..(372.996002,513.359009)
				..controls (361.804993,512.328003) and (350.523010,512.770020)..(339.292999,512.629028)
				..controls (320.558990,512.793030) and (301.804993,512.434021)..(283.082001,513.237976)
				..controls (279.277008,513.573975) and (274.316010,513.520020)..(272.445007,517.581970)
				..controls (269.339996,521.815979) and (270.953003,527.421997)..(273.945007,531.218994)
				..controls (276.453003,536.004028) and (282.488007,535.862976)..(287.136993,536.215027)
				..controls (306.781006,536.809021) and (326.437988,536.289001)..(346.085999,536.312988)
				..controls (355.625000,536.254028) and (365.164001,536.229980)..(374.699005,536.112976)
				..controls (375.773010,535.715027) and (376.718994,535.020020)..(377.675995,534.401978)
				--cycle;
		);
		picture electric_light;
		electric_light := electric_light_raw shifted (-(llcorner electric_light_raw)-(urcorner electric_light_raw - llcorner electric_light_raw)/2) scaled (u / max((xpart urcorner electric_light_raw) - (xpart llcorner electric_light_raw), (ypart urcorner electric_light_raw) - (ypart llcorner electric_light_raw)));

		def p_u_electric_light(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw electric_light;
		enddef;

		picture altar_raw;
	 	altar_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (145.929993,152.074005)..controls (119.844002,155.223007) and (104.292999,187.843994)..(119.487999,209.804993)
				..controls (128.968994,227.102005) and (149.988007,228.949005)..(167.574005,227.832001)
				..controls (189.348007,228.070007) and (211.121002,228.229996)..(232.895004,228.425995)
				..controls (211.132996,247.917999) and (181.770004,265.058990)..(178.438004,296.917999)
				..controls (175.121002,317.515991) and (182.729996,337.496002)..(194.636993,354.000000)
				..controls (224.636993,401.582001) and (253.227005,450.125000)..(284.363007,496.953003)
				..controls (298.378998,516.148010) and (327.652008,514.098022)..(343.695007,498.632996)
				..controls (373.781006,477.656006) and (384.437988,441.121002)..(401.957001,410.738007)
				..controls (421.980011,422.082001) and (438.804993,439.257996)..(460.113007,448.031006)
				..controls (483.218994,454.492004) and (505.472992,427.632996)..(494.390991,406.058990)
				..controls (482.042999,387.718994) and (460.230011,378.277008)..(443.371002,364.382996)
				..controls (427.042999,354.394989) and (412.957001,338.628998)..(394.101990,334.117004)
				..controls (369.675995,329.964996) and (359.742004,355.996002)..(351.671997,373.789001)
				..controls (347.414001,388.777008) and (341.531006,390.003998)..(336.480011,374.480011)
				..controls (320.140991,343.757996) and (303.585999,313.152008)..(287.156006,282.476990)
				..controls (314.191010,258.933990) and (342.781006,237.050995)..(368.656006,212.250000)
				..controls (385.699005,190.425995) and (370.351990,154.690994)..(342.859009,152.175995)
				..controls (277.230011,151.184006) and (211.563004,151.703003)..(145.929993,152.074005)
				--cycle;
			fill (397.687988,500.261993)..controls (364.660004,507.492004) and (345.648010,547.992004)..(361.531006,577.926025)
				..controls (375.578003,609.495972) and (421.019989,619.250000)..(446.628998,595.828003)
				..controls (474.378998,573.823975) and (471.449005,525.729980)..(440.906006,507.558990)
				..controls (428.398010,499.003998) and (412.289001,497.089996)..(397.687988,500.261993)
				--cycle;
		);
		picture altar;
		altar := altar_raw shifted (-(llcorner altar_raw)-(urcorner altar_raw - llcorner altar_raw)/2) scaled (u / max((xpart urcorner altar_raw) - (xpart llcorner altar_raw), (ypart urcorner altar_raw) - (ypart llcorner altar_raw)));

		def p_u_altar(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw altar;
		enddef;

		picture human_bone_raw;
	 	human_bone_raw := image(
			% Bottom left bone
			fill (185.089996,328.191010)..controls (169.820007,332.183990) and (162.934006,349.234009)..(171.276993,362.394989)
				..controls (174.022995,366.722992) and (174.065994,366.539001)..(170.276993,366.539001)
				..controls (156.007996,366.542999) and (145.352005,384.511993)..(151.507996,398.187988)
				..controls (159.164001,415.191010) and (183.960999,415.875000)..(192.313004,399.308990)
				..controls (193.184006,397.578003) and (193.973007,396.078003)..(194.063004,395.972992)
				..controls (194.151993,395.863007) and (206.511993,401.531006)..(221.531006,408.558990)
				..controls (236.550995,415.585999) and (249.539001,421.519989)..(250.395004,421.738007)
				..controls (252.733994,422.335999) and (253.820007,420.410004)..(254.464996,414.527008)
				..controls (255.598007,404.230011) and (260.117004,400.605011)..(277.519989,396.050995)
				..controls (279.785004,395.457001) and (277.593994,394.316010)..(244.772995,379.050995)
				--(209.593994,362.683990)--(211.151993,359.175995)..controls (218.348007,342.945007) and (202.179993,323.722992)..(185.089996,328.191010)
				--cycle withcolor black;

			% Bottom right bone 
			fill (417.589996,328.539001)..controls (404.183990,332.992004) and (397.394989,347.027008)..(402.777008,359.171997)
				--(404.332001,362.675995)--(369.335999,378.957001)..controls (350.085999,387.910004) and (334.226990,395.332001)..(334.093994,395.449005)
				..controls (333.957001,395.562988) and (335.812988,396.062988)..(338.218994,396.558990)
				..controls (351.523010,399.304993) and (359.464996,405.996002)..(359.464996,414.460999)
				..controls (359.464996,418.101990) and (360.558990,421.179993)..(362.058990,421.757996)
				..controls (362.671997,421.992004) and (375.589996,416.382996)..(390.757996,409.289001)
				..controls (405.925995,402.195007) and (418.703003,396.242004)..(419.148010,396.058990)
				..controls (419.593994,395.875000) and (420.582001,397.113007)..(421.347992,398.804993)
				..controls (428.964996,415.699005) and (453.941010,415.453003)..(462.226990,398.402008)
				..controls (468.792999,384.886993) and (458.097992,366.542999)..(443.652008,366.539001)
				..controls (439.863007,366.539001) and (439.906006,366.722992)..(442.652008,362.394989)
				..controls (451.835999,347.910004) and (442.363007,329.136993)..(425.238007,327.886993)
				..controls (422.457001,327.683990) and (419.382996,327.945007)..(417.589996,328.539001)
				--cycle withcolor black;

			% Face
			fill (291.214996,405.238007)..controls (272.382996,406.886993) and (264.964996,409.781006)..(264.964996,415.492004)
				..controls (264.964996,425.523010) and (260.488007,430.410004)..(245.313004,436.945007)
				..controls (230.815994,443.187988) and (229.011993,444.742004)..(228.253998,451.664001)
				..controls (227.863007,455.207001) and (226.992004,458.140991)..(225.570007,460.679993)
				..controls (222.882996,465.492004) and (223.250000,466.988007)..(228.565994,472.945007)
				..controls (233.977005,479.011993) and (233.960999,478.878998)..(231.292999,495.281006)
				..controls (224.035004,539.914001) and (225.695007,559.745972)..(238.227005,578.039001)
				..controls (265.269989,617.520020) and (347.152008,618.195007)..(374.843994,579.164001)
				..controls (388.242004,560.276978) and (390.082001,540.487976)..(382.621002,495.355011)
				..controls (379.929993,479.058990) and (379.929993,479.035004)..(385.363007,472.945007)
				..controls (390.679993,466.988007) and (391.042999,465.492004)..(388.355011,460.679993)
				..controls (386.937988,458.140991) and (386.062988,455.207001)..(385.675995,451.664001)
				..controls (384.917999,444.761993) and (383.257996,443.328003)..(368.691010,437.007996)
				..controls (353.437988,430.382996) and (348.964996,425.515991)..(348.964996,415.527008)
				..controls (348.964996,408.468994) and (338.476990,405.605011)..(311.089996,405.191010)
				..controls (302.015991,405.054993) and (293.070007,405.074005)..(291.214996,405.238007)
				--cycle withcolor black;

			% Nose  
			fill (323.089996,450.164001)..controls (323.089996,456.718994) and (312.515991,480.296997)..(307.910004,480.722992)
				..controls (303.308990,481.148010) and (290.527008,457.519989)..(291.027008,450.203003)
				..controls (296.660004,446.218994) and (317.582001,445.218994)..(323.089996,450.164001)
				--cycle withcolor white;

			% Left eye  
			fill (274.714996,470.835999)..controls (286.769989,472.785004) and (293.812988,482.296997)..(293.832001,496.664001)
				..controls (293.847992,508.375000) and (287.507996,514.254028)..(272.328003,516.609009)
				..controls (259.250000,518.640991) and (252.324005,514.043030)..(248.035004,500.480011)
				..controls (244.098007,488.039001) and (244.785004,475.742004)..(249.589996,472.593994)
				..controls (253.367004,470.121002) and (265.167999,469.296997)..(274.714996,470.835999)
				--cycle withcolor white;

			% Right eye 
			fill (363.304993,472.000000)..controls (367.652008,474.511993) and (368.636993,477.433990)..(368.191010,486.539001)
				..controls (367.406006,502.781006) and (361.496002,514.129028)..(352.535004,516.612976)
				..controls (343.933990,518.995972) and (327.917999,514.315979)..(323.417999,508.105011)
				..controls (314.296997,495.515991) and (323.035004,473.531006)..(338.257996,470.769989)
				..controls (344.875000,469.570007) and (360.421997,470.335999)..(363.304993,472.000000)
				--cycle withcolor white;

			% Top left bone 
			fill (167.574005,445.328003)..controls (142.929993,450.296997) and (144.617004,486.656006)..(169.647995,489.976990)
				--(173.507996,490.488007)--(172.210999,492.449005)..controls (164.050995,504.808990) and (167.531006,519.992004)..(179.968994,526.301025)
				..controls (198.386993,535.645020) and (219.343994,516.179993)..(211.046997,497.429993)
				--(209.516006,493.960999)--(215.675995,490.984009)..controls (223.875000,487.023010) and (224.628998,484.601990)..(219.522995,478.625000)
				..controls (212.800995,470.757996) and (211.718994,465.019989)..(215.520004,457.417999)
				..controls (219.645004,449.160004) and (219.020004,449.000000)..(206.179993,455.039001)
				..controls (200.042999,457.925995) and (194.757996,460.289001)..(194.434006,460.289001)
				..controls (194.113007,460.289001) and (193.113007,458.773010)..(192.218994,456.921997)
				..controls (188.190994,448.605011) and (177.132996,443.402008)..(167.574005,445.328003)
				--cycle withcolor black;

			% Top right bone
			fill (436.023010,445.707001)..controls (429.132996,447.597992) and (423.609009,452.113007)..(421.234009,457.796997)
				..controls (419.898010,460.996002) and (420.640991,461.148010)..(407.707001,455.042999)
				..controls (401.312988,452.027008) and (397.957001,450.558990)..(396.718994,450.875000)
				..controls (395.476990,451.191010) and (396.351990,453.292999)..(398.410004,457.417999)
				..controls (402.218994,465.042999) and (401.128998,470.753998)..(394.347992,478.695007)
				..controls (389.179993,484.742004) and (389.871002,486.964996)..(398.156006,490.941010)
				--(404.417999,493.949005)--(402.832001,497.539001)..controls (396.289001,512.328003) and (407.996002,529.132996)..(424.339996,528.406006)
				..controls (443.179993,527.565979) and (452.363007,508.570007)..(441.718994,492.449005)
				--(440.421997,490.488007)--(444.281006,489.976990)..controls (463.234009,487.460999) and (471.054993,464.011993)..(457.199005,451.238007)
				..controls (451.121002,445.636993) and (443.523010,443.652008)..(436.023010,445.707001)
				--cycle withcolor black;
		);
		picture human_bone;
		human_bone := human_bone_raw shifted (-(llcorner human_bone_raw)-(urcorner human_bone_raw - llcorner human_bone_raw)/2) scaled (u / max((xpart urcorner human_bone_raw) - (xpart llcorner human_bone_raw), (ypart urcorner human_bone_raw) - (ypart llcorner human_bone_raw)));

		def p_u_human_bone(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw human_bone;
		enddef;

		picture danger_raw;
	 	danger_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (296.210999,396.785004)
				..controls (295.957001,393.730011) and (295.378998,392.101990)..(294.050995,390.679993)
				..controls (290.140991,386.492004) and (291.902008,386.628998)..(242.203003,386.628998)
				..controls (199.147995,386.628998) and (196.050995,386.718994)..(193.602005,388.000000)..controls (190.085999,389.839996) and (187.391006,394.972992)..(187.882996,398.906006)
				..controls (188.082001,400.500000) and (189.796997,405.015991)..(191.695007,408.941010)
				..controls (197.016006,419.949005) and (230.910004,482.273010)..(233.671997,486.125000)
				..controls (234.309006,487.015991) and (236.343994,488.320007)..(238.190994,489.027008)
				..controls (242.563004,490.695007) and (246.210999,490.011993)..(249.546997,486.898010)
				..controls (251.727005,484.859009) and (270.371002,450.863007)..(293.917999,405.980011)
				..controls (296.246002,401.542999) and (296.515991,400.460999)..(296.210999,396.785004)
				--cycle withcolor red;
			fill (244.227005,419.902008)..controls (245.160004,424.167999) and (249.863007,452.070007)..(249.863007,453.328003)
				..controls (249.863007,455.347992) and (246.492004,459.121002)..(244.164001,459.707001)
				..controls (241.417999,460.394989) and (237.468994,458.906006)..(235.964996,456.613007)
				..controls (235.031006,455.191010) and (234.792999,453.656006)..(235.059006,450.839996)
				..controls (235.703003,444.046997) and (240.223007,419.285004)..(240.983994,418.363007)
				..controls (242.011993,417.121002) and (243.809006,417.972992)..(244.227005,419.902008)
				--cycle withcolor white;
			fill (246.882996,399.777008)..controls (250.835999,403.980011) and (247.852005,410.628998)..(242.016006,410.628998)
				..controls (238.882996,410.628998) and (235.613007,407.136993)..(235.613007,403.789001)
				..controls (235.613007,398.433990) and (243.113007,395.761993)..(246.882996,399.777008)
				--cycle withcolor white;
		);
		picture danger;
		danger := danger_raw shifted (-(llcorner danger_raw)-(urcorner danger_raw - llcorner danger_raw)/2) scaled (u / max((xpart urcorner danger_raw) - (xpart llcorner danger_raw), (ypart urcorner danger_raw) - (ypart llcorner danger_raw)));

		def p_u_danger(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			%thfill bb_danger_raw withcolor (0.3, 0.2, 0.1);
			%thdraw (llcorner bb_danger_raw) withpen pencircle scaled 4bp withcolor black;
			%thdraw thelabel.llft("llcorner bb_danger_raw (" & decimal(xpart llcorner bb_danger_raw) & ", " & decimal(ypart llcorner bb_danger_raw) & ")", llcorner bb_danger_raw);
			%thdraw (lrcorner bb_danger_raw) withpen pencircle scaled 4bp withcolor black;
			%thdraw thelabel.lrt("lrcorner bb_danger_raw (" & decimal(xpart lrcorner bb_danger_raw) & ", " & decimal(ypart lrcorner bb_danger_raw) & ")", lrcorner bb_danger_raw);
			%thdraw (ulcorner bb_danger_raw) withpen pencircle scaled 4bp withcolor black;
			%thdraw thelabel.ulft("ulcorner bb_danger_raw (" & decimal(xpart ulcorner bb_danger_raw) & ", " & decimal(ypart ulcorner bb_danger_raw) & ")", ulcorner bb_danger_raw);
			%thdraw (urcorner bb_danger_raw) withpen pencircle scaled 4bp withcolor black;
			%thdraw thelabel.urt("urcorner bb_danger_raw (" & decimal(xpart urcorner bb_danger_raw) & ", " & decimal(ypart urcorner bb_danger_raw) & ")", urcorner bb_danger_raw);
			%thdraw danger_raw withcolor (0.1,0.2,0.3);
			%thfill bbox danger withcolor green;
			%thdraw (llcorner bb_danger) withpen pencircle scaled 4bp withcolor black;
			%thdraw thelabel.llft("llcorner bb_danger (" & decimal(xpart llcorner bb_danger) & ", " & decimal(ypart llcorner bb_danger) & ")", llcorner bb_danger);
			%thdraw (lrcorner bb_danger) withpen pencircle scaled 4bp withcolor black;
			%thdraw thelabel.lrt("lrcorner bb_danger (" & decimal(xpart lrcorner bb_danger) & ", " & decimal(ypart lrcorner bb_danger) & ")", lrcorner bb_danger);
			%thdraw (ulcorner bb_danger) withpen pencircle scaled 4bp withcolor black;
			%thdraw thelabel.ulft("ulcorner bb_danger (" & decimal(xpart ulcorner bb_danger) & ", " & decimal(ypart ulcorner bb_danger) & ")", ulcorner bb_danger);
			%thdraw (urcorner bb_danger) withpen pencircle scaled 4bp withcolor black;
			%thdraw thelabel.urt("urcorner bb_danger (" & decimal(xpart urcorner bb_danger) & ", " & decimal(ypart urcorner bb_danger) & ")", urcorner bb_danger);
			thdraw danger;
			%thdraw (0,0) withpen pencircle scaled 4bp withcolor blue;
		enddef;

		picture minus_raw;
	 	minus_raw := image(
			fill (294.660004,411.578003)--(307.644989,411.578003)--(307.644989,407.625000)
				--(294.660004,407.625000)--cycle;
			pickup pencircle scaled 1.285130bp;
			draw (314.710999,409.601990)..controls (314.710999,402.113007) and (308.640991,396.042999)..(301.152008,396.042999)
				..controls (293.664001,396.042999) and (287.593994,402.113007)..(287.593994,409.601990)
				..controls (287.593994,417.089996) and (293.664001,423.160004)..(301.152008,423.160004)
				..controls (308.640991,423.160004) and (314.710999,417.089996)..(314.710999,409.601990)
				--cycle withcolor black;
		);
		picture minus;
		minus := minus_raw shifted (-(llcorner minus_raw)-(urcorner minus_raw - llcorner minus_raw)/2) scaled (u / max((xpart urcorner minus_raw) - (xpart llcorner minus_raw), (ypart urcorner minus_raw) - (ypart llcorner minus_raw)));

		def p_u_minus(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw minus;
		enddef;

		picture plus_raw;
	 	plus_raw := image(
			fill (394.687988,411.277008)--(394.687988,403.121002)--(402.843994,403.121002)
				--(402.843994,400.621002)--(394.687988,400.621002)--(394.687988,392.464996)
				--(392.234009,392.464996)--(392.234009,400.621002)--(384.062988,400.621002)
				--(384.062988,403.121002)--(392.234009,403.121002)--(392.234009,411.277008)
				--cycle withcolor black;
			pickup pencircle scaled 0.750000bp;
			draw (394.687988,411.277008)--(394.687988,403.121002)--(402.843994,403.121002)
				--(402.843994,400.621002)--(394.687988,400.621002)--(394.687988,392.464996)
				--(392.234009,392.464996)--(392.234009,400.621002)--(384.062988,400.621002)
				--(384.062988,403.121002)--(392.234009,403.121002)--(392.234009,411.277008)
				--cycle withcolor black;
			pickup pencircle scaled 1.333610bp;
			draw (407.531006,401.867004)..controls (407.531006,394.097992) and (401.230011,387.796997)..(393.460999,387.796997)
				..controls (385.687988,387.796997) and (379.390991,394.097992)..(379.390991,401.867004)
				..controls (379.390991,409.636993) and (385.687988,415.937988)..(393.460999,415.937988)
				..controls (401.230011,415.937988) and (407.531006,409.636993)..(407.531006,401.867004)
				--cycle withcolor black;
		);
		picture plus;
		plus := plus_raw shifted (-(llcorner plus_raw)-(urcorner plus_raw - llcorner plus_raw)/2) scaled (u / max((xpart urcorner plus_raw) - (xpart llcorner plus_raw), (ypart urcorner plus_raw) - (ypart llcorner plus_raw)));

		def p_u_plus(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw plus;
		enddef;

		picture plus_minus_raw;
	 	plus_minus_raw := image(
			fill (482.812988,451.992004)--(482.812988,443.835999)--(490.968994,443.835999)
				--(490.968994,441.335999)--(482.812988,441.335999)--(482.812988,433.179993)
				--(480.359009,433.179993)--(480.359009,441.335999)--(472.187988,441.335999)
				--(472.187988,443.835999)--(480.359009,443.835999)--(480.359009,451.992004)
				--cycle withcolor black;
			pickup pencircle scaled 0.750000bp;
			draw (482.812988,451.992004)--(482.812988,443.835999)--(490.968994,443.835999)
				--(490.968994,441.335999)--(482.812988,441.335999)--(482.812988,433.179993)
				--(480.359009,433.179993)--(480.359009,441.335999)--(472.187988,441.335999)
				--(472.187988,443.835999)--(480.359009,443.835999)--(480.359009,451.992004)
				--cycle withcolor black;
			pickup pencircle scaled 0.000000bp;
			fill (475.089996,425.414001)--(488.074005,425.414001)--(488.074005,421.460999)
				--(475.089996,421.460999)--cycle withcolor black;
			pickup pencircle scaled 1.332280bp;
			draw (481.585999,412.011993)..controls (473.812988,412.011993) and (467.515991,418.312988)..(467.515991,426.082001)
				--(467.515991,442.582001)..controls (467.515991,450.351990) and (473.812988,456.652008)..(481.585999,456.652008)
				..controls (489.355011,456.652008) and (495.656006,450.351990)..(495.656006,442.582001)
				--(495.656006,426.082001)..controls (495.656006,418.312988) and (489.355011,412.011993)..(481.585999,412.011993)
				--cycle withcolor black;
		);
		picture plus_minus;
		plus_minus := plus_minus_raw shifted (-(llcorner plus_minus_raw)-(urcorner plus_minus_raw - llcorner plus_minus_raw)/2) scaled (u / max((xpart urcorner plus_minus_raw) - (xpart llcorner plus_minus_raw), (ypart urcorner plus_minus_raw) - (ypart llcorner plus_minus_raw)));

		def p_u_plus_minus(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw plus_minus;
		enddef;

		picture mud_raw;
	 	mud_raw := image(
			fill (240.020004,321.050995)..controls (212.699005,328.613007) and (226.684006,361.878998)..(222.171997,381.847992)
			    ..controls (214.440994,404.570007) and (184.723007,402.421997)..(166.770004,394.550995)
			    ..controls (151.820007,385.625000) and (135.848007,374.914001)..(117.355003,378.273010)
			    ..controls (91.882797,380.269989) and (69.820297,403.562988)..(72.660202,429.691010)
			    ..controls (67.730499,451.332001) and (77.839798,465.796997)..(92.570297,479.308990)
			    ..controls (90.253899,499.421997) and (44.628899,499.644989)..(58.847698,524.159973)
			    ..controls (72.570297,536.593994) and (115.987999,563.000000)..(80.660202,576.262024)
			    ..controls (63.824200,584.418030) and (43.660198,597.273010)..(43.085899,618.031006)
			    ..controls (48.609402,642.039001) and (79.773399,647.164001)..(99.488297,637.987976)
			    ..controls (118.394997,634.073975) and (129.391006,611.465027)..(148.621002,612.187988)
			    ..controls (176.136993,625.078003) and (137.445007,659.284973)..(162.479996,670.398010)
			    ..controls (186.078003,680.151978) and (209.727005,660.453003)..(233.031006,668.612976)
			    ..controls (248.207001,682.793030) and (265.742004,702.812988)..(286.136993,681.312988)
			    ..controls (302.652008,664.815979) and (328.046997,667.195007)..(339.609009,687.848022)
			    ..controls (350.503998,709.862976) and (375.675995,706.831970)..(385.203003,685.476990)
			    ..controls (408.472992,667.762024) and (412.332001,628.687988)..(441.195007,620.309021)
			    ..controls (465.953003,616.507996) and (493.515991,646.387024)..(514.757996,623.992004)
			    ..controls (528.000000,605.104980) and (508.847992,576.390991)..(537.945007,566.812988)
			    ..controls (558.723022,545.812988) and (515.020020,524.543030)..(524.854980,498.468994)
			    ..controls (527.909973,481.511993) and (548.375000,446.281006)..(514.440979,454.750000)
			    ..controls (499.199005,459.468994) and (487.171997,447.601990)..(506.625000,439.367004)
			    ..controls (521.078003,427.628998) and (543.668030,403.210999)..(523.812988,386.648010)
			    ..controls (497.902008,372.285004) and (466.335999,369.179993)..(437.695007,376.210999)
			    ..controls (412.394989,372.503998) and (404.855011,324.042999)..(373.289001,344.289001)
			    ..controls (356.468994,354.605011) and (336.054993,348.722992)..(334.738007,327.636993)
			    ..controls (312.824005,312.640991) and (284.410004,345.476990)..(317.152008,354.066010)
			    ..controls (299.074005,370.335999) and (293.257996,329.664001)..(277.996002,323.847992)
			    ..controls (266.410004,317.527008) and (252.507996,318.488007)..(240.020004,321.050995)
			    --cycle withcolor (0.53, 0.24, 0.02);
		);
		picture mud;
		mud := mud_raw shifted (-(llcorner mud_raw)-(urcorner mud_raw - llcorner mud_raw)/2) scaled (u / max((xpart urcorner mud_raw) - (xpart llcorner mud_raw), (ypart urcorner mud_raw) - (ypart llcorner mud_raw)));

		def p_u_mud(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw mud;
		enddef;

		picture water_drip_raw;
	 	water_drip_raw := image(
			% Central
			fill (255.750000,242.003998)..controls (228.809006,245.266006) and (206.550995,257.015991)..(187.141006,278.226990)
				..controls (173.824005,292.773010) and (168.175995,305.441010)..(166.531006,324.441010)
				..controls (165.164001,340.191010) and (168.300995,359.296997)..(174.742004,374.488007)
				..controls (178.977005,384.472992) and (192.636993,410.996002)..(217.358994,457.234009)
				..controls (245.479996,509.828003) and (251.796997,523.370972)..(259.386993,547.301025)
				..controls (264.132996,562.265991) and (269.250000,585.815979)..(269.250000,592.684021)
				..controls (269.250000,594.085999) and (269.585999,595.234009)..(270.000000,595.234009)
				..controls (270.414001,595.234009) and (270.750000,594.085999)..(270.750000,592.684021)
				..controls (270.750000,585.815979) and (275.867004,562.265991)..(280.613007,547.301025)
				..controls (288.191010,523.398010) and (294.562988,509.746002)..(322.355011,457.808990)
				..controls (347.242004,411.304993) and (362.722992,381.085999)..(366.281006,372.070007)
				..controls (375.703003,348.175995) and (376.230011,320.277008)..(367.648010,299.847992)
				..controls (364.171997,291.574005) and (358.781006,284.265991)..(348.750000,274.230011)
				..controls (331.449005,256.917999) and (313.117004,246.996002)..(291.195007,243.070007)
				..controls (283.292999,241.651993) and (263.550995,241.063004)..(255.750000,242.003998)
				--cycle withcolor black;

			% Reflex in central
			fill (292.500000,261.429993)..controls (302.691010,263.691010) and (312.746002,267.984009)..(321.800995,273.949005)
				..controls (338.093994,284.675995) and (349.867004,299.484009)..(354.851990,315.515991)
				..controls (357.503998,324.054993) and (357.359009,336.605011)..(354.503998,346.191010)
				..controls (348.816010,365.265991) and (336.257996,391.210999)..(320.726990,415.984009)
				..controls (314.636993,425.699005) and (306.046997,438.484009)..(305.609009,438.484009)
				..controls (305.414001,438.484009) and (307.566010,433.843994)..(310.398010,428.171997)
				..controls (323.867004,401.175995) and (332.582001,375.285004)..(335.703003,353.011993)
				..controls (337.457001,340.515991) and (336.816010,322.972992)..(334.246002,313.082001)
				..controls (331.996002,304.433990) and (327.542999,294.605011)..(322.976990,288.226990)
				..controls (314.687988,276.648010) and (301.199005,266.945007)..(286.355011,261.890991)
				..controls (281.683990,260.296997) and (281.261993,260.023010)..(283.500000,260.019989)
				..controls (284.945007,260.019989) and (288.992004,260.652008)..(292.500000,261.429993)
				--cycle withcolor white;

			% Lower left
			fill (129.750000,262.656006)..controls (119.155998,264.937988) and (112.589996,270.269989)..(111.930000,277.117004)
				..controls (111.448997,282.128998) and (112.839996,285.863007)..(116.578003,289.601990)
				..controls (124.438004,297.460999) and (136.324005,294.691010)..(146.901993,282.527008)
				..controls (152.003998,276.664001) and (158.457001,271.738007)..(165.050995,268.687988)
				--(170.332001,266.242004)--(162.977005,264.605011)..controls (148.156006,261.308990) and (138.598007,260.750000)..(129.750000,262.656006)
				--cycle withcolor black;

			% Lower right
			fill (388.875000,262.257996)..controls (386.398010,262.632996) and (381.066010,263.683990)..(377.023010,264.593994)
				--(369.667999,266.242004)--(374.949005,268.687988)..controls (381.593994,271.765991) and (388.027008,276.687988)..(393.148010,282.617004)
				..controls (400.546997,291.179993) and (409.562988,295.433990)..(416.574005,293.667999)
				..controls (425.679993,291.375000) and (430.832001,280.738007)..(426.730011,272.695007)
				..controls (423.394989,266.156006) and (414.281006,262.273010)..(401.250000,261.835999)
				..controls (396.917999,261.687988) and (391.351990,261.878998)..(388.875000,262.257996)
				--cycle withcolor black;

			% Upper left
			fill (155.035004,298.992004)..controls (148.757996,303.933990) and (134.410004,308.132996)..(113.109001,311.269989)
				..controls (96.882797,313.656006) and (92.835899,315.078003)..(87.085899,320.398010)
				..controls (80.851601,326.171997) and (78.421898,331.726990)..(78.414101,340.234009)
				..controls (78.406303,347.992004) and (80.539101,353.312988)..(85.742203,358.519989)
				..controls (89.855499,362.628998) and (93.648399,364.628998)..(100.296997,366.191010)
				..controls (121.258003,371.121002) and (140.535004,353.421997)..(151.897995,318.828003)
				..controls (154.488007,310.941010) and (157.718994,298.207001)..(157.253998,297.738007)
				..controls (157.102005,297.585999) and (156.104996,298.152008)..(155.035004,298.992004)
				--cycle withcolor black;

			% Upper right
			fill (382.500000,297.710999)..controls (382.500000,299.195007) and (386.046997,312.566010)..(388.101990,318.828003)
				..controls (399.464996,353.421997) and (418.742004,371.121002)..(439.703003,366.191010)
				..controls (446.351990,364.628998) and (450.144989,362.628998)..(454.257996,358.519989)
				..controls (459.460999,353.312988) and (461.593994,347.992004)..(461.585999,340.234009)
				..controls (461.578003,331.726990) and (459.148010,326.171997)..(452.914001,320.398010)
				..controls (447.164001,315.078003) and (443.117004,313.656006)..(426.890991,311.269989)
				..controls (405.535004,308.125000) and (391.554993,303.957001)..(384.187988,298.542999)
				..controls (383.257996,297.859009) and (382.500000,297.484009)..(382.500000,297.710999)
				--cycle withcolor black;
		);
		picture water_drip;
		water_drip := water_drip_raw shifted (-(llcorner water_drip_raw)-(urcorner water_drip_raw - llcorner water_drip_raw)/2) scaled (u / max((xpart urcorner water_drip_raw) - (xpart llcorner water_drip_raw), (ypart urcorner water_drip_raw) - (ypart llcorner water_drip_raw)));

		def p_u_water_drip(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw water_drip;
		enddef;

		picture photo_raw;
	 	photo_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (196.261993,477.843994)..controls (190.938004,477.574005) and (190.414001,477.390991)..(188.386993,475.125000)
			    --(186.214996,472.695007)--(186.214996,445.718994)--(111.441002,445.718994)
			    --(108.515999,443.550995)..controls (103.637001,439.941010) and (75.367203,410.992004)..(74.511703,408.730011)
			    ..controls (73.980499,407.316010) and (73.714798,390.519989)..(73.714798,357.843994)
			    ..controls (73.714798,314.980011) and (73.859398,308.765991)..(74.898399,306.578003)
			    ..controls (75.546898,305.207001) and (76.644501,303.804993)..(77.335899,303.464996)
			    ..controls (78.023399,303.121002) and (102.719002,302.671997)..(132.214996,302.468994)
			    --(185.839996,302.093994)--(186.214996,296.355011)..controls (186.604996,290.378998) and (187.781006,288.039001)..(191.089996,286.671997)
			    --(191.089996,286.667999)..controls (191.914001,286.328003) and (222.401993,286.117004)..(258.835999,286.195007)
			    --(325.089996,286.343994)--(327.273010,288.792999)..controls (329.281006,291.035004) and (329.464996,291.710999)..(329.464996,296.855011)
			    --(329.464996,302.468994)--(436.828003,302.468994)--(439.023010,304.660004)
			    --(441.214996,306.851990)--(441.214996,409.234009)--(424.527008,426.148010)
			    ..controls (415.347992,435.453003) and (406.996002,443.660004)..(405.964996,444.386993)
			    ..controls (404.234009,445.605011) and (401.195007,445.707001)..(366.777008,445.710999)
			    --(329.464996,445.718994)--(329.464996,472.695007)--(327.292999,475.125000)
			    ..controls (325.265991,477.390991) and (324.738007,477.574005)..(319.417999,477.843994)
			    --cycle withcolor black;
			pickup pencircle scaled 14.173200bp;
			linecap := rounded;
			linejoin := beveled;
			draw (193.949005,500.894989)--(108.339996,620.598022) withcolor black;
			draw (320.472992,500.894989)--(406.082001,620.598022) withcolor black;
		);
		picture photo;
		photo := photo_raw shifted (-(llcorner photo_raw)-(urcorner photo_raw - llcorner photo_raw)/2) scaled (u / max((xpart urcorner photo_raw) - (xpart llcorner photo_raw), (ypart urcorner photo_raw) - (ypart llcorner photo_raw)));

		def p_u_photo(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw photo;
		enddef;

		picture archeo_excavation_raw;
	 	archeo_excavation_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (287.707001,416.679993)--(292.015991,416.695007)..controls (292.015991,416.695007) and (299.628998,406.097992)..(300.054993,392.695007)
				..controls (300.476990,379.363007) and (292.015991,368.695007)..(292.015991,368.695007)
				..controls (292.015991,368.695007) and (281.699005,375.929993)..(263.625000,375.660004)
				..controls (251.324005,375.476990) and (243.804993,368.695007)..(243.804993,368.695007)
				..controls (243.270004,397.148010) and (262.109009,416.285004)..(287.707001,416.679993)
				--cycle withcolor black;
			fill (416.839996,408.375000)..controls (415.539001,417.968994) and (412.015991,424.195007)..(412.015991,424.195007)
				--(425.039001,431.160004)..controls (435.449005,436.726990) and (444.488007,424.195007)..(444.488007,424.195007)
				..controls (443.171997,398.437988) and (434.550995,393.347992)..(412.015991,392.554993)
				..controls (412.015991,392.554993) and (418.355011,397.179993)..(416.839996,408.375000)
				--cycle withcolor black;
			fill (335.730011,420.445007)..controls (334.972992,431.511993) and (340.015991,440.695007)..(340.015991,440.695007)
				..controls (369.687988,440.789001) and (379.765991,426.910004)..(379.765991,400.195007)
				..controls (379.765991,400.195007) and (363.777008,404.859009)..(355.605011,404.480011)
				..controls (350.222992,404.230011) and (340.015991,400.195007)..(340.015991,400.195007)
				..controls (340.015991,400.195007) and (336.203003,413.562988)..(335.730011,420.445007)
				--cycle withcolor black;
			fill (199.766006,415.632996)--(242.074005,555.250000)--(312.640991,574.762024)
				--(329.164001,558.448975)--(351.621002,580.940979)--(335.527008,597.085999)
				--(422.898010,683.695007)--(466.386993,640.940979)--(379.031006,553.581970)
				--(362.871002,569.690979)--(340.414001,547.195007)--(359.035004,528.531006)
				--(339.640991,457.628998)--cycle withcolor black;
			fill (139.770004,472.195007)..controls (139.770004,472.195007) and (162.136993,469.976990)..(171.679993,469.976990)
				..controls (181.223007,469.976990) and (194.520004,472.195007)..(194.520004,472.195007)
				..controls (189.628998,464.796997) and (187.457001,464.328003)..(194.520004,456.445007)
				..controls (194.520004,456.445007) and (181.223007,454.226990)..(171.679993,454.226990)
				..controls (162.136993,454.226990) and (139.770004,456.445007)..(139.770004,456.445007)
				..controls (133.964996,463.789001) and (129.507996,464.847992)..(139.770004,472.195007)
				--cycle withcolor black;
			fill (361.765991,472.195007)..controls (361.765991,472.195007) and (380.382996,471.281006)..(392.410004,470.589996)
				..controls (409.238007,469.617004) and (426.968994,468.011993)..(447.996002,469.859009)
				..controls (469.019989,471.710999) and (492.265991,472.195007)..(492.265991,472.195007)
				..controls (498.632996,465.046997) and (502.011993,464.191010)..(492.265991,456.445007)
				..controls (492.265991,456.445007) and (469.019989,455.960999)..(447.996002,454.109009)
				..controls (426.968994,452.261993) and (409.238007,453.867004)..(392.410004,454.839996)
				..controls (380.382996,455.531006) and (361.765991,456.445007)..(361.765991,456.445007)
				..controls (366.421997,465.175995) and (365.875000,463.652008)..(361.765991,472.195007)
				--cycle withcolor black;
		);
		picture archeo_excavation;
		archeo_excavation := archeo_excavation_raw shifted (-(llcorner archeo_excavation_raw)-(urcorner archeo_excavation_raw - llcorner archeo_excavation_raw)/2) scaled (u / max((xpart urcorner archeo_excavation_raw) - (xpart llcorner archeo_excavation_raw), (ypart urcorner archeo_excavation_raw) - (ypart llcorner archeo_excavation_raw)));

		def p_u_archeo_excavation(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw archeo_excavation;
		enddef;

		picture audio_raw;
	 	audio_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (314.640991,130.460999)--(133.929993,283.558990)--(-27.480499,284.308990)
				..controls (-48.035198,290.410004) and (-45.867199,312.503998)..(-45.480499,329.410004)
				--(-45.480499,511.558990)..controls (-45.480499,526.468994) and (-42.972698,529.745972)..(-30.328100,529.848022)
				--(137.309006,531.187988)--(310.714996,679.559021)..controls (327.601990,694.004028) and (345.636993,668.776978)..(345.683990,648.054993)
				--(346.769989,149.309006)..controls (346.796997,135.520004) and (325.503998,121.258003)..(314.640991,130.460999)
				--cycle withcolor black;
			fill (543.453003,131.703003)..controls (515.234009,145.617004) and (528.679993,182.141006)..(546.554993,198.917999)
				..controls (581.757996,242.824005) and (598.590027,298.847992)..(607.195007,353.710999)
				..controls (621.031006,455.386993) and (592.995972,563.617004)..(525.801025,642.023010)
				..controls (516.059021,670.995972) and (555.801025,686.229980)..(574.934021,667.098022)
				..controls (594.815979,648.090027) and (601.637024,619.629028)..(616.742004,596.979980)
				..controls (690.109009,452.046997) and (673.737976,262.539001)..(565.940979,138.757996)
				..controls (560.190979,132.983994) and (551.515991,129.875000)..(543.453003,131.703003)
				--cycle withcolor black;
			fill (474.886993,198.714996)..controls (459.824005,202.483994) and (454.394989,220.261993)..(459.855011,233.589996)
				..controls (464.097992,249.574005) and (478.500000,259.363007)..(484.554993,274.421997)
				..controls (532.534973,365.339996) and (526.406006,483.425995)..(465.480011,566.906006)
				..controls (448.011993,581.585999) and (460.593994,614.026978)..(483.203003,613.401978)
				..controls (502.191010,611.776978) and (509.445007,589.953003)..(520.195007,576.973022)
				..controls (565.409973,503.257996) and (578.242004,411.195007)..(558.507996,327.289001)
				..controls (547.543030,281.679993) and (527.409973,237.332001)..(496.113007,202.093994)
				..controls (490.089996,197.664001) and (481.984009,197.050995)..(474.886993,198.714996)
				--cycle withcolor black;
			fill (402.136993,271.460999)..controls (380.183990,278.046997) and (380.566010,306.960999)..(395.011993,320.855011)
				..controls (424.847992,374.468994) and (423.910004,443.730011)..(391.546997,496.042999)
				..controls (384.699005,505.656006) and (380.429993,519.051025)..(388.863007,529.190979)
				..controls (397.257996,542.304993) and (417.632996,544.890991)..(427.898010,532.421997)
				..controls (440.445007,516.648010) and (448.773010,497.726990)..(455.656006,478.851990)
				..controls (478.277008,412.656006) and (469.113007,335.140991)..(427.738007,278.167999)
				..controls (421.359009,271.335999) and (411.015991,269.113007)..(402.136993,271.460999)
				--cycle withcolor black;
		);
		picture audio;
		audio := audio_raw shifted (-(llcorner audio_raw)-(urcorner audio_raw - llcorner audio_raw)/2) scaled (u / max((xpart urcorner audio_raw) - (xpart llcorner audio_raw), (ypart urcorner audio_raw) - (ypart llcorner audio_raw)));

		def p_u_audio(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw audio;
		enddef;

		picture bat_raw;
	 	bat_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (277.488007,424.792999)..controls (272.894989,434.519989) and (263.367004,443.429993)..(251.983994,442.863007)
				..controls (248.464996,443.199005) and (244.320007,441.933990)..(241.292999,441.675995)
				..controls (237.809006,449.964996) and (232.425995,458.625000)..(223.214996,461.117004)
				..controls (219.953003,462.902008) and (212.664001,461.671997)..(211.785004,464.613007)
				..controls (218.917999,472.187988) and (227.660004,478.246002)..(237.460999,481.828003)
				..controls (243.925995,486.605011) and (244.578003,476.667999)..(249.608994,474.640991)
				..controls (254.914001,471.093994) and (261.207001,469.039001)..(267.539001,468.480011)
				..controls (271.558990,469.441010) and (269.082001,482.808990)..(271.382996,485.730011)
				..controls (272.613007,483.261993) and (273.843994,480.789001)..(275.074005,478.320007)
				..controls (278.953003,478.355011) and (282.835999,478.394989)..(286.714996,478.429993)
				..controls (287.792999,481.132996) and (288.867004,483.832001)..(289.945007,486.535004)
				..controls (292.847992,481.515991) and (289.890991,472.000000)..(291.878998,469.421997)
				..controls (294.636993,465.855011) and (300.988007,469.570007)..(305.085999,470.757996)
				..controls (311.015991,472.937988) and (315.488007,477.519989)..(319.691010,482.031006)
				..controls (324.792999,484.628998) and (330.195007,478.914001)..(334.761993,476.960999)
				..controls (340.425995,473.109009) and (345.878998,468.613007)..(350.089996,463.214996)
				..controls (344.367004,462.125000) and (337.808990,463.082001)..(332.902008,459.050995)
				..controls (326.957001,454.792999) and (322.886993,448.503998)..(319.714996,442.023010)
				..controls (311.726990,443.500000) and (302.800995,444.183990)..(295.828003,439.175995)
				..controls (289.593994,435.000000) and (284.984009,428.664001)..(281.613007,422.046997)
				..controls (280.562988,416.171997) and (278.707001,423.121002)..(277.488007,424.792999)
				--cycle withcolor black;
		);
		picture bat;
		bat := bat_raw shifted (-(llcorner bat_raw)-(urcorner bat_raw - llcorner bat_raw)/2) scaled (u / max((xpart urcorner bat_raw) - (xpart llcorner bat_raw), (ypart urcorner bat_raw) - (ypart llcorner bat_raw)));

		def p_u_bat(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw bat;
		enddef;

		picture bone_raw;
	 	bone_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (431.519989,355.367004)..controls (439.332001,357.773010) and (446.367004,363.406006)..(448.746002,371.472992)
				..controls (451.675995,379.433990) and (454.441010,387.687988)..(460.398010,393.996002)
				..controls (465.445007,399.121002) and (466.722992,407.750000)..(461.375000,413.125000)
				..controls (454.636993,420.722992) and (443.699005,422.746002)..(434.062988,420.875000)
				..controls (413.761993,418.125000) and (394.375000,426.605011)..(376.656006,435.492004)
				..controls (359.554993,443.992004) and (343.085999,453.679993)..(326.242004,462.660004)
				..controls (315.578003,458.410004) and (305.753998,452.203003)..(295.695007,446.683990)
				..controls (328.738007,427.128998) and (360.859009,405.906006)..(391.253998,382.429993)
				..controls (401.566010,375.320007) and (405.562988,362.000000)..(416.507996,355.722992)
				..controls (421.175995,353.644989) and (426.707001,354.011993)..(431.519989,355.367004)
				--cycle withcolor black;
			fill (152.895004,355.078003)..controls (166.824005,364.101990) and (173.125000,381.324005)..(188.257996,389.347992)
				..controls (245.468994,431.773010) and (307.578003,467.289001)..(371.308990,498.886993)
				..controls (388.023010,507.136993) and (406.855011,505.839996)..(424.742004,503.636993)
				..controls (440.761993,501.203003) and (458.082001,510.050995)..(462.636993,526.195007)
				..controls (470.664001,539.328003) and (458.320007,559.078003)..(442.750000,552.418030)
				..controls (423.910004,550.132996) and (431.214996,580.854980)..(412.996002,580.637024)
				..controls (393.187988,581.995972) and (385.792999,561.031006)..(374.714996,548.945007)
				..controls (353.605011,523.198975) and (322.554993,509.476990)..(294.937988,492.144989)
				..controls (256.812988,470.316010) and (219.167999,447.398010)..(179.449005,428.554993)
				..controls (163.792999,421.371002) and (146.339996,419.078003)..(129.313004,421.339996)
				..controls (113.133003,423.816010) and (96.605499,403.914001)..(112.137001,391.582001)
				..controls (121.301003,379.003998) and (122.055000,357.570007)..(141.074005,354.890991)
				..controls (144.945007,354.253998) and (149.102005,353.761993)..(152.895004,355.078003)
				--cycle withcolor black;
			fill (260.144989,483.949005)..controls (263.820007,486.957001) and (273.628998,489.824005)..(272.796997,493.515991)
				..controls (253.703003,505.757996) and (233.608994,516.495972)..(215.270004,529.875000)
				..controls (200.854996,541.218994) and (189.815994,556.043030)..(179.354996,570.918030)
				..controls (172.570007,578.956970) and (160.289001,583.492004)..(150.425995,578.687988)
				..controls (141.875000,572.520020) and (144.352005,558.820007)..(135.093994,553.328003)
				..controls (127.835999,549.840027) and (118.973000,557.159973)..(112.640999,550.801025)
				..controls (105.644997,545.887024) and (104.188004,536.515991)..(107.078003,528.882996)
				..controls (110.121002,516.456970) and (120.280998,505.574005)..(133.335999,504.035004)
				..controls (148.824005,501.722992) and (164.285004,507.753998)..(179.738007,504.601990)
				..controls (197.522995,502.007996) and (212.848007,491.800995)..(228.699005,484.050995)
				..controls (234.632996,481.855011) and (240.516006,476.054993)..(246.613007,476.421997)
				..controls (251.171997,478.839996) and (255.656006,481.398010)..(260.144989,483.949005)
				--cycle withcolor black;
		);
		picture bone;
		bone := bone_raw shifted (-(llcorner bone_raw)-(urcorner bone_raw - llcorner bone_raw)/2) scaled (u / max((xpart urcorner bone_raw) - (xpart llcorner bone_raw), (ypart urcorner bone_raw) - (ypart llcorner bone_raw)));

		def p_u_bone(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw bone;
		enddef;

		picture mud_crack_raw;
	 	mud_crack_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (320.054993,501.851990)..controls (322.796997,501.726990) and (328.453003,493.746002)..(334.628998,481.273010)
				..controls (337.898010,474.671997) and (340.339996,469.050995)..(340.050995,468.777008)
				..controls (339.765991,468.500000) and (335.308990,467.199005)..(330.152008,465.878998)
				..controls (324.996002,464.558990) and (320.457001,463.179993)..(320.066010,462.812988)
				..controls (320.058990,462.804993) and (320.042999,462.796997)..(320.031006,462.789001)
				--(320.031006,457.550995)..controls (321.578003,457.828003) and (323.218994,458.121002)..(324.527008,458.363007)
				..controls (329.066010,459.214996) and (334.636993,460.226990)..(336.902008,460.617004)
				..controls (339.171997,461.007996) and (343.125000,461.683990)..(345.683990,462.125000)
				..controls (347.464996,462.429993) and (348.757996,462.597992)..(350.121002,462.558990)
				..controls (352.394989,462.492004) and (354.867004,461.843994)..(360.152008,460.289001)
				..controls (369.207001,457.625000) and (371.933990,456.863007)..(375.527008,456.000000)
				..controls (377.589996,455.503998) and (379.449005,454.898010)..(379.652008,454.648010)
				..controls (379.859009,454.402008) and (381.480011,453.777008)..(383.253998,453.257996)
				..controls (387.683990,451.964996) and (387.937988,450.636993)..(384.441010,447.121002)
				..controls (382.839996,445.511993) and (381.105011,443.761993)..(380.585999,443.234009)
				..controls (380.066010,442.703003) and (377.902008,440.500000)..(375.773010,438.335999)
				..controls (373.644989,436.171997) and (371.628998,434.398010)..(371.292999,434.398010)
				..controls (370.957001,434.398010) and (368.906006,433.261993)..(366.730011,431.875000)
				..controls (364.558990,430.488007) and (359.910004,427.933990)..(356.402008,426.195007)
				..controls (346.820007,421.449005) and (347.589996,421.546997)..(342.421997,424.402008)
				..controls (336.843994,427.480011) and (329.011993,428.625000)..(320.402008,427.621002)
				..controls (320.269989,427.605011) and (320.164001,427.597992)..(320.031006,427.582001)
				--(320.031006,423.437988)..controls (324.757996,424.316010) and (331.652008,424.863007)..(331.652008,424.277008)
				..controls (331.652008,423.265991) and (327.375000,407.433990)..(323.746002,395.023010)
				..controls (322.425995,390.511993) and (321.679993,387.945007)..(320.863007,385.140991)
				--(325.843994,385.140991)..controls (326.894989,389.371002) and (329.109009,397.710999)..(333.953003,415.835999)
				..controls (335.105011,420.152008) and (336.066010,422.398010)..(336.761993,422.398010)
				..controls (337.343994,422.398010) and (339.789001,421.347992)..(342.195007,420.066010)
				..controls (347.164001,417.417999) and (346.859009,418.167999)..(348.480011,404.753998)
				..controls (349.472992,396.562988) and (350.285004,390.804993)..(351.273010,385.140991)
				--(355.746002,385.140991)..controls (355.734009,385.187988) and (355.722992,385.222992)..(355.710999,385.273010)
				..controls (355.304993,386.921997) and (354.449005,390.296997)..(353.808990,392.773010)
				..controls (351.656006,401.089996) and (349.738007,410.289001)..(349.242004,414.703003)
				..controls (348.757996,418.984009) and (348.792999,419.105011)..(350.886993,420.085999)
				..controls (359.039001,423.898010) and (370.812988,428.343994)..(372.847992,428.378998)
				..controls (373.437988,428.386993) and (375.125000,427.246002)..(376.597992,425.843994)
				..controls (378.074005,424.441010) and (382.316010,420.601990)..(386.027008,417.312988)
				..controls (389.742004,414.019989) and (394.777008,409.500000)..(397.218994,407.265991)
				--(401.656006,403.199005)--(399.707001,399.109009)..controls (398.632996,396.863007) and (396.890991,393.859009)..(395.828003,392.437988)
				..controls (394.769989,391.015991) and (393.902008,389.097992)..(393.902008,388.175995)
				..controls (393.902008,387.789001) and (394.441010,386.667999)..(395.304993,385.140991)
				--(397.792999,385.140991)--(396.074005,387.714996)--(397.500000,391.761993)
				..controls (398.281006,393.988007) and (399.843994,397.265991)..(400.968994,399.050995)
				--(403.015991,402.292999)--(409.148010,401.757996)..controls (412.519989,401.464996) and (416.019989,400.839996)..(416.921997,400.375000)
				..controls (417.828003,399.906006) and (420.742004,397.414001)..(423.394989,394.835999)
				..controls (427.835999,390.523010) and (429.902008,389.222992)..(429.902008,390.746002)
				..controls (429.902008,391.074005) and (427.121002,394.281006)..(423.714996,397.875000)
				--(417.527008,404.410004)--(410.546997,404.402008)--(403.562988,404.398010)
				--(399.398010,408.335999)..controls (397.109009,410.500000) and (392.320007,415.648010)..(388.757996,419.773010)
				..controls (385.195007,423.898010) and (382.085999,427.441010)..(381.847992,427.648010)
				..controls (381.613007,427.851990) and (380.800995,429.078003)..(380.050995,430.367004)
				..controls (378.371002,433.257996) and (378.472992,433.421997)..(387.234009,442.398010)
				--(393.468994,448.785004)--(395.687988,447.476990)..controls (396.906006,446.753998) and (398.910004,445.019989)..(400.140991,443.617004)
				..controls (401.371002,442.218994) and (403.253998,440.609009)..(404.328003,440.050995)
				..controls (405.402008,439.488007) and (408.472992,436.968994)..(411.152008,434.449005)
				..controls (417.804993,428.203003) and (425.984009,420.707001)..(429.152008,417.953003)
				--(431.777008,415.671997)--(436.746002,415.667999)--(436.746002,419.449005)
				--(433.625000,419.453003)--(427.828003,424.734009)..controls (424.636993,427.640991) and (421.781006,430.457001)..(421.480011,430.992004)
				..controls (421.175995,431.531006) and (417.464996,434.957001)..(413.230011,438.605011)
				..controls (408.996002,442.253998) and (404.183990,446.515991)..(402.539001,448.070007)
				..controls (400.890991,449.625000) and (399.140991,450.898010)..(398.640991,450.898010)
				..controls (398.144989,450.898010) and (397.253998,451.589996)..(396.660004,452.437988)
				..controls (395.167999,454.566010) and (396.207001,456.437988)..(401.347992,460.894989)
				..controls (404.136993,463.308990) and (405.257996,464.113007)..(406.628998,464.207001)
				..controls (407.085999,464.238007) and (407.570007,464.191010)..(408.152008,464.097992)
				..controls (410.980011,463.648010) and (430.226990,461.476990)..(436.746002,460.843994)
				--(436.746002,464.519989)..controls (429.597992,464.921997) and (409.097992,467.718994)..(408.355011,468.421997)
				..controls (407.355011,469.371002) and (404.265991,480.101990)..(404.121002,483.140991)
				..controls (404.042999,484.757996) and (404.425995,485.070007)..(407.027008,485.492004)
				..controls (408.679993,485.757996) and (413.402008,486.511993)..(417.527008,487.164001)
				..controls (421.652008,487.812988) and (428.234009,488.871002)..(432.152008,489.519989)
				..controls (433.320007,489.710999) and (434.949005,489.957001)..(436.746002,490.222992)
				--(436.746002,493.332001)..controls (433.882996,492.855011) and (431.183990,492.417999)..(429.527008,492.171997)
				..controls (426.640991,491.750000) and (419.796997,490.605011)..(414.316010,489.636993)
				..controls (407.234009,488.378998) and (404.199005,488.109009)..(403.816010,488.695007)
				..controls (403.511993,489.167999) and (403.429993,495.578003)..(403.507996,501.851990)
				--(399.238007,501.851990)..controls (399.085999,491.000000) and (399.281006,486.882996)..(400.128998,483.847992)
				..controls (400.757996,481.605011) and (401.734009,477.199005)..(402.300995,474.054993)
				--(403.328003,468.335999)--(399.554993,464.867004)..controls (397.476990,462.960999) and (394.617004,460.554993)..(393.195007,459.523010)
				..controls (391.777008,458.492004) and (390.089996,457.687988)..(389.445007,457.734009)
				..controls (387.281006,457.894989) and (352.015991,467.035004)..(351.476990,467.574005)
				..controls (351.058990,467.996002) and (355.062988,473.710999)..(357.128998,475.648010)
				..controls (357.347992,475.855011) and (360.382996,479.566010)..(363.867004,483.898010)
				..controls (367.351990,488.230011) and (370.390991,491.941010)..(370.617004,492.148010)
				..controls (371.703003,493.132996) and (375.835999,498.390991)..(378.367004,501.851990)
				--(370.558990,501.851990)..controls (369.832001,500.847992) and (368.628998,499.343994)..(367.144989,497.621002)
				..controls (364.718994,494.800995) and (360.683990,489.800995)..(358.179993,486.507996)
				..controls (355.671997,483.218994) and (351.960999,477.917999)..(349.929993,474.734009)
				--(346.238007,468.949005)--(344.355011,471.359009)..controls (343.320007,472.687988) and (340.820007,476.472992)..(338.796997,479.773010)
				..controls (336.777008,483.074005) and (332.867004,489.160004)..(330.105011,493.296997)
				..controls (327.878998,496.636993) and (326.085999,499.476990)..(324.699005,501.851990)
				--cycle withcolor black;
		);
		picture mud_crack;
		mud_crack := mud_crack_raw shifted (-(llcorner mud_crack_raw)-(urcorner mud_crack_raw - llcorner mud_crack_raw)/2) scaled (u / max((xpart urcorner mud_crack_raw) - (xpart llcorner mud_crack_raw), (ypart urcorner mud_crack_raw) - (ypart llcorner mud_crack_raw)));

		def p_u_mud_crack(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw mud_crack;
		enddef;

		picture pendant_raw;
	 	pendant_raw := image(
			pickup pencircle scaled 22.011000bp;
			linecap := butt;
			linejoin := mitered;
			draw (476.980011,639.585999)..controls (471.453003,639.585999) and (422.562988,621.965027)..(428.812988,575.375000)
				..controls (434.457001,533.296997) and (506.785004,503.894989)..(505.894989,457.292999)
				..controls (502.128998,260.425995) and (383.000000,164.895004)..(289.718994,164.895004)
				..controls (196.440994,164.895004) and (77.312500,260.425995)..(73.546898,457.292999)
				..controls (72.656303,503.894989) and (144.983994,533.296997)..(150.628998,575.375000)
				..controls (156.875000,621.965027) and (107.987999,639.585999)..(102.460999,639.585999);
		);
		picture pendant;
		pendant := pendant_raw shifted (-(llcorner pendant_raw)-(urcorner pendant_raw - llcorner pendant_raw)/2) scaled (u / max((xpart urcorner pendant_raw) - (xpart llcorner pendant_raw), (ypart urcorner pendant_raw) - (ypart llcorner pendant_raw)));

		def p_u_pendant(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw pendant;
		enddef;

		picture seed_germination_raw;
	 	seed_germination_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (307.054993,644.315979)..controls (300.976990,644.448975) and (294.867004,639.804993)..(294.738007,630.190979)
				--(294.335999,599.620972)..controls (284.722992,608.976990) and (274.328003,617.726990)..(262.230011,623.710999)
				..controls (233.117004,639.257996) and (197.210999,637.718994)..(168.223007,622.632996)
				..controls (168.651993,602.362976) and (174.352005,582.090027)..(185.996002,565.354980)
				..controls (208.809006,530.617004) and (253.582001,512.960999)..(294.003998,522.429993)
				--(294.472992,470.847992)--(266.761993,439.105011)--(306.425995,346.949005)
				--(346.359009,438.929993)--(319.855011,469.644989)--(319.179993,502.457001)
				..controls (319.179993,502.457001) and (334.320007,493.828003)..(350.433990,495.203003)
				..controls (400.753998,499.503998) and (444.437988,544.109009)..(444.414001,594.953003)
				..controls (435.062988,605.223022) and (415.863007,608.715027)..(401.238007,609.000000)
				..controls (370.246002,611.851990) and (339.906006,597.054993)..(319.179993,574.590027)
				--(319.179993,629.757996)..controls (319.179993,639.273010) and (313.132996,644.184021)..(307.054993,644.315979)
				--cycle;
			fill (378.417999,450.589996)--(317.867004,297.796997)..controls (313.351990,286.406006) and (305.851990,284.824005)..(299.785004,298.843994)
				--(234.445007,449.886993)..controls (205.804993,427.437988) and (190.828003,389.375000)..(194.429993,353.316010)
				..controls (197.300995,318.671997) and (218.117004,287.230011)..(247.104996,268.855011)
				--(375.769989,275.878998)..controls (390.304993,287.136993) and (402.128998,301.910004)..(409.453003,319.289001)
				..controls (429.414001,363.664001) and (416.367004,419.933990)..(378.417999,450.589996)
				--cycle;
			pickup pencircle scaled 17.511600bp;
			draw (101.250000,276.343994)..controls (177.468994,243.992004) and (396.476990,296.585999)..(502.667999,269.492004);
		);
		picture seed_germination;
		seed_germination := seed_germination_raw shifted (-(llcorner seed_germination_raw)-(urcorner seed_germination_raw - llcorner seed_germination_raw)/2) scaled (u / max((xpart urcorner seed_germination_raw) - (xpart llcorner seed_germination_raw), (ypart urcorner seed_germination_raw) - (ypart llcorner seed_germination_raw)));

		def p_u_seed_germination(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw seed_germination;
		enddef;

		picture tree_trunk_raw;
	 	tree_trunk_raw := image(
			linecap := butt;
			linejoin := mitered;
			fill (223.335999,206.113007)..controls (172.589996,211.957001) and (132.348007,248.246002)..(122.214996,297.292999)
				..controls (114.875000,332.824005) and (124.875000,370.128998)..(148.983994,397.140991)
				--(382.371002,582.289001)..controls (387.332001,585.539001) and (393.710999,578.987976)..(390.109009,574.343994)
				--(155.617004,387.167999)..controls (145.348007,374.753998) and (138.593994,361.570007)..(134.348007,345.644989)
				..controls (132.147995,337.398010) and (132.042999,336.343994)..(131.996002,321.644989)
				..controls (131.940994,305.058990) and (132.651993,299.835999)..(136.546997,288.128998)
				..controls (144.358994,264.656006) and (161.320007,243.809006)..(183.016006,231.003998)
				..controls (192.949005,225.141006) and (207.378998,220.074005)..(219.695007,218.121002)
				..controls (227.492004,216.886993) and (244.050995,217.082001)..(252.320007,218.507996)
				..controls (273.097992,222.085999) and (293.187988,232.574005)..(308.238007,247.699005)
				--(489.460999,476.093994)..controls (493.562988,478.398010) and (498.925995,473.335999)..(496.957001,469.019989)
				--(326.375000,250.934006)..controls (316.753998,239.003998) and (309.160004,231.891006)..(298.398010,224.738007)
				..controls (286.390991,216.753998) and (268.554993,209.664001)..(254.598007,207.324005)
				..controls (245.925995,205.871002) and (230.582001,205.276993)..(223.335999,206.113007)
				--cycle;
			fill (219.261993,237.651993)..controls (192.348007,242.207001) and (168.414001,260.894989)..(157.723007,285.691010)
				..controls (153.089996,296.433990) and (151.742004,302.605011)..(151.285004,315.136993)
				..controls (150.828003,327.800995) and (151.636993,334.390991)..(154.863007,344.269989)
				..controls (159.000000,356.929993) and (165.309006,367.261993)..(174.695007,376.738007)
				..controls (212.621002,415.019989) and (276.734009,406.746002)..(303.976990,360.054993)
				..controls (315.027008,341.113007) and (317.964996,317.359009)..(311.859009,296.296997)
				..controls (303.140991,266.207001) and (278.640991,243.820007)..(248.007996,237.960999)
				..controls (242.093994,236.828003) and (225.199005,236.647995)..(219.261993,237.651993)
				--cycle;
			fill (371.914001,396.238007)--(437.273010,472.726990)..controls (441.355011,474.332001) and (446.117004,469.890991)..(444.609009,465.882996)
				--(377.296997,394.843994)..controls (374.605011,394.125000) and (373.824005,394.324005)..(371.914001,396.238007)
				--cycle;
			fill (281.343994,435.730011)..controls (279.148010,437.007996) and (278.429993,439.871002)..(279.621002,442.621002)
				--(349.585999,511.394989)..controls (352.613007,511.394989) and (354.949005,509.390991)..(355.550995,506.261993)
				--(284.937988,434.917999)..controls (283.703003,434.929993) and (282.085999,435.296997)..(281.343994,435.730011)
				--cycle;
			fill (386.296997,487.449005)..controls (384.804993,488.625000) and (384.320007,489.675995)..(384.320007,491.753998)
				--(454.964996,562.395020)..controls (457.039001,562.395020) and (458.093994,561.914001)..(459.265991,560.418030)
				--cycle;
		);
		picture tree_trunk;
		tree_trunk := tree_trunk_raw shifted (-(llcorner tree_trunk_raw)-(urcorner tree_trunk_raw - llcorner tree_trunk_raw)/2) scaled (u / max((xpart urcorner tree_trunk_raw) - (xpart llcorner tree_trunk_raw), (ypart urcorner tree_trunk_raw) - (ypart llcorner tree_trunk_raw)));

		def p_u_tree_trunk(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw tree_trunk;
		enddef;

		picture volcano_raw;
	 	volcano_raw := image(
			pickup pencircle scaled 21.160601bp;
			linecap := butt;
			linejoin := beveled;
			draw (36.671902,222.897995)--(169.684006,567.409973)..controls (177.815994,510.679993) and (212.089996,485.109009)..(265.714996,485.109009)
				..controls (319.335999,485.109009) and (353.609009,510.679993)..(361.742004,567.409973)
				--(494.753998,222.897995);
		);
		picture volcano;
		volcano := volcano_raw shifted (-(llcorner volcano_raw)-(urcorner volcano_raw - llcorner volcano_raw)/2) scaled (u / max((xpart urcorner volcano_raw) - (xpart llcorner volcano_raw), (ypart urcorner volcano_raw) - (ypart llcorner volcano_raw)));

		def p_u_volcano(expr pos, theta, sc, al) = 
			T:=identity aligned al rotated theta scaled sc shifted pos;
			thdraw volcano;
		enddef;

		def p_u_pillar_with_curtains(expr pos, theta, sc, al) =
			U:=(.15u,.5u);
			T:=identity aligned al rotated theta scaled sc shifted pos;
			pickup PenC;
			thdraw (0,.25u)--(0,.1u){dir 180}..(-.1u,0)..{dir 0}(0,-.1u)--(0,-.25u);
			thdraw (-.15u,-.5u)--(0,-.25u)--(.15u,-.5u);
			thdraw (-.15u,.5u)--(0,.25u)--(.15u,.5u);
		enddef;

		def p_u_pillars_with_curtains(expr pos, theta, sc, al) =
			U:=(.3u,u);
			pickup PenC;
			pickup PenC;
			for i=-1 upto 1:
				T:=identity aligned al rotated theta scaled (sc * 0.7) shifted (pos + (i * .3u, abs(i) * .15u));
				thdraw (0,.25u)--(0,.1u){dir 180}..(-.1u,0)..{dir 0}(0,-.1u)--(0,-.25u);
				thdraw (-.15u,-.5u)--(0,-.25u)--(.15u,-.5u);
				thdraw (-.15u,.5u)--(0,.25u)--(.15u,.5u);
			endfor;
		enddef;

		def p_u_curtains(expr pos, theta, sc, al) = 
			U:=(.3u, .8u);
			pickup PenC;
			for i=-1 upto 1:
				T:=identity aligned al rotated theta scaled (sc * 0.7) shifted (pos + (i * .3u, abs(i) * .15u));
				thdraw (-.15u,.4u)--(0,.15u)--(.15u,.4u);
				thdraw (0,.15u)--(0,0){dir 180}..(-.12u,-.11u)..{dir 0}(0,-.22u)--(0,-.4u);
			endfor;
		enddef;

		def p_u_helictites(expr pos,theta,sc,al) =
			U:=(.4u,.8u);
			pickup PenC;
			for i=-1 upto 1:
				if i < 0:
					T:=identity aligned al rotated theta scaled (sc * 0.7) shifted (pos + (i * .45u, abs(i) * .15u));
				else:
					T:=identity aligned al rotated theta scaled (sc * 0.7) shifted (pos + (i * .3u, abs(i) * .15u));
				fi;
				thdraw (0,.4u)--(0,-.4u);
				p := (-.2u,.4u)---(-.2u,.1u){down}..{dir -10}(-.1u,0.02u)---origin;
				thdraw p;
				thdraw p reflectedabout (origin,(0,u)) reflectedabout (origin,(u,0));
			endfor;
		enddef;

		def p_u_raft_cone (expr pos,theta,sc,al)=
			U:=(.3u,.4u);
			T:=identity aligned al rotated theta scaled sc shifted pos;
			pickup PenC;
			thdraw (-.3u,-.4u)--(0,.4u)--(.3u,-.4u);
		enddef; 

		def p_u_stalactite_stalagmite (expr pos,theta,sc,al)=
			U:=(.15u, .4u);
			T:=identity aligned al rotated theta scaled sc shifted pos;
			pickup PenC;
			thdraw (-.15u,.4u) -- (0,.2u) -- (.15u,.4u);
			thdraw (.15u,-.4u) -- (0,-.2u) -- (-.15u,-.4u);
			thdraw (0,-.2u) -- (0,-.05u);
			thdraw (0,.2u) -- (0,.05u);
		enddef;

		def p_u_stalactites_stalagmites (expr pos,theta,sc,al) =
			U:=(.3u, .8u);
			pickup PenC;
			for i=-1 upto 1:
				T:=identity aligned al rotated theta scaled (sc * 0.7) shifted (pos + (i * .3u, abs(i) * .15u));
				thdraw (-.15u,.4u) -- (0,.2u) -- (.15u,.4u);
				thdraw (.15u,-.4u) -- (0,-.2u) -- (-.15u,-.4u);
				thdraw (0,-.2u) -- (0,-.05u);
				thdraw (0,.2u) -- (0,.05u);
			endfor;
		enddef;

		def p_u_disc_stalactite(expr pos,theta,sc,al) =
			U:=(.15u, .4u);
			T:=identity aligned al rotated theta scaled sc shifted pos;
			pickup PenC;
			thdraw (0,-.4u) -- (0,.15u) -- (-.15u,.4u);
			thdraw (0,.15u) -- (.15u,.4u);
			thdraw (-.15u,-.1u) -- (.15u,-.1u);
		enddef;
		
		def p_u_disc_stalagmite(expr pos,theta,sc,al) =
			U:=(.15u, .4u);
			T:=identity aligned al rotated theta scaled sc shifted pos;
			pickup PenC;
			thdraw (0,.4u) -- (0,-.15u) -- (-.15u,-.4u);
			thdraw (0,-.15u) -- (.15u,-.4u);
			thdraw (-.15u,.1u) -- (.15u,.1u);
		enddef;
		
		def p_u_disc_pillar(expr pos,theta,sc,al) =
			U:=(.15u, .4u);
			T:=identity aligned al rotated theta scaled sc shifted pos;
			pickup PenC;
			thdraw (-.15u,.4u) -- (0,.15u) -- (0,-.15u) -- (-.15u,-.4u);
			thdraw (0,-.15u) -- (.15u,-.4u);
			thdraw (0,.15u) -- (.15u,.4u);
			thdraw (-.15u,0) -- (.15u,0);
		enddef;
		
		def p_u_discs_stalactites(expr pos,theta,sc,al) =
			U:=(.3u, .8u);
			pickup PenC;
			for i=-1 upto 1:
				T:=identity aligned al rotated theta scaled (sc * 0.7) shifted (pos + (i * .3u, abs(i) * .15u));
				thdraw (0,-.4u) -- (0,.15u) -- (-.15u,.4u);
				thdraw (0,.15u) -- (.15u,.4u);
				thdraw (-.15u,-.1u) -- (.15u,-.1u);
			endfor;
		enddef;

		def p_u_discs_stalagmites(expr pos,theta,sc,al) =
			U:=(.3u, .8u);
			pickup PenC;
			for i=-1 upto 1:
				T:=identity aligned al rotated theta scaled (sc * 0.7) shifted (pos + (i * .3u, abs(i) * .15u));
				thdraw (0,.4u) -- (0,-.15u) -- (-.15u,-.4u);
				thdraw (0,-.15u) -- (.15u,-.4u);
				thdraw (-.15u,.1u) -- (.15u,.1u);
			endfor;
		enddef;

		def p_u_discs_pillars(expr pos,theta,sc,al) =
			U:=(.3u, .8u);
			pickup PenC;
			for i=-1 upto 1:
				T:=identity aligned al rotated theta scaled (sc * 0.7) shifted (pos + (i * .3u, abs(i) * .15u));
				thdraw (-.15u,.4u) -- (0,.15u) -- (0,-.15u) -- (-.15u,-.4u);
				thdraw (0,-.15u) -- (.15u,-.4u);
				thdraw (0,.15u) -- (.15u,.4u);
				thdraw (-.15u,0) -- (.15u,0);
			endfor;
		enddef;

		def l_u_rimstonedam (expr P) =
			cas := 0;
			distance := arclength P;
			mystep := adjust_step(distance, 0.9u);
			pickup PenC;
			forever:
				t  := arctime (cas + mystep/2) of P;
				T := identity rotated angle(thdir(P,t)) scaled 0.7 shifted (point t of P);
				thdraw (-.45u,.2u){dir -80}..{dir -50}(-.15u,0){dir 30}..{dir -30}(.15u,.1u){dir -50}..{dir 70}(.45u,.2u);
				cas := cas + mystep;
				exitif cas > distance - (2*mystep/3); % for rounding errors
			endfor;
		enddef;
		
		def l_u_rimstonepool (expr P) =
			cas := 0;
			distance := arclength P;
			mystep := adjust_step(distance, 0.9u);
			pickup PenC;
			forever:
				t  := arctime (cas + mystep/2) of P;
				T := identity rotated angle(thdir(P,t)) scaled 0.7 shifted (point t of P);
				p := (-.45u,.2u){dir -80}..{dir -50}(-.15u,-.1u){dir 30}..{dir -30}(.15u,.1u){dir -50}..{dir 70}(.45u,.2u);
				thfill buildcycle(p,((.5u,.15u)--(-.5u,.15u)));
				thdraw p;
				cas := cas + mystep;
				exitif cas > distance - (2*mystep/3); % for rounding errors
			endfor;
		enddef;

	endcode
	
endlayout

text en "point u:notwheelchair" "not wheelchair accessible"
text pt "point u:notwheelchair" "n��o acess��vel com cadeiras de rodas"

text en "point u:wheelchair" "wheelchair accessible"
text pt "point u:wheelchair" "acess��vel com cadeiras de rodas"

text en "point u:walkway_metalic" "walkway metalic"
text pt "point u:walkway_metalic" "passarela met��lica"

text en "point u:walkway_soil" "walkway soil"
text pt "point u:walkway_soil" "passarela de terra"

text en "point u:walkway_stone" "walkway stone"
text pt "point u:walkway_stone" "passarela em pedra"

text en "point u:walkway_wood" "walkway wood"
text pt "point u:walkway_wood" "passarela de madeira"

text en "point u:walkway" "walkway"
text pt "point u:walkway" "passarela"

text en "point u:nameplate" "nameplate"
text pt "point u:nameplate" "placa de identifica����o"

text en "point u:masonry" "masonry"
text pt "point u:masonry" "alvenaria"

text en "point u:gate" "gate"
text pt "point u:gate" "port��o"

text en "point u:ex_voto" "ex-voto"
text pt "point u:ex_voto" "ex-voto"

text en "point u:electric_light" "electric light"
text pt "point u:electric_light" "luz el��trica"

text en "point u:altar" "altar"
text pt "point u:altar" "altar"

text en "point u:danger" "danger"
text pt "point u:danger" "perigo"

text en "point u:minus" "minus"
text pt "point u:minus" "menos"

text en "point u:plus" "plus"
text pt "point u:plus" "mais"

text en "point u:plus_minus" "plus/minus"
text pt "point u:plus_minus" "mais/menos"

text en "point u:mud" "mud"
text pt "point u:mud" "lama"

text en "point u:water_drip" "water drip"
text pt "point u:water_drip" "gotejamento"

text en "point u:photo" "photo"
text pt "point u:photo" "foto"

text en "point u:archeo_excavation" "archeological excavation"
text pt "point u:archeo_excavation" "excava����o arqueol��gica"

text en "point u:audio" "audio"
text pt "point u:audio" "��udio"

text en "point u:bat" "bat"
text pt "point u:bat" "morcego"

text en "point u:bone" "bone"
text pt "point u:bone" "osso"

text en "point u:curtains" "curtains"
text pt "point u:curtains" "cortinas"

text en "point u:helictites" "helictites"
text pt "point u:helictites" "helictites"

text en "point u:human_bone" "human bone"
text pt "point u:human_bone" "ossos humanos"

text en "point u:mud_crack" "cracked mud"
text pt "point u:mud_crack" "lama rachada"

text en "point u:pendant" "pendant"
text pt "point u:pendant" "pendente"

text en "point u:pillar_with_curtains" "pillar with curtains"
text pt "point u:pillar_with_curtains" "coluna com cortinas"

text en "point u:pillars_with_curtains" "pillars with curtains"
text pt "point u:pillars_with_curtains" "colunas com cortinas"

text en "point u:seed_germination" "seed germination"
text pt "point u:seed_germination" "sementes germinadas"

text en "point u:tree_trunk" "tree trunk"
text pt "point u:tree_trunk" "tronco de ��rvore"

text en "point u:volcano" "volcano"
text pt "point u:volcano" "vulc��o"

text en "point u:raft_cone" "raft cone"
text pt "point u:raft_cone" "cone"

text en "point u:stalactite_stalagmite" "stalactite and stalagmite"
text pt "point u:stalactite_stalagmite" "estalagtite e estalagmite"

text en "point u:stalactites_stalagmites" "stalactites and stalagmites"
text pt "point u:stalactites_stalagmites" "estalagtites e estalagmites"

text en "point u:disc_stalactite" "disc at stalactite"
text pt "point u:disc_stalactite" "disco em estalactite"

text en "point u:disc_stalagmite" "disc at stalagmite"
text pt "point u:disc_stalagmite" "disco em estalagmite"

text en "point u:disc_pillar" "disc at pillar"
text pt "point u:disc_pillar" "disco em coluna"

text en "point u:discs_stalactites" "discs at stalactites"
text pt "point u:discs_stalactites" "discos em estalactites"

text en "point u:discs_stalagmites" "discs at stalagmites"
text pt "point u:discs_stalagmites" "discos em estalagmites"

text en "point u:discs_pillars" "discs at pillars"
text pt "point u:discs_pillars" "discos em colunas"

text en "line u:rimstonedam" "rimstone dam"
text pt "line u:rimstonedam" "travertino seco"

text en "line u:rimstonepool" "rimstone pool"
text pt "line u:rimstonepool" "travertino com ��gua"