:- style_check(-discontiguous).
label("fotosynthese_planten_zuurstof | Biologie | Chemie | Planten | EDAG  ").
edag(fotosynthese_planten_zuurstof,"./fotosynthese_planten_zuurstof/fotosynthese_planten_zuurstof.svg").
url("https//nl.wikipedia.org/wiki/Zon").
url("https://en.wikipedia.org/wiki/Photosynthesis").
url("https//nl.wikipedia.org/wiki/Koolstofdioxide").
url("https://nl.wikipedia.org/wiki/Zuurstof_(element)").
url("https://nl.wikipedia.org/wiki/Mesofyl").
vermogen(zonnestralen,"350 W/m2").
url("https//nl.wikipedia.org/wiki/Water").
url("https://nl.wikipedia.org/wiki/Chloroplast").
url("https//nl.wikipedia.org/wiki/Glucose").
chemie(opname,"6CO2").
chemie(opname,"12H2O").
chemie(afgifte,"6O2").
chemie(afgifte,"C6H12O6").
chemie(afgifte,"6H2O").
opname(koolstof_dioxide,atmosfeer).
landplanten(zuurstof,lucht,"28%").
veranderingen(osmotische,druk,mesofyl).
text("Dwarsdoorsnede blad").
marien_fytoplankton(zuurstof,lucht,"50%").
text("Meeste zuurstof die we inademen komt uit zee").
ltext("Schematische voorstelling van de lichtafhankelijke processen in fotosynthese. De blauwe en rode pijlen in de figuur beschrijven respectievelijk de stroom van elektronen en protonen. Plant Physiology, L. Taiz en E. Zeiger.").
img("chloroplast.png").
img("Blad_dwarsdoorsnede.png").
img("co2.png").
img("bladgroen.png").
img("Glucose.png").
img("Water_Molecule.png").
img("Zuurstof.png").
img("zon.png").
prove :-
    schijnen(zon,bladeren),
    opname(koolstof_dioxyde),
    verzadiging(bladeren,mesofyl,chloroplasten),
    opname(water),
    afgifte(zuurtof),
    afgifte(glucose),
    afgifte(water).
schijnen(zon,bladeren) :-
    zon(ultra_violet,licht),
    proces(fotosynthese).
zon(ultra_violet,licht) :-
    url("https//nl.wikipedia.org/wiki/Zon"),
		vermogen(zonnestralen,"350 W/m2"),
    img("zon.png").
proces(fotosynthese) :-
    url("https://en.wikipedia.org/wiki/Photosynthesis"),
    img("chloroplast.png"),
	ltext("Schematische voorstelling van de lichtafhankelijke processen in fotosynthese. De blauwe en rode pijlen in de figuur beschrijven respectievelijk de stroom van elektronen en protonen. Plant Physiology, L. Taiz en E. Zeiger.").
opname(koolstof_dioxyde) :-
    lucht(koolstof_dioxide),
    proces(fotosynthese).
lucht(koolstof_dioxide) :-
    url("https//nl.wikipedia.org/wiki/Koolstofdioxide"),
    opname(koolstof_dioxide,atmosfeer),
	    chemie(opname,"6CO2"),
    img("co2.png").
verzadiging(bladeren,mesofyl,chloroplasten) :-
    mesoflyl(bladeren,palisadeparemchym),
    opslag(water,bladeren,chloroplasten).
mesoflyl(bladeren,palisadeparemchym) :-
    url("https://nl.wikipedia.org/wiki/Mesofyl"),
    veranderingen(osmotische,druk,mesofyl),
    img("Blad_dwarsdoorsnede.png"),
	text("Dwarsdoorsnede blad").
opslag(water,bladeren,chloroplasten) :-
    url("https://nl.wikipedia.org/wiki/Chloroplast"),
	    chemie(opname,"12H2O"),
    img("bladgroen.png").
opname(water) :-
    opslag(water,bladeren,chloroplasten),
    proces(fotosynthese).
afgifte(zuurtof) :-
    proces(fotosynthese),
    vrijgekomen(zuurstof).
vrijgekomen(zuurstof) :-
    url("https://nl.wikipedia.org/wiki/Zuurstof_(element)"),
	    chemie(afgifte,"6O2"),
	    landplanten(zuurstof,lucht,"28%"),
	    marien_fytoplankton(zuurstof,lucht,"50%"),
	text("Meeste zuurstof die we inademen komt uit zee"),
    img("Zuurstof.png").
afgifte(glucose) :-
    proces(fotosynthese),
    vrijgekomen(glucose).
vrijgekomen(glucose) :-
    url("https//nl.wikipedia.org/wiki/Glucose"),
	    chemie(afgifte,"C6H12O6"),
    img("Glucose.png").
afgifte(water) :-
    proces(fotosynthese),
    vrijgekomen(water).
vrijgekomen(water) :-
    url("https//nl.wikipedia.org/wiki/Water"),
	    chemie(afgifte,"6H2O"),
    img("Water_Molecule.png").