/** org_edge_strg_symb( +Org, +Symb1, +Symb2, -W ) Organism abstraction interface to STRING database test. Assumes underlying predicates have their symbols sorted, and that Org is already passed through bio_organism/2. == ?- org_edge_strg_symb( hs, 'LMTK3', Symb2, W ). Symb2 = 'AATK', W = 359 ... ?- org_edge_strg_symb( mouse, 'Ltmk3', 'Aatk', W ). W = 308. == @author nicos angelopoulos @version 0:1 2019/4/8 @version 0:2 2022/12/8 @version 0:3 2023/6/7, updated table names to new regime, + support for pig */ org_edge_strg_symb( Org, Symb1, Symb2, W ) :- sort( [Symb1,Symb2], [SymbA,SymbB] ), org_edge_strg_symb_ord( Org, SymbA, SymbB, W ). org_edge_strg_symb_ord( chicken, SymbA, SymbB, W ) :- % edge_strg_gallus_symb( SymbA, SymbB, W ). strg_galg_edge_symb( SymbA, SymbB, W ). org_edge_strg_symb_ord( human, SymbA, SymbB, W ) :- % edge_strg_hs_symb(SymbA,SymbB,W). strg_homs_edge_symb( SymbA, SymbB, W ). org_edge_strg_symb_ord( hs, SymbA, SymbB, W ) :- % edge_strg_hs_symb(SymbA,SymbB,W). strg_homs_edge_symb( SymbA, SymbB, W ). org_edge_strg_symb_ord( mouse, SymbA, SymbB, W ) :- % edge_strg_mouse_symb(SymbA,SymbB,W). strg_musm_edge_symb( SymbA, SymbB, W ). org_edge_strg_symb_ord( pig, SymbA, SymbB, W ) :- strg_suss_edge_symb( SymbA, SymbB, W ).