    # KEHOME/knowledge/applications/SemanticWeb/OpenCyc/HowAirport.html
    # Aug/25/2003

    # How do I get from my house to the airport?

    # tools used: MKE, OpenCyc
    # Notes:
    # MKE/OpenCyc is a manual interface at this time,
    # using http://rhm.cdepot.net/bin/opencyc
    #    $ opencyc server
    #    $ opencyc browser
    # OpenCyc does not have enough "common-sense"
    # to ask for the address of my house, and
    # to find the airport closest to my house.

    ke$ set echo=off, kbmode=opencyc;

    # initial MKR question
    ke$ at time = future {
    ke$ 	I do go from my house to the airport
    ke>		with how = ?
    ke> 	done;
    ke> };
    ke$

    # map MKR terms to OpenCyc terms
    ke$ at TimeInterval = futureTense-Generic {
    ke$ 	I-TheWord do Translation-LocationChange
    ke>		from fromLocation = my HumanResidence
    ke>		to toLocation = the Airport-Physical
    ke>		with planForTask = ?
    ke> 	done;
    ke> };
    ke$

    # map MKR syntax to CycL syntax
    (planForTask ?plan
        (TimeInterval futureTense-Generic
    	(Translation-LocationChange I-TheWord
    	    (fromLocation (my HumanResidence))
    	    (toLocation (the Airport-Physical)) )))

    # simplify CycL question
    (planForTask ?plan
        (Translation-LocationChange I-TheWord
    	(fromLocation HumanResidence)
    	(toLocation Airport-Physical) ))

    # response from OpenCyc
    Status: Suspended, Exhaust
    Mt: UniversalVocabularyMt
    No answers