diff options
Diffstat (limited to 'web/view')
| -rw-r--r-- | web/view/brand/msk.scm | 6 | ||||
| -rw-r--r-- | web/view/view.scm | 27 |
2 files changed, 29 insertions, 4 deletions
diff --git a/web/view/brand/msk.scm b/web/view/brand/msk.scm index 99cb283..4b34c43 100644 --- a/web/view/brand/msk.scm +++ b/web/view/brand/msk.scm @@ -40,8 +40,10 @@ (h1 ,title) (p ,info) (footer - (p "Copyright © 2005—2023 by the GeneNetwork community with a touch of " (span (@ (class "lambda")) "λ") "!") - (p "This is free software. Download the " + (hr) + (p "Copyright © 2005-2023 " + (a (@ (href "https://genenetwork.org/")) "GeneNetwork Webservices")) + (p "This is free software. See status and download the " (a (@ (href "https://ci.genenetwork.org/")) "source code") ".")) )))) diff --git a/web/view/view.scm b/web/view/view.scm index bdcf009..7be17ca 100644 --- a/web/view/view.scm +++ b/web/view/view.scm @@ -14,6 +14,29 @@ (define* (view-brand path) (msk-html #:info '((h2 "Introduction") - (p "New project for MSK with some live coding!") - (img (@ (src "/static/images/CMOR.jpg"))) + (p "New start page for MSK! This is initial work for providing a full community webservice for muscoskeletal disease.") + (h2 "Explore GeneNetwork for MSK (GN4MSK)") + (p "Find all genes that have a hit for") + (ul + (li (a (@ (href "https://genenetwork.org/gsearch?type=gene&terms=bone")) "bone")) + (li (a (@ (href "https://genenetwork.org/gsearch?type=gene&terms=skelet")) "skeleton")) + (li (a (@ (href "https://genenetwork.org/gsearch?type=gene&terms=muscle")) "muscle"))) + (p "Find all phenotypes that have a hit for") + (ul + (li (a (@ (href "https://genenetwork.org/gsearch?type=phenotype&terms=bone")) "bone")) + (li (a (@ (href "https://genenetwork.org/gsearch?type=phenotype&terms=skelet")) "skeleton")) + (li (a (@ (href "https://genenetwork.org/gsearch?type=phenotype&terms=muscle")) "muscle")) + ) + (p "Note that you can use the powerful search at the top of the results page! +Search terms can be " + (a (@ (href "https://issues.genenetwork.org/topics/xapian-search-queries")) "added") ". In the results click on any item to (re)run the relevant GWA or QTL mapping") + (h2 "Contact") + (p "We host private and public datasets. If you are interested in exploring data on GeneNetwork, or to add your own +data to benefit from the power of integrated datasets, please contact:") + (a (@ (href "https://med.virginia.edu/cphg/charles-r-farber/")) "Charles Farber") + " | " + (a (@ (href "https://medschool.cuanschutz.edu/orthopedics/research/labs/ackert-bicknell-lab")) "Cheryl Ackert-Bicknell") + " | " + (a (@ (href "https://thebird.nl")) "Pjotr Prins") + ; (img (@ (src "/static/images/CMOR.jpg"))) ))) |