:- style_check(-discontiguous).
label("transpiratie_planten_water | Biologie | Chemie | Planten | EDAG").
edag(transpiratie_planten_water,"./transpiratie_planten_water/transpiratie_planten_water.svg").
url("").
url("https://nl.wikipedia.org/wiki/Mesofyl").
url("https://nl.wikipedia.org/wiki/Huidmondje").
url("https://en.wikipedia.org/wiki/Stoma").
url("https://nl.wikipedia.org/wiki/Transpiratie_(biologie)").
url("https://nl.wikipedia.org/wiki/Diffusie").
url("https://en.wikipedia.org/wiki/Stoma").
url("https://nl.wikipedia.org/wiki/Zuurstof").
url("https://nl.wikipedia.org/wiki/Koolstofdioxide").
url("https://en.wikipedia.org/wiki/Xylem").
url("https://nl.wikipedia.org/wiki/Onverzadigde_zone").
url("https://nl.wikipedia.org/wiki/Blad").
url("https://nl.wikipedia.org/wiki/Wortelhaar").
img("Diffusie.png").
img("Blad_dwarsdoorsnede.jpg").
img("Tomato_leaf_stomate.jpg").
img("Opening_and_Closing_of_Stoma.png").
img("Vadose_zone.png").
img("wortelhaar.png").
img("Zuurstof.png").
img("co2.png").
ltext("Huidmondje in een tomatenblad, weergegeven via een gekleurde raster elektronen microscoop opname.").
text("Schema sluitcellen huidmondjes.").
capilariteit(stijging,water).
aquifer(grondwater,laag).
landplant(hoofdwortel,zijwortel,wortelharen).
watertransport(xyleem,door,onderdruk,transpiratie,bladeren).
veranderingen(osmotische,druk,mesofyl).
blad(dwarsdoorsnede,binnendeel).
synoniem(huidmondjes,stomata).
manipuleren(huidmondjes,regelt,transport, water).
chemie(opname,gas,"CO2").
chemie(opname,gas,"O2").
chemie(opname,vloeibaar,"H2O").
chemie(afgifte,gas,"H2O").
lucht(bevat,zuurstofgas).
lucht(bevat,koolstofdioxide).
ltext("De willekeurige beweging is het gevolg van de kinetische energie die deze deeltjes bezitten.").
manipulatie(huidmondjes,bladeren).
sluitcellen(openen,huidmondjes,afkoeling).
prove :-
	verzamelen(water,mineralen,wortelharen,bodem),
	transport(water,xyleem,bladeren,mesofyl),
	transport(water,xyleem,mesofyl,huidmondjes),
	opname(zuurstof),
	opname(water),
	opname(koolzuurgas),
	afkoelen(landplanten,transpiratie).
verzamelen(water,mineralen,wortelharen,bodem) :-
	url("https://nl.wikipedia.org/wiki/Wortelhaar"),
	bodem(onverzadigde,zone),
	xyleem(transportweefsel,vaatplanten).
bodem(onverzadigde,zone) :-
	url("https://nl.wikipedia.org/wiki/Onverzadigde_zone"),
	capilariteit(stijging,water),
	aquifer(grondwater,laag),
	img("Vadose_zone.png").
xyleem(transportweefsel,vaatplanten) :-
	url("https://en.wikipedia.org/wiki/Xylem"),
	landplant(hoofdwortel,zijwortel,wortelharen),
	watertransport(xyleem,door,onderdruk,transpiratie,bladeren),
	img("wortelhaar.png").
transport(water,xyleem,bladeren,mesofyl) :-
	url("https://nl.wikipedia.org/wiki/Blad"),
	xyleem(transportweefsel,vaatplanten),
	mesofyl(bladeren,palissadeparenchym,sponsparenchym).
mesofyl(bladeren,palissadeparenchym,sponsparenchym) :-
	url("https://nl.wikipedia.org/wiki/Mesofyl"),
	veranderingen(osmotische,druk,mesofyl),
	img("Blad_dwarsdoorsnede.jpg"),
	blad(dwarsdoorsnede,binnendeel).
transport(water,xyleem,mesofyl,huidmondjes) :-
	url("https://en.wikipedia.org/wiki/Stoma"),
	mesofyl(bladeren,palissadeparenchym,sponsparenchym),
	huidmondjes(oppervlak,bladeren,landplanten).
mesofyl(bladeren,palissadeparenchym,sponsparenchym) :-
	url("https://nl.wikipedia.org/wiki/Mesofyl"),
	veranderingen(osmotische,druk,mesofyl),
	img("Blad_dwarsdoorsnede.jpg"),
	blad(dwarsdoorsnede,binnneste).
huidmondjes(oppervlak,bladeren,landplanten) :-
	url("https://nl.wikipedia.org/wiki/Huidmondje"),
	manipuleren(huidmondjes,regelt,transport, water),
	synoniem(huidmondjes,stomata),
		chemie(opname,vloeibaar,"H2O"),
	img("Tomato_leaf_stomate.jpg"),
	ltext("Huidmondje in een tomatenblad, weergegeven via een gekleurde raster elektronen microscoop opname.").
opname(zuurstof) :-
	url("https://en.wikipedia.org/wiki/Stoma"),
	atmosfeer(zuurstofgas),
	diffusie(water,xyleem,mesofylcellen).
diffusie(water,xyleem,mesofylcellen) :-
	url("https://nl.wikipedia.org/wiki/Diffusie"),
	ltext("De willekeurige beweging is het gevolg van de kinetische energie die deze deeltjes bezitten."),
		chemie(afgifte,gas,"H2O"),
	img("Diffusie.png").
opname(water) :-
	url("https://en.wikipedia.org/wiki/Stoma"),
	huidmondjes(oppervlak,bladeren,landplanten),
	diffusie(water,xyleem,mesofylcellen).
atmosfeer(zuurstofgas) :-
	url("https://nl.wikipedia.org/wiki/Zuurstof"),
	lucht(bevat,zuurstofgas),
		chemie(opname,gas,"O2"),
	img("Zuurstof.png").
opname(koolzuurgas) :-
	url("https://en.wikipedia.org/wiki/Stoma"),
	atmosfeer(koolzuurgas),
	diffusie(water,xyleem,mesofylcellen).
atmosfeer(koolzuurgas) :-
	url("https://nl.wikipedia.org/wiki/Koolstofdioxide"),
	lucht(bevat,koolstofdioxide),
		chemie(opname,gas,"CO2"),
	img("co2.png").
afkoelen(landplanten,transpiratie) :-
	url("https://nl.wikipedia.org/wiki/Transpiratie_(biologie)"),
	diffusie(water,xyleem,mesofylcellen),
	waterdamp(transpiratie,landplanten).
waterdamp(transpiratie,landplanten) :-
	url("https://nl.wikipedia.org/wiki/Transpiratie_(biologie)"),
	sluitcellen(openen,huidmondjes,afkoeling),
	img("Opening_and_Closing_of_Stoma.png"),
	text("Schema sluitcellen huidmondjes.").