  load and run Open Calais example

(load "opencalais-lib")

( setf x ( cl - user::entities - from - opencalais - query " Senator   spoke with the president of France .  and   talked on the airplane going to California . IBM and Pepsi contributed to  's campaign . " ) )

(load "opencalais-data-store")

(load "test-opencalais")

  load and run Open Calais example

(load "opencalais-lib")

( setf x ( cl - user::entities - from - opencalais - query " Senator   spoke with the president of France .  and   talked on the airplane going to California . IBM and Pepsi contributed to  's campaign . " ) )

(load "opencalais-data-store")

(load "test-opencalais")
