38 | | let hits = BLAST_DAD(fasta): @DDBJ |
39 | | if func_known(hits) then |
40 | | send_to_KEGG( hits ) ;; annotation obtained from KEGG |
41 | | else |
42 | | let new_hits = BLAST_PDBj(fasta): @DDBJ |
43 | | if exists(new_hits) then |
44 | | foreach hit in new_hits do |
45 | | let shits = struct_navi(hit) :@PDBj |
46 | | if exists(shits) then |
47 | | send_to_KEGG( shits );; annotation obtained from KEGG |
48 | | done |
| 38 | let hits = BLAST_DAD(fasta) @DDBJ |
| 39 | if func_known(hits) then |
| 40 | send_to_KEGG( hits ) ;; annotation obtained from KEGG |
| 41 | else |
| 42 | let new_hits = BLAST_PDBj(fasta): @DDBJ |
| 43 | if exists(new_hits) then |
| 44 | foreach hit in new_hits do |
| 45 | let shits = struct_navi(hit) :@PDBj |
| 46 | if exists(shits) then |
| 47 | send_to_KEGG( shits );; annotation obtained from KEGG |
| 48 | |