designated(na)
%TABLE BUTTONS
park(yosemite)
park(lassen)
park(pinnacles)
park(sequoiakingscanyon)
park(deathvalley)
park(channelislands)
park(craterlake)
park(olympic)
park(northcascades)
park(rainier)
park(joshuatree)
park(redwood)
activities(fishing)
activities(hunting)
activities(camping)
campingtype(backcountry)
campingtype(carorrvcamping)
campingtype(carreserve)
campingtype(dispersebackcountry)
campingtype(group)
campingtype(highsierra) :- chosenpark(yosemite)
campingtype(valley) :- chosenpark(yosemite)
campingtype(equestrian) :- chosenpark(joshuatree)
campingtype(boat) :- chosenpark(northcascades)
fishingTypes(commercial)
fishingTypes(chumming)
fishingTypes(lineandhook)
fishingTypes(bait)
fishingTypes(drugs/poison)
fishingTypes(explosives)
fishingTypes(electricity)
fishinglocal(freshwater)
fishinglocal(noliscenserequired)
fishinglocal(dock)
fishinglocal(swimmingarea)
fishinglocal(surfingarea)
fishinglocal(motorbridge)
fishinglocal(publicraft)
season(fall)
season(wint)
season(xspring)
season(zsummer)
campgrounds(pinnaclescamp) :- chosenpark(pinnacles)& chosenactivities(camping)
%YOSEMITE CAMPING SPECIFICATIONS
campgrounds(wawona) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~ chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)
campgrounds(hogdonmeadow) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~chosencamptype(valley) & ~ chosencamptype(backcountry) & chosenactivities(camping) & ~chosencamptype(group)
campgrounds(hogdonmeadow) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~chosencamptype(valley) & ~ chosencamptype(backcountry) & chosenactivities(camping) & chosencamptype(group) & chosenseason(zsummer)
campgrounds(tuolumne) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~ chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)& ~chosencamptype(group)
chosencamptype(backcountry) & chosenactivities(camping) & chosencamptype(group) & chosenseason(zsummer)
campgrounds(tuolumne) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~ chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)& chosencamptype(group) & chosenseason(zsummer)
campgrounds(bridalveil) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~ chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)& ~chosencamptype(group)
campgrounds(bridalveil) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~ chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)& chosencamptype(group) & chosenseason(zsummer)
campgrounds(craneflat) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping) & ~chosencamptype(group)
campgrounds(whitewolf) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)& ~chosencamptype(group)
campgrounds(tamarackflat) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)& ~chosencamptype(group)
campgrounds(yosemitecreek) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)& ~chosencamptype(group)
campgrounds(porcupineflat) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)& ~chosencamptype(group)
campgrounds(sunrise) :- chosenpark(yosemite) & ~chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)& ~chosencamptype(group)
campgrounds(mercedlake) :- chosenpark(yosemite) & ~chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)& ~chosencamptype(group)
campgrounds(vogelsang) :- chosenpark(yosemite) & ~chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)& ~chosencamptype(group)
campgrounds(maylake) :- chosenpark(yosemite) & ~chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)& ~chosencamptype(group)
campgrounds(glenaulin) :- chosenpark(yosemite) & ~chosencamptype(valley) & ~ chosencamptype(backcountry)& chosenactivities(camping)& ~chosencamptype(group)
campgrounds(camp4) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~ chosencamptype(backcountry)& chosenactivities(camping)& ~chosencamptype(group)
campgrounds(northpines) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~ chosencamptype(backcountry) & chosenactivities(camping)& ~chosencamptype(group)
campgrounds(lowerpines) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~ chosencamptype(backcountry) & chosenactivities(camping)& ~chosencamptype(group)
campgrounds(upperpines) :- chosenpark(yosemite) & ~chosencamptype(highsierra) & ~chosencamptype(backcountry) & chosenactivities(camping)& ~chosencamptype(group)
%MOUNT RAINIER CAMPING SPECIFICATIONS
campgrounds(cougarrock) :- chosenpark(rainier)& chosenactivities(camping)
campgrounds(mowichlake) :- chosenpark(rainier)& chosenactivities(camping)&~chosencamptype(group)
campgrounds(whiteriver) :- chosenpark(rainier)& chosenactivities(camping)&~chosencamptype(group)
campgrounds(pyramidcreek) :- chosenpark(rainier) & ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(devilsdream) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(southpuyallup) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(klapatchepark) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(northpuyallup) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(goldenlakes) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(southmowich) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(eaglesroost) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(cataractvalley) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(carbonriver) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(ipsutcreek) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)& ~chosenactivities(fishing)
campgrounds(dickcreek) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(mysticlake) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(granitecreek) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(summerland) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(indianbar) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(nickelcreek) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(maplecreek) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(paradiseriver) :- chosenpark(rainier)& ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
campgrounds(snowlake) :- chosenpark(rainier) & ~ chosencamptype(carorrvcamping)& chosenactivities(camping)&~chosencamptype(group)& ~ chosencamptype(carreserve)
%CRATER LAKE CAMPING SPECIFICATIONS
campgrounds(grousehill) :- chosenpark(craterlake) & chosenactivities(camping) & ~chosencamptype(carorrvcamping)& ~ chosencamptype(carreserve)
campgrounds(lightningsprings) :- chosenpark(craterlake) & chosenactivities(camping) & ~chosencamptype(carorrvcamping)& ~ chosencamptype(carreserve)
campgrounds(redconesprings) :- chosenpark(craterlake)& chosenactivities(camping) & ~chosencamptype(carorrvcamping)& ~ chosencamptype(carreserve)
campgrounds(bybeecreek) :- chosenpark(craterlake)& chosenactivities(camping) & ~chosencamptype(carorrvcamping)& ~ chosencamptype(carreserve)
campgrounds(duttoncreek) :- chosenpark(craterlake)& chosenactivities(camping) & ~chosencamptype(carorrvcamping)& ~ chosencamptype(carreserve)
campgrounds(lostcreek) :- chosenpark(craterlake)& chosenactivities(camping) & ~chosencamptype(backcountry)
campgrounds(mazamavillage) :- chosenpark(craterlake)& chosenactivities(camping) & ~chosencamptype(backcountry)
%DIRECT SELECT
click(park(X)) & chosenpark(X) ==> ~chosenpark(X)
click(park(X)) & ~chosenpark(X) ==> chosenpark(X)
click(activities(X)) & chosenactivities(X) ==> ~chosenactivities(X)
click(activities(X)) & ~ chosenactivities(X) ==> chosenactivities(X)
click(activities(camping)) & chosenactivities(camping) & chosencamptype(X) ==> ~chosencamptype(X)
click(activities(fishing)) & chosenactivities(fishing) & chosenfishingype(X) ==> ~chosenfishingype(X)
click(activities(fishing)) & chosenactivities(fishing) & chosenfishinglocal(X) ==> ~chosenfishinglocal(X)
click(campingtype(X)) & chosencamptype(X) ==> ~chosencamptype(X)
click(campingtype(X)) & ~ chosencamptype(X) & chosenactivities(camping) ==> chosencamptype(X)
click(campingtype(X)) & ~ chosencamptype(X) & ~chosenactivities(camping) ==> chosencamptype(X) & chosenactivities(camping)
click(campgrounds(X)) & chosencampground(X) ==> ~ chosencampground(X)
click(campgrounds(X)) & ~ chosencampground(X) ==> chosencampground(X)
click(fishingTypes(X)) & chosenfishingype(X) ==> ~chosenfishingype(X)
click(fishingTypes(X)) & ~chosenfishingype(X) & chosenactivities(fishing) ==> chosenfishingype(X)
click(fishingTypes(X)) & ~chosenfishingype(X) & ~chosenactivities(fishing) ==> chosenfishingype(X) & chosenactivities(fishing)
click(fishinglocal(X)) & chosenfishinglocal(X) ==> ~ chosenfishinglocal(X)
click(fishinglocal(X)) & ~ chosenfishinglocal(X) & chosenactivities(fishing) ==> chosenfishinglocal(X)
click(fishinglocal(X)) & ~ chosenfishinglocal(X) & ~chosenactivities(fishing) ==> chosenfishinglocal(X) & chosenactivities(fishing)
click(fishinglocal(X)) & chosenfishinglocal(X) ==> ~ chosenfishinglocal(X)
click(fishinglocal(X)) & ~ chosenfishinglocal(X) & chosenactivities(fishing) ==> chosenfishinglocal(X)
click(fishinglocal(X)) & ~ chosenfishinglocal(X) & ~chosenactivities(fishing) ==> chosenfishinglocal(X) & chosenactivities(fishing)
click(season(X)) & chosenseason(X) ==> ~chosenseason(X)
click(season(X)) & ~ chosenseason(X) ==> chosenseason(X)
select(designatedfishing,X) & ~designated(X) ==> designated(X)
select(designatedfishing,X) & designated(Y) ==> ~designated(Y)
click(fishinglocal(dock)) & chosenfishinglocal(dock) & designated(Y) ==> ~designated(Y)
click(fishinglocal(dock)) & chosenfishinglocal(dock) ==> designated(na)
click(fishinglocal(swimmingarea)) & chosenfishinglocal(swimmingarea) & designated(Y) ==> ~designated(Y)
click(fishinglocal(swimmingarea)) & chosenfishinglocal(swimmingarea) ==> designated(na)
click(fishinglocal(surfingarea)) & chosenfishinglocal(surfingarea) & designated(Y) ==> ~designated(Y)
click(fishinglocal(surfingarea)) & chosenfishinglocal(surfingarea) ==> designated(na)
value(designatedfishing,X) :- designated(X)
%TABLE TRANSITION STYLE
style(park(X),"color","blue") :- chosenpark(X)
style(park(X),"color","black") :- ~chosenpark(X)
style(park(Y),"color","lightgrey") :- attribute(park(Y),"disabled",true)
style(activities(X),"color","blue") :- chosenactivities(X)
style(activities(X),"color","black") :- ~chosenactivities(X)
style(activities(Y),"color","lightgrey") :- attribute(activities(Y),"disabled",true)
style(campingtype(X),"color","blue") :- chosencamptype(X)
style(campingtype(X),"color","black") :- ~ chosencamptype(X)
style(campingtype(Y),"color","lightgrey") :- attribute(campingtype(Y),"disabled",true)
style(campgrounds(X),"color","blue") :- chosencampground(X)
style(campgrounds(X),"color","black") :- ~ chosencampground(X)
style(campgrounds(Y),"color","lightgrey") :- attribute(campgrounds(Y),"disabled",true)
style(fishingTypes(X),"color","blue") :- chosenfishingype(X)
style(fishingTypes(X),"color","black") :- ~ chosenfishingype(X)
style(fishingTypes(Y),"color","lightgrey") :- attribute(fishingTypes(Y),"disabled",true)
style(fishinglocal(X),"color","blue") :- chosenfishinglocal(X)
style(fishinglocal(X),"color","black") :- ~ chosenfishinglocal(X)
style(fishinglocal(Y),"color","lightgrey") :- attribute(fishinglocal(Y),"disabled",true)
style(season(X),"color","blue") :- chosenseason(X)
style(season(X),"color","black") :- ~chosenseason(X)
style(season(Y),"color","lightgrey") :- attribute(season(Y),"disabled",true)
%MAP BUTTONS
mapbutton1(northcascadesClick)
mapbutton1(olympicClick)
mapbutton1(rainierClick)
mapbutton1(craterlakeClick)
mapbutton1(redwoodClick)
mapbutton1(lassenClick)
mapbutton1(yosemiteClick)
mapbutton1(pinnaclesClick)
mapbutton1(sequoiakingscanyonClick)
mapbutton1(deathvalleyClick)
mapbutton1(channelislandsClick)
mapbutton1(joshuatreeClick)
click1(northcascadesClick) ==> chosenpark(northcascades)
click1(olympicClick) ==> chosenpark(olympic)
click1(rainierClick) ==> chosenpark(rainier)
click1(craterlakeClick) ==> chosenpark(craterlake)
click1(redwoodClick) ==> chosenpark(redwood)
click1(lassenClick) ==> chosenpark(lassen)
click1(yosemiteClick) ==> chosenpark(yosemite)
click1(pinnaclesClick) ==> chosenpark(pinnacles)
click1(sequoiakingscanyonClick) ==> chosenpark(sequoiakingscanyon)
click1(deathvalleyClick) ==> chosenpark(deathvalley)
click1(channelislandsClick) ==> chosenpark(channelislands)
click1(joshuatreeClick) ==> chosenpark(joshuatree)
mapbutton2(rainier,eaglesroostClick,eaglesroost)
mapbutton2(rainier,devilsdreamClick,devilsdream)
mapbutton2(rainier,northpuyallupClick,northpuyallup)
mapbutton2(rainier,southpuyallupClick,southpuyallup)
mapbutton2(rainier,southmowichClick,southmowich)
mapbutton2(rainier,pyramidcreekClick,pyramidcreek)
mapbutton2(rainier,cougarrockClick,cougarrock)
mapbutton2(rainier,klapatcheparkClick,klapatchepark)
mapbutton2(rainier,goldenlakesClick,goldenlakes)
mapbutton2(rainier,cataractvalleyClick,cataractvalley)
mapbutton2(rainier,carbonriverClick,carbonriver)
mapbutton2(rainier,dickcreekClick,dickcreek)
mapbutton2(rainier,mysticlakeClick,mysticlake)
mapbutton2(rainier,granitecreekClick,granitecreek)
mapbutton2(rainier,whiteriverClick,whiteriver)
mapbutton2(rainier,summerlandClick,summerland)
mapbutton2(rainier,nickelcreekClick,nickelcreek)
mapbutton2(rainier,indianbarClick,indianbar)
mapbutton2(rainier,maplecreekClick,maplecreek)
mapbutton2(rainier,paradiseriverClick,paradiseriver)
mapbutton2(rainier,ipsutcreekClick,ipsutcreek)
mapbutton2(rainier,mowichlakeClick, mowichlake)
mapbutton2(rainier,snowlakeClick,snowlake)
mapbutton2(yosemite,yosemitecreekClick, yosemitecreek)
mapbutton2(yosemite, whitewolfClick,whitewolf)
mapbutton2(yosemite, wawonaClick,wawona)
mapbutton2(yosemite, vogelsangClick,vogelsang)
mapbutton2(yosemite, tuolumneClick,tuolumne)
mapbutton2(yosemite, tamarackflatClick,tamarackflat)
mapbutton2(yosemite, sunriseClick,sunrise)
mapbutton2(yosemite, porcupineflatClick,porcupineflat)
mapbutton2(yosemite, mercedlakeClick,mercedlake)
mapbutton2(yosemite, glenaulinClick,glenaulin)
mapbutton2(yosemite, craneflatClick,craneflat)
mapbutton2(yosemite, bridalveilClick,bridalveil)
mapbutton2(yosemite, maylakeClick,maylake)
mapbutton2(craterlake,duttoncreekClick,duttoncreek)
mapbutton2(craterlake, bybeecreekClick ,bybeecreek)
mapbutton2(craterlake, grousehillClick ,grousehill)
mapbutton2(craterlake, lightningspringsClick , lightningsprings)
mapbutton2(craterlake, lostcreekClick ,lostcreek)
mapbutton2(craterlake, mazamavillageClick ,mazamavillage)
mapbutton2(craterlake, redconespringsClick ,redconesprings)
mapbutton2(pinnacles, pinnaclescampClick,pinnaclescamp)
click2(X) & mapbutton2(P,X,C) & chosencampground(C) ==> ~chosencampground(C)
click2(X) & mapbutton2(P,X,C) & ~chosencampground(C) ==> chosencampground(C)
style(X,"visibility","visible") :- mapbutton2(P,X,C)
style(X,"opacity",".3") :- mapbutton2(P,X,C)
style(X,"background-color","blue") :- mapbutton2(P,X,C) & chosencampground(C) & campgrounds(C)
style(X,"background-color","red") :- mapbutton2(P,X,C) & chosencampground(C) & ~campgrounds(C)
style(X,"background-color","transparent") :- mapbutton2(P,X,C) & ~chosencampground(C)
click1(X) :- mapbutton1(X) & click(X) & ~disabled(X)
disabled(X) :- mapbutton1(X) & chosenpark(Y)
style(X, cursor, "pointer") :- mapbutton1(X) & ~disabled(X)
style(X, visibility, "visible") :- mapbutton1(X) & ~disabled(X)
click2(X) :- mapbutton2(P,X,C) & click(X) & ~disabled(X)
disabled(X) :- mapbutton2(P,X,Y) & ~chosenpark(P)
disabled(X) :- mapbutton2(P,X,Y) & ~chosenactivities(camping)
style(X, "cursor", "pointer") :- mapbutton2(P,X,C) & ~disabled(X)
style(X, "visibility", "visible") :- mapbutton2(P,X,C) & ~disabled(X)
style(X, "visibility", "hidden") :- disabled(X)
%style(X,"border-style","dashed") :- mapbutton1(X)
style(X,"border-style","none") :- mapbutton1(X)
%SETUP BUTTONS
parkstyle(X,Y) :- convertToString(X,S) & stringappend("<button onclick='modbutton(this); ' id='park(",X,")'>",S,"</button>",Y)
campgroundstyle(X,Y) :- convertToString(X,S) & stringappend("<button onclick='modbutton(this); ' id='campgrounds(",X,")'>",S,"</button>",Y)
typecampingstyle(X,Y) :- convertToString(X,S) & stringappend("<button onclick='modbutton(this); ' id='campingtype(",X,")'>",S,"</button>",Y)
typefishingstyle(X,Y) :- convertToString(X,S) & stringappend("<button onclick='modbutton(this); ' id='fishingTypes(",X,")'>",S,"</button>",Y)
fishinglocalstyle(X,Y) :- convertToString(X,S) & stringappend("<button onclick='modbutton(this); ' id='fishinglocal(",X,")'>",S,"</button>",Y)
activitiesstyle(X,Y) :- convertToString(X,S) & stringappend("<button onclick='modbutton(this); ' id='activities(",X,")'>",S,"</button>",Y)
seasonstyle(X,Y) :- convertToString(X,S) & stringappend("<button onclick='modbutton(this); ' id='season(",X,")'>",S,"</button>",Y)
style(season(X),"border-radius","5px")
style(season(X),"background","white")
style(season(X),"box-shadow","0px 0px 2px black")
style(season(X),"outline","0px")
style(season(X),"height","35px")
style(season(X),"width","100px")
style(fishinglocal(X),"border-radius","5px")
style(fishinglocal(X),"background","white")
style(fishinglocal(X),"box-shadow","0px 0px 2px black")
style(fishinglocal(X),"outline","0px")
style(fishinglocal(X),"height","35px")
style(fishinglocal(X),"width","100px")
style(fishingTypes(X),"border-radius","5px")
style(fishingTypes(X),"background","white")
style(fishingTypes(X),"box-shadow","0px 0px 2px black")
style(fishingTypes(X),"outline","0px")
style(fishingTypes(X),"height","35px")
style(fishingTypes(X),"width","100px")
style(park(X),"border-radius","5px")
style(park(X),"background","white")
style(park(X),"box-shadow","0px 0px 2px black")
style(park(X),"outline","0px")
style(park(X),"height","35px")
style(park(X),"width","100px")
style(activities(X),"border-radius","5px")
style(activities(X),"background","white")
style(activities(X),"box-shadow","0px 0px 2px black")
style(activities(X),"outline","0px")
style(activities(X),"height","35px")
style(activities(X),"width","100px")
style(campgrounds(X),"border-radius","5px")
style(campgrounds(X),"background","white")
style(campgrounds(X),"box-shadow","0px 0px 2px black")
style(campgrounds(X),"outline","0px")
style(campgrounds(X),"height","22px")
style(campgrounds(X),"width","100px")
style(campingtype(X),"border-radius","5px")
style(campingtype(X),"background","white")
style(campingtype(X),"box-shadow","0px 0px 2px black")
style(campingtype(X),"outline","0px")
style(campingtype(X),"height","35px")
style(campingtype(X),"width","100px")
%MONITOR VISIBILITIES
style(clickTreeText,"visibility","hidden") :- chosenpark(X)
style(clickTreeText,"visibility","visible") :- ~chosenpark(X)
style(rainierCampClickText,"visibility","hidden") :- style(mapframe,"visibility","hidden")
style(rainierCampClickText,"visibility","visible") :- style(mapframe,"visibility","visible")
%fishinglocal(swimmingarea)
%fishinglocal(surfingarea)
style(designation,"visibility","hidden") :- ~chosenfishinglocal(dock)& ~chosenfishinglocal(swimmingarea) & ~chosenfishinglocal(surfingarea)
style(designation,"visibility","visible") :- chosenfishinglocal(dock)
style(designation,"visibility","visible") :-chosenfishinglocal(swimmingarea)
style(designation,"visibility","visible") :- chosenfishinglocal(surfingarea)
style(designatedFishingText,"visibility","hidden") :- ~chosenfishinglocal(dock) & ~chosenfishinglocal(swimmingarea) & ~chosenfishinglocal(surfingarea)
style(designatedFishingText,"visibility","visible") :- chosenfishinglocal(dock)
style(designatedFishingText,"visibility","visible") :-chosenfishinglocal(swimmingarea)
style(designatedFishingText,"visibility","visible") :- chosenfishinglocal(surfingarea)
%style(yosemitecampgrounds,"visibility","visible") :- %campingtype(carorrvcamping) & park(yosemite)
%style(yosemitecampgrounds,"visibility","hidden") :- %~campingtype(carorrvcamping)
%style(yosemitecampgrounds,"visibility","hidden") :- ~park(yosemite)
%DISABLE BUTTONS
attribute(park(Y),"disabled",true) :- chosenpark(X) & distinct(X,Y)
%attribute(activity(Y),"disabled",true) :- chosenactivity(X) & distinct(X,Y)
attribute(park(Y),"disabled",true) :- chosenfishinglocal(dock)
attribute(park(Y),"disabled",true) :- chosenfishinglocal(motorbridge)
attribute(park(Y),"disabled",true) :- chosenfishinglocal(publicraft)
attribute(park(Y),"disabled",true) :- chosenfishinglocal(swimmingarea)
attribute(park(Y),"disabled",true) :- chosenfishinglocal(surfingarea)
attribute(park(Y),"disabled",true) :- chosenfishingype(chumming)
attribute(park(Y),"disabled",true) :- chosenfishingype(drugs/poison)
attribute(park(Y),"disabled",true) :- chosenfishingype(electricity)
attribute(park(Y),"disabled",true) :- chosenfishingype(explosives)
attribute(fishingTypes(bait),"disabled",true) :- chosenfishinglocal(freshwater)
attribute(fishingTypes(chumming),"disabled",true) :- chosenfishinglocal(freshwater)
attribute(fishingTypes(commerical),"disabled",true) :- chosenfishinglocal(freshwater)
attribute(fishingTypes(drugs/poison),"disabled",true) :- chosenfishinglocal(freshwater)
attribute(fishingTypes(electricity),"disabled",true) :- chosenfishinglocal(freshwater)
attribute(fishingTypes(explosives),"disabled",true) :- chosenfishinglocal(freshwater)
attribute(fishingTypes(X),"disabled",true) :- chosenfishinglocal(surfingarea)
attribute(fishingTypes(X),"disabled",true) :- chosenfishinglocal(swimmingarea)
attribute(fishingTypes(X),"disabled",true) :- chosenfishinglocal(dock)
attribute(fishingTypes(X),"disabled",true) :- chosenfishinglocal(motorbridge)
attribute(fishingTypes(X),"disabled",true) :- chosenfishinglocal(publicraft)
attribute(fishingTypes(X),"disabled",true) :- chosenpark(Y) & distinct(X,bait) & distinct(X,commercial) & distinct(X,lineandhook)
attribute(fishingTypes(commercial),"disabled",true) :- chosenpark(Y) & distinct(Y,channelislands) & distinct(Y,olympic)
attribute(park(channelislands),"disabled",true) :- chosencamptype(carorrvcamping)
attribute(campingtype(carorrvcamping),"disabled",true) :- chosenpark(channelislands)
attribute(park(channelislands),"disabled",true) :- chosencamptype(carreserve)
attribute(campingtype(carreserve),"disabled",true) :- chosenpark(channelislands)
attribute(park(rainier),"disabled",true) :- chosencamptype(dispersebackcountry)
attribute(campingtype(dispersebackcountry),"disabled",true) :- chosenpark(rainier)
attribute(park(northcascades),"disabled",true) :- chosencamptype(dispersebackcountry)
attribute(campingtype(dispersebackcountry),"disabled",true) :- chosenpark(northcascades)
attribute(park(yosemite),"disabled",true) :- chosencamptype(backcountry)
attribute(campingtype(backcountry),"disabled",true) :- chosenpark(yosemite)
attribute(park(olympic),"disabled",true) :- chosencamptype(dispersebackcountry)
attribute(campingtype(dispersebackcountry),"disabled",true) :- chosenpark(olympic)
attribute(park(redwood),"disabled",true) :- chosencamptype(dispersebackcountry)
attribute(campingtype(dispersebackcountry),"disabled",true) :- chosenpark(redwood)
attribute(park(craterlake),"disabled",true) :- chosencamptype(dispersebackcountry)
attribute(campingtype(dispersebackcountry),"disabled",true) :- chosenpark(craterlake)
attribute(park(pinnacles),"disabled",true) :- chosencamptype(dispersebackcountry)
attribute(campingtype(dispersebackcountry),"disabled",true) :- chosenpark(pinnacles)
attribute(park(pinnacles),"disabled",true) :- chosencamptype(backcountry)
attribute(campingtype(backcountry),"disabled",true) :- chosenpark(pinnacles)
attribute(park(sequoiakingscanyon),"disabled",true) :- chosencamptype(backcountry)
attribute(campingtype(backcountry),"disabled",true) :- chosenpark(sequoiakingscanyon)
attribute(campingtype(group),"disabled","true") :- chosenpark(craterlake)
attribute(park(X),"disabled",true) :- chosenfishinglocal(noliscenserequired) & distinct(X,olympic) & distinct(X,rainier) & distinct(X,craterlake)
attribute(park(X),"disabled",true) :- chosenfishingype(commercial) & distinct(X,olympic) & distinct(X,channelislands)
attribute(olympicClick,"disabled",true) :- chosenpark(X)
attribute(rainierClick,"disabled",true) :- chosenpark(X)
attribute(craterlakeClick,"disabled",true) :- chosenpark(X)
attribute(redwoodClick,"disabled",true) :- chosenpark(X)
attribute(lassenClick,"disabled",true) :- chosenpark(X)
attribute(yosemiteClick,"disabled",true) :- chosenpark(X)
attribute(pinnaclesClick,"disabled",true) :- chosenpark(X)
attribute(sequoiakingscanyonClick,"disabled",true) :- chosenpark(X)
attribute(deathvalleyClick,"disabled",true) :- chosenpark(X)
attribute(channelislandsClick,"disabled",true) :- chosenpark(X)
attribute(joshuatreeClick,"disabled",true) :- chosenpark(X)
attribute(fishinglocal(dock),"disabled",true) :- designated(no)
attribute(fishinglocal(swimmingarea),"disabled",true) :- designated(no)
attribute(fishinglocal(surfingarea),"disabled",true) :- designated(no)
%PICTURE UPDATE
style(background,"background-image",X):- chosenpark(P) & background_picture(P,X)
style(background,"background-image","url('https://www.worldmapstore.com/wp-content/uploads/2017/06/US-NAtional-park.jpg')") :- ~chosenpark(P)
style(mapframe,"visibility","visible") :- chosenpark(yosemite) & chosenactivities(camping)
style(mapframe,"background-image", "url('https://sites.google.com/a/stanford.edu/pics/_/rsrc/1559933276846/home/ca_yosemite_max.jpg')") :- chosenpark(yosemite)
style(mapframe,"visibility","visible") :- chosenpark(rainier) & chosenactivities(camping)
style(mapframe,"background-image","url('http://npmaps.com/wp-content/uploads/mount-rainier-wilderness-trail-campsite-map.gif')") :- chosenpark(rainier)
style(mapframe,"visibility","visible") :- chosenpark(craterlake) & chosenactivities(camping)
style(mapframe,"background-image","url('https://sites.google.com/a/stanford.edu/pics/home/crater-lake-camping-map.jpg')") :- chosenpark(craterlake)
style(mapframe,"visibility","visible") :- chosenpark(pinnacles) & chosenactivities(camping)
style(mapframe,"background-image","url('https://sites.google.com/a/stanford.edu/pics/home/pinnacles-map.jpg')") :- chosenpark(pinnacles)
style(mapframe,"visibility","hidden") :- ~chosenpark(rainier) & ~chosenpark(yosemite) & ~chosenpark(craterlake) & ~chosenpark(pinnacles)
style(mapframe,"visibility","hidden") :- ~chosenactivities(camping)
background_picture(yosemite, "url('https://npca.s3.amazonaws.com/images/8730/99686cb0-381a-4232-961a-75eeb04db657-banner.jpg?1445970462')")
background_picture(lassen,"url('http://blog.hankchristensen.com/wp-content/uploads/2016/06/lassen-painted-dunes-099489-2000x1200.jpg')")
background_picture(pinnacles,"url('https://cl9r93gnrb42o3l0v1aawby1-wpengine.netdna-ssl.com/wp-content/uploads/2018/04/Pinnacles-Main.jpg')")
background_picture(sequoiakingscanyon,"url('http://www.travelaroundusa.com/uploads/2/4/0/0/24002860/490569804_orig.jpg')")
background_picture(deathvalley,"url('https://cdn.fstoppers.com/styles/full/s3/media/2018/05/17/death-valley-national-park-moving-rock.jpg')")
background_picture(channelislands,"url('https://images.theoutbound.com/contents/118191/assets/1494016196819?&fit=crop&w=970&h=550&auto=format&dpr=2&q=60')")
background_picture(joshuatree,"url('https://npca.s3.amazonaws.com/images/8721/afe85727-64a1-4cf4-a593-1975020d2d94-banner.jpg?1445970416')")
background_picture(redwood,"url('http://www.roadtripswithtom.com/wp-content/uploads/2017/09/redwood-national-forest-hero-REDWOOD12021.jpg')")
background_picture(craterlake,"url('https://npca.s3.amazonaws.com/images/8903/f7642d8f-7efb-4b01-82c9-b2a0d6eb3ead-banner.jpg?1445971105')")
background_picture(rainier,"url('https://npca.s3.amazonaws.com/images/8693/33801b9e-6685-4851-93dd-e75d3a14c174-banner.jpg?1445970277')")
background_picture(olympic,"url('https://npca.s3.amazonaws.com/images/8852/82c1fd5b-f341-4a9a-9887-7ba479740ecd-banner.jpg?1445970871')")
background_picture(northcascades,"url('https://www.tripsavvy.com/thmb/lyvmr9pNDjbK_6XukBqbboRP0lk=/3690x0/filters:no_upscale():max_bytes(150000):strip_icc()/an-amazing-view-across-lush-alpine-meadows--lakes--streams-and-the-glaciated-high-peaks-of-the-north-cascades-wilderness--107216089-5c2e5fb746e0fb000130f4fa.jpg')")
%STRING CONVERSIONS
convertToString(yosemite, "Yosemite National Park")
convertToString(lassen, "Lassen Volcanic National Park")
convertToString(pinnacles, "Pinnacles National Park")
convertToString(sequoiakingscanyon, "Sequoia and Kings Canyon National Park")
convertToString(deathvalley, "Death Valley National Park")
convertToString(channelislands, "Channel Islands National Park")
convertToString(craterlake,"Crater Lake National Park")
convertToString(olympic, "Olypic National Park")
convertToString(northcascades, "North Cascades National Park")
convertToString(rainier, "Mount Rainier National Park")
convertToString(joshuatree, "Joshua Tree National Park")
convertToString(redwood, "Redwood National Park")
convertToString(freshwater,"Fresh Water")
convertToString(noliscenserequired,"No State License Requirement")
convertToString(dock,"Off/near public dock")
convertToString(swimmingarea,"Near specified swimming area")
convertToString(surfingarea,"Near specified surfing area")
convertToString(motorbridge,"Off motor road bridge")
convertToString(publicraft,"Near public raft or float")
convertToString(fishing,"Fishing")
convertToString(hunting,"Hunting")
convertToString(camping,"Camping")
convertToString(backcountry,"Back Country: Permit")
convertToString(carorrvcamping, "Car or RV: Walk-In")
convertToString(carreserve, "Car or RV: Reservation")
convertToString(dispersebackcountry, "Back Country: Disperse")
convertToString(group,"Group Camping")
convertToString(highsierra, "High Sierra Camp")
convertToString(valley,"Yosemite Valley Camping")
convertToString(equestrian, "Equestrian Camping")
convertToString(boat,"Boat-In Camping")
convertToString(commercial,"Commercial")
convertToString(chumming,"Chumming")
convertToString(lineandhook,"Line and Hook")
convertToString(bait,"Bait Fishing")
convertToString(drugs/poison,"Fishing with drugs/poison")
convertToString(explosives,"Fishing with Explosives")
convertToString(electricity,"Fishing with electricity")
convertToString(hogdonmeadow, "Hogdon")
convertToString(craneflat, "Crane Flat")
convertToString(whitewolf, "White Wolf")
convertToString(tamarackflat, "Tamarack Flat")
convertToString(yosemitecreek, "Yosemite Creek")
convertToString(porcupineflat, "Porcupine Flat")
convertToString(tuolumne, "Tuolumne")
convertToString(bridalveil, "Bridalveil")
convertToString(wawona, "Wawona")
convertToString(sunrise, "Sunrise")
convertToString(mercedlake, "Merced Lake")
convertToString(vogelsang, "Vogelsang")
convertToString(maylake, "May Lake")
convertToString(glenaulin, "Glen Aulin")
convertToString(camp4, "Camp 4")
convertToString(northpines, "North Pines")
convertToString(lowerpines, "Lower Pines")
convertToString(upperpines, "Upper Pines")
convertToString(cougarrock, "Cougar Rock")
convertToString(mowichlake, "Mowich Lake")
convertToString(whiteriver, "White River")
convertToString(pyramidcreek, "Pyramid Creek")
convertToString(devilsdream, "Devils Dream")
convertToString(southpuyallup, "South Puyallup")
convertToString(klapatchepark, "Klapatche Park")
convertToString(northpuyallup, "North Puyallup")
convertToString(goldenlakes, "Golden Lakes")
convertToString(southmowich, "South Mowich")
convertToString(eaglesroost, "Eagles Roost")
convertToString(cataractvalley, "Cataract Valley")
convertToString(carbonriver, "Carbon River")
convertToString(ipsutcreek, "Ipsut Creek")
convertToString(dickcreek, "Dick Creek")
convertToString(mysticlake, "Mystic Lake")
convertToString(granitecreek, "Granite Creek")
convertToString(summerland, "Summerland")
convertToString(indianbar, "Indian Bar")
convertToString(nickelcreek, "Nickel Creek")
convertToString(maplecreek, "Maple Creek")
convertToString(paradiseriver, "Paradise River")
convertToString(snowlake, "Snow Lake")
convertToString(bybeecreek,"Bybee Creek")
convertToString(duttoncreek,"Dutton Creek")
convertToString(grousehill,"Grouse Hill")
convertToString(lightningsprings, "Lightning")
convertToString(lostcreek,"Lost Creek")
convertToString(mazamavillage,"Mazama Village")
convertToString(redconesprings,"Red Cone")
convertToString(pinnaclescamp,"Pinnacles Campground")
convertToString(fall,"Autumn")
convertToString(wint,"Winter")
convertToString(xspring,"Spring")
convertToString(zsummer,"Summer")
Park |
|
|
|
|
|
|
|
|
|
|
|
|
Type of Camping |
|
|
|
|
|
Types of Fishing |
|
|
|
|
|
|
|
Where do you want to fish? |
|
|
|
|
|
|
|
Activities |
|
|
|
Click a Tree to Select
National Park!
Click Campground to Select
Designated as fishing area?
Season |
|
|
|
|