From a32bc68c48443eb122c318285056d611edd56e40 Mon Sep 17 00:00:00 2001 From: Munyoki Kilyungi Date: Fri, 5 Jan 2024 16:36:30 +0300 Subject: Correct formatting for the gnt:location predicate for ProbeSets. Signed-off-by: Munyoki Kilyungi --- examples/probeset.scm | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'examples') diff --git a/examples/probeset.scm b/examples/probeset.scm index c7efce7..9f694af 100755 --- a/examples/probeset.scm +++ b/examples/probeset.scm @@ -104,19 +104,19 @@ (and (string? strand-probe) (or (string=? "+" strand-probe) (string=? "-" strand-probe))) (cond ((string=? "+" strand-probe) - " on the plus strand") + "on the plus strand") ((string=? "-" strand-probe) - " on the minus strand") + "on the minus strand") (else ""))))) (_ - (format #f "Chr ~a @ ~a~:[~;~a~]" + (format #f "Chr ~a @ ~a Mb ~:[~;~a~]" chr mb (and (string? strand-probe) (or (string=? "+" strand-probe) (string=? "-" strand-probe))) (cond ((string=? "+" strand-probe) - " on the plus strand") + "on the plus strand") ((string=? "-" strand-probe) - " on the minus strand") + "on the minus strand") (else ""))))))) (set gnt:hasGeneId (ontology 'gene: -- cgit v1.2.3