Skip to content

Commit

Permalink
Comment out final print command
Browse files Browse the repository at this point in the history
  • Loading branch information
omaus committed Dec 12, 2023
1 parent 8629d56 commit 0dae683
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/ARCExpect/ARCGraph.fs
Original file line number Diff line number Diff line change
Expand Up @@ -78,7 +78,7 @@ module ARCGraph =
/// Returns all terms (as ID * OboTerm * ArcRelation) of a given CvParam by using a given ontology graph via a given relating function.
let getRelatedIParamsBy relating (ip : IParam) (graph : FGraph<string,OboTerm,ARCRelation>) =
//relating graph[ip.Accession]
printfn $"{graph[ip.Name]}"
//printfn $"{graph[ip.Name]}"
relating graph[ip.Name]
|> Seq.map (fun (id,rel) -> FGraph.findNode id graph, rel)
|> Seq.map (fun ((id,t),r) -> id, t, r)
Expand Down

0 comments on commit 0dae683

Please sign in to comment.