%% ?- f('AndrewDougherty',X).
%% X = 'CYC:CONSTANT'(336897, '"AndrewDougherty"').

%% ?- cap('AndrewDougherty',X).
%% X = ['AndrewDougherty'].

%% ?- cycAssert(['isa','AndrewDougherty','Person'],'BaseKB',Result).
%% Result = 'SL:T'.

%% ?- cycQuery(['isa','AndrewDougherty','?X'],'BaseKB',Result).
%% Result = [['CollectionUnionFn', ['TheSet', 'BiologicalLivingObject', 'IntelligentAgent']], 'Agent-Underspecified', ['CollectionUnionFn', ['TheSet', 'Person', 'MultiPersonAgent']], 'TemporallyExistingThing', ['CollectionUnionFn', ['TheSet', 'SpecifiedInformationBearingThingType'|...]], 'PartiallyIntangible', ['Coll\
ectionUnionFn', [...|...]], ['CollectionUnionFn'|...], 'Individual'|...].