jurisdictionname(X,Y) :- evaluate(getjur(),X) & evaluate(getjurprettyname(),Y)
    jurisdictionlink(X,Y,Z) :- evaluate(getjur(),X) & evaluate(getplanningdescriptiontext(),Y) & evaluate(planningdeptlink(),Z)

select(locationtext,X) & ~empty(X) ==> locationsearch(X)
select(locationtext,X) & locationsearch(Y) ==> ~locationsearch(Y)
select(locationtext,X) & location(ADDR,APN,JURISDICTION) ==> ~location(ADDR,APN,JURISDICTION)
empty(X) :- matches(X,"^(\s*)$")

value(locationtext,X) :- locationsearch(X)

click(searchonmap) ==> searchonmap
click(searchonmap) & locationsearch(Y) ==> ~locationsearch(Y)
click(backtosearch) ==> ~searchonmap
click(backtosearch) & location(X,Y,Z) ==> ~location(X,Y,Z)

selectlocation(ADDR,APN,JURISDICTION) ==> location(ADDR,APN,JURISDICTION)
selectlocation(ADDR,APN,JURISDICTION) & locationsearch(Y) ==> ~locationsearch(Y)

locationfound :- location(X,Y,Z)

locationvalue(X) :- location("",Y,Z) & evaluate(
  stringappend(
    Y,
    ", ",
    Z
  ), X
)
locationvalue(X) :- location(X,Y,Z) & distinct(X,"")

%If there is an address, use everything before the ","| If just APN, then use APN + Jur
innerhtml(title,X) :- evaluate(
  stringappend(
    "Saved",
    " | Symbium Build"
  ), X
)