/**
* Returns the cyc product identifier for this combination of code-product, kb-product and
* branch-tag.
*/
@SubL(source = "cycl/builder-utilities.lisp", position = 28769)
public static final SubLObject find_cyc_product(
SubLObject code_product, SubLObject kb_product, SubLObject branch_tag) {
{
final SubLThread thread = SubLProcess.currentSubLThread();
return Sequences.find(
list(code_product, kb_product, branch_tag),
$cyc_product_definitions$.getDynamicValue(thread),
Symbols.symbol_function(EQUAL),
Symbols.symbol_function($sym40$CDR),
UNPROVIDED,
UNPROVIDED)
.first();
}
}
