bio-publisci 0.0.7 → 0.0.8

data/lib/bio-publisci/writers/csv.rb

@@ -0,0 +1,31 @@
+module PubliSci
+  module Writers
+    class CSV < Base
+      def build_csv(data,components=nil)
+        unless components
+          components = data.values.map(&:keys).uniq
+        end
+        str = components.join(',') + "\n"
+        data.map {|d| str << Hash[d[1]].values.join(',') + "\n" }
+        str[-1]=""
+        str
+      end
+
+      def from_turtle(turtle_file, verbose=false)
+        puts "loading #{turtle_file}" if verbose
+        repo = RDF::Repository.load(turtle_file)
+        puts "loaded #{repo.size} statements into temporary repo" if verbose
+
+        dims = dimensions(repo)
+        meas = measures(repo)
+        data = observations(repo)
+        build_csv(data, (dims | meas))
+      end
+
+      def from_store(repo,dataSet=nil, variable_out=nil, verbose=false)
+        data = observations(repo,dataSet,true)
+        build_csv(data)
+      end
+    end
+  end
+end

data/lib/bio-publisci/writers/dataframe.rb

@@ -1,5 +1,5 @@
 module PubliSci
-  module Writer
+  module Writers
     module Dataframe
 
     def framestring(name,vectors)
@@ -39,7 +39,7 @@ module PubliSci
   end
 
   class Builder
-    include PubliSci::Writer::Dataframe
+    include PubliSci::Writers::Dataframe
 
 
     def from_turtle(turtle_file, connection, variable_in=nil, variable_out=nil, verbose=true, save=true)

data/resources/queries/codes.rq

@@ -1,13 +1,18 @@
-PREFIX qb:   <http://purl.org/linked-data/cube#> 
-PREFIX rdfs: <http://www.w3.org/2000/01/rdf-schema#> 
-PREFIX skos:  <http://www.w3.org/2004/02/skos/core#> 
+PREFIX qb:   <http://purl.org/linked-data/cube#>
+PREFIX rdfs: <http://www.w3.org/2000/01/rdf-schema#>
+PREFIX skos:  <http://www.w3.org/2004/02/skos/core#>
 
 
-SELECT DISTINCT ?dimension ?code ?codeLabel WHERE{
+SELECT DISTINCT ?dimension ?code ?codeLabel WHERE {
 	?dim a qb:DimensionProperty;
 		rdfs:label ?dimension;
 		qb:codeList ?codes.
 
-	?codes skos:hasTopConcept ?code. 
+  ?component qb:dimension ?dim.
+  ?dsd qb:component ?component.
+
+  ?dataSet qb:structure ?dsd.
+
+	?codes skos:hasTopConcept ?code.
 	?code skos:prefLabel ?codeLabel.
 }

data/resources/queries/dimensions.rq

@@ -1,7 +1,12 @@
-PREFIX qb:   <http://purl.org/linked-data/cube#> 
-PREFIX rdfs: <http://www.w3.org/2000/01/rdf-schema#> 
+PREFIX qb:   <http://purl.org/linked-data/cube#>
+PREFIX rdfs: <http://www.w3.org/2000/01/rdf-schema#>
 
 SELECT DISTINCT ?dimension ?label WHERE{
-	?dimension a qb:DimensionProperty;
-		rdfs:label ?label.		
+  ?dimension a qb:DimensionProperty;
+		rdfs:label ?label.
+
+  ?component qb:dimension ?dimension.
+  ?dsd qb:component ?component.
+
+  ?dataSet qb:structure ?dsd.
 }

data/resources/queries/measures.rq

@@ -1,7 +1,12 @@
-PREFIX qb:   <http://purl.org/linked-data/cube#> 
-PREFIX rdfs: <http://www.w3.org/2000/01/rdf-schema#> 
+PREFIX qb:   <http://purl.org/linked-data/cube#>
+PREFIX rdfs: <http://www.w3.org/2000/01/rdf-schema#>
 
 SELECT DISTINCT ?measure ?label WHERE{
 	?measure a qb:MeasureProperty;
 		rdfs:label ?label.
+
+  ?component qb:measure ?measure.
+  ?dsd qb:component ?component.
+
+  ?dataSet qb:structure ?dsd.
 }

data/resources/queries/observations.rq

@@ -1,10 +1,11 @@
-PREFIX qb:   <http://purl.org/linked-data/cube#> 
-PREFIX rdfs: <http://www.w3.org/2000/01/rdf-schema#> 
-PREFIX prop:  <http://www.rqtl.org/dc/properties/> 
+PREFIX qb:   <http://purl.org/linked-data/cube#>
+PREFIX rdfs: <http://www.w3.org/2000/01/rdf-schema#>
+PREFIX prop:  <http://www.rqtl.org/dc/properties/>
 
 SELECT DISTINCT ?observation ?property ?value WHERE{
 	?observation a qb:Observation;
-		?property ?value.
+		?property ?value ;
+    qb:dataSet ?dataSet .
 
 	{ ?property a qb:DimensionProperty. }
 	UNION

data/resources/weather.numeric.arff

@@ -1,23 +1,28 @@
-@relation weather
+% 1. Title: Weather Database
+%
+% 2. Sources:
+%    (a) Generated from RDF source spec/turtle/weather
+%
+@RELATION weather
 
-@attribute outlook {sunny, overcast, rainy}
-@attribute temperature real
-@attribute humidity real
-@attribute windy {TRUE, FALSE}
-@attribute play {yes, no}
+@ATTRIBUTE humidity integer
+@ATTRIBUTE outlook {sunny, overcast, rainy}
+@ATTRIBUTE play {no, yes}
+@ATTRIBUTE temperature integer
+@ATTRIBUTE windy {FALSE, TRUE}
 
-@data
-sunny,85,85,FALSE,no
-sunny,80,90,TRUE,no
-overcast,83,86,FALSE,yes
-rainy,70,96,FALSE,yes
-rainy,68,80,FALSE,yes
-rainy,65,70,TRUE,no
-overcast,64,65,TRUE,yes
-sunny,72,95,FALSE,no
-sunny,69,70,FALSE,yes
-rainy,75,80,FALSE,yes
-sunny,75,70,TRUE,yes
-overcast,72,90,TRUE,yes
-overcast,81,75,FALSE,yes
-rainy,71,91,TRUE,no
+@DATA
+85,sunny,no,85,FALSE
+90,sunny,no,80,TRUE
+86,overcast,yes,83,FALSE
+96,rainy,yes,70,FALSE
+80,rainy,yes,68,FALSE
+70,rainy,no,65,TRUE
+65,overcast,yes,64,TRUE
+95,sunny,no,72,FALSE
+70,sunny,yes,69,FALSE
+80,rainy,yes,75,FALSE
+70,sunny,yes,75,TRUE
+90,overcast,yes,72,TRUE
+75,overcast,yes,81,FALSE
+91,rainy,no,71,TRUE

data/spec/ORM/data_cube_orm_spec.rb

@@ -1,12 +1,32 @@
 require_relative '../../lib/bio-publisci.rb'
 
-describe PubliSci::ORM::DataCube do
+describe PubliSci::ORM do
 
-  it "should load and save a turtle file without loss of information" do
+  it "should load and save a turtle file without loss of information in old ORM" do
     ref = IO.read(File.dirname(__FILE__) + '/../turtle/bacon')
-    cube = PubliSci::ORM::DataCube.load(ref, {skip_metadata: true, generator_options: {label_column: 0}})
+    cube = PubliSci::DataSet::ORM::DataCube.load(ref, {skip_metadata: true, generator_options: {label_column: 0}})
     cube.abbreviate_known(cube.to_n3).should == ref
     # cube.to_n3.should == ref
   end
 
+  it "should load properties for Observation object" do
+    ev = PubliSci::DSL::Instance.new
+    r = ev.instance_eval do
+      data do
+        object 'spec/csv/bacon.csv'
+      end
+
+      to_repository
+    end
+    Spira.add_repository :default, r
+
+    PubliSci::ORM::Observation.count.should > 0
+
+    PubliSci::ORM::Observation.first.load_properties
+    fi = PubliSci::ORM::Observation.first
+    fi.chunkiness.should_not be nil
+    fi.deliciousness.should_not be nil
+
+  end
+
 end

data/spec/ORM/prov_model_spec.rb

@@ -16,4 +16,57 @@ describe PubliSci::Prov::Model do
     Spira.add_repository :default, r
     PubliSci::Prov::Model::Entity.first.should_not be nil
   end
+
+  context "has useful methods built in to models" do
+    it "can reverse chain associated activities for agents" do
+      ev = PubliSci::Prov::DSL::Instance.new
+
+      ag = ev.instance_eval do
+        agent :some_dudette
+      end
+
+      act = ev.instance_eval do
+        entity :datathing
+
+        activity :process, generated: :datathing, wasAssociatedWith: :some_dudette
+      end
+
+      r = ev.instance_eval do
+        to_repository
+      end
+
+
+      # z= ev.instance_eval do
+      #   generate_n3
+      # end
+
+      Spira.add_repository :default, r
+      model_agent = PubliSci::Prov::Model::Agent.first
+      ag.subject.should == model_agent.subject
+      acts =  model_agent.activities
+      acts.first.subject.should == act.subject
+    end
+
+    it "can dump all types for Entities" do
+      ev = PubliSci::Prov::DSL::Instance.new
+
+      qb = RDF::Vocabulary.new(RDF::URI.new('http://purl.org/linked-data/cube#'))
+
+      r = ev.instance_eval do
+        agent :some_dudette
+
+        entity :datathing do
+          has RDF.type, qb.DataSet
+        end
+
+        activity :process, generated: :datathing, wasAssociatedWith: :some_dudette
+
+        to_repository
+      end
+
+      Spira.add_repository :default, r
+      PubliSci::Prov::Model::Entity.first.all_types.should == %w{http://www.w3.org/ns/prov#Entity http://purl.org/linked-data/cube#DataSet}
+      PubliSci::Prov::Model::Entity.first.has_data?.should == true
+    end
+  end
 end

data/spec/dataset_for_spec.rb

@@ -11,6 +11,27 @@ describe PubliSci::Dataset do
       (turtle_string =~ /qb:Observation/).should_not be nil
     end
 
+    it "should use sio:has_value for unknown string types" do
+      turtle_string = PubliSci::Dataset.for('http://www.biostat.wisc.edu/~kbroman/D3/cistrans/data/probe_data/probe497638.json',false)
+      (turtle_string =~ /hasValue/).should_not be nil
+      # open('ttl.ttl','w'){|f| f.write turtle_string}
+      repo = RDF::Repository.new
+
+      f = Tempfile.new(['repo','.ttl'])
+      f.write(turtle_string)
+      f.close
+      repo.load(f.path, :format => :ttl)
+      f.unlink
+
+      repo.size.should > 0
+    end
+
+    it "will download remote files" do
+      turtle_string = PubliSci::Dataset.for('https://raw.github.com/wstrinz/bioruby-publisci/master/spec/csv/bacon.csv',false)
+      (turtle_string =~ /prop:pricerange/).should_not be nil
+      (turtle_string =~ /prop:producer/).should_not be nil
+    end
+
     it "will request user input if not provided" do
       gen = PubliSci::Reader::CSV.new
       gen.stub(:gets).and_return('pricerange,producer')

data/spec/dsl_spec.rb

@@ -29,11 +29,14 @@ describe PubliSci::DSL do
   end
 
   it "can generate dataset, metadata, and provenance when given a script" do
-    dat = data do
+    ev = PubliSci::DSL::Instance.new
+    dat = ev.instance_eval <<-EOF
+    data do
       object 'https://raw.github.com/wstrinz/bioruby-publisci/master/spec/csv/bacon.csv'
     end
+    EOF
     dat.should_not be nil
-    generate_n3.size.should > 0
+    ev.generate_n3.size.should > 0
   end
 
   it "can set generator options" do

data/spec/metadata/metadata_dsl_spec.rb

@@ -18,7 +18,7 @@ describe PubliSci::Metadata::DSL do
     str[/dct:creator "(.+)";/,1].should == "Will"
     str[/dct:subject "(.+)";/,1].should == "Delicious Bacon"
     str[/dct:description "(.+)";/,1].should == "a dataset about bacon"
-    str[/dct:issued "(.+)"\^\^xsd:date;/,1].should == Time.now.strftime("%Y-%m-%d")
+    str[/dct:issued "(.+)"\^\^xsd:date/,1].should == Time.now.strftime("%Y-%m-%d")
   end
 
   it "can add additional information about publisher" do

data/spec/r_builder_spec.rb

@@ -7,7 +7,7 @@
 require_relative '../lib/bio-publisci.rb'
 
 
-describe PubliSci::Writer::Dataframe do
+describe PubliSci::Writers::Dataframe do
 
 	context "when using r/qtl dataframe", no_travis: true do
 
@@ -18,7 +18,7 @@ describe PubliSci::Writer::Dataframe do
 				data(listeria)
 				mr = scanone(listeria,method="mr")
 EOF
-			@builder = PubliSci::Writer::Builder.new
+			@builder = PubliSci::Writers::Builder.new
 		end
 
 		it "produces equivalent dataframe from rdf" #do

data/spec/turtle/bacon

@@ -1,5 +1,5 @@
 @base <http://www.rqtl.org/ns/dc/> .
-@prefix ns:    <http://www.rqtl.org/ns/dataset/bacon#> .
+@prefix ns:    <http://www.rqtl.org/ns/dataset/bacon/> .
 @prefix qb:    <http://purl.org/linked-data/cube#> .
 @prefix rdf:   <http://www.w3.org/1999/02/22-rdf-syntax-ns#> .
 @prefix rdfs:  <http://www.w3.org/2000/01/rdf-schema#> .

data/spec/turtle/reference

@@ -1,5 +1,5 @@
 @base <http://www.rqtl.org/ns/dc/> .
-@prefix ns:    <http://www.rqtl.org/ns/dataset/mr#> .
+@prefix ns:    <http://www.rqtl.org/ns/dataset/mr/> .
 @prefix qb:    <http://purl.org/linked-data/cube#> .
 @prefix rdf:   <http://www.w3.org/1999/02/22-rdf-syntax-ns#> .
 @prefix rdfs:  <http://www.w3.org/2000/01/rdf-schema#> .

data/spec/turtle/weather

@@ -0,0 +1,275 @@
+@base <http://www.rqtl.org/ns/dc/> .
+@prefix ns:    <http://www.rqtl.org/ns/dataset/weather/> .
+@prefix qb:    <http://purl.org/linked-data/cube#> .
+@prefix rdf:   <http://www.w3.org/1999/02/22-rdf-syntax-ns#> .
+@prefix rdfs:  <http://www.w3.org/2000/01/rdf-schema#> .
+@prefix prop:  <http://www.rqtl.org/dc/properties/> .
+@prefix dct:   <http://purl.org/dc/terms/> .
+@prefix xsd:   <http://www.w3.org/2001/XMLSchema#> .
+@prefix cs:    <http://www.rqtl.org/dc/dataset/weather/cs/> .
+@prefix code:  <http://www.rqtl.org/dc/dataset/weather/code/> .
+@prefix owl:   <http://www.w3.org/2002/07/owl#> .
+@prefix skos:  <http://www.w3.org/2004/02/skos/core#> .
+@prefix foaf:     <http://xmlns.com/foaf/0.1/> .
+@prefix org:      <http://www.w3.org/ns/org#> .
+@prefix prov:     <http://www.w3.org/ns/prov#> .
+
+ns:dsd-weather a qb:DataStructureDefinition;
+  qb:component cs:outlook ;
+  qb:component cs:play ;
+  qb:component cs:windy ;
+  qb:component cs:humidity ;
+  qb:component cs:temperature .
+
+ns:dataset-weather a qb:DataSet ;
+  rdfs:label "weather"@en ;
+  qb:structure ns:dsd-weather .
+
+cs:outlook a qb:ComponentSpecification ;
+  rdfs:label "outlook Component" ;
+  qb:dimension prop:outlook .
+
+cs:play a qb:ComponentSpecification ;
+  rdfs:label "play Component" ;
+  qb:dimension prop:play .
+
+cs:windy a qb:ComponentSpecification ;
+  rdfs:label "windy Component" ;
+  qb:dimension prop:windy .
+
+cs:humidity a qb:ComponentSpecification ;
+  rdfs:label "humidity Component" ;
+  qb:measure prop:humidity .
+
+cs:temperature a qb:ComponentSpecification ;
+  rdfs:label "temperature Component" ;
+  qb:measure prop:temperature .
+
+prop:outlook a rdf:Property, qb:DimensionProperty ;
+  rdfs:label "outlook"@en ;
+  qb:codeList code:outlook ;
+  rdfs:range code:Outlook .
+
+prop:play a rdf:Property, qb:DimensionProperty ;
+  rdfs:label "play"@en ;
+  qb:codeList code:play ;
+  rdfs:range code:Play .
+
+prop:windy a rdf:Property, qb:DimensionProperty ;
+  rdfs:label "windy"@en ;
+  qb:codeList code:windy ;
+  rdfs:range code:Windy .
+
+prop:humidity a rdf:Property, qb:MeasureProperty ;
+  rdfs:label "humidity"@en .
+
+prop:temperature a rdf:Property, qb:MeasureProperty ;
+  rdfs:label "temperature"@en .
+
+code:Outlook a rdfs:Class, owl:Class;
+  rdfs:subClassOf skos:Concept ;
+  rdfs:label "Code list for outlook - codelist class"@en;
+  rdfs:comment "Specifies the outlook for each observation";
+  rdfs:seeAlso code:outlook .
+
+code:outlook a skos:ConceptScheme;
+  skos:prefLabel "Code list for outlook - codelist scheme"@en;
+  rdfs:label "Code list for outlook - codelist scheme"@en;
+  skos:notation "CL_OUTLOOK";
+  skos:note "Specifies the outlook for each observation";
+  skos:hasTopConcept <code/outlook/sunny> ;
+  skos:hasTopConcept <code/outlook/overcast> ;
+  skos:hasTopConcept <code/outlook/rainy> ;
+  .
+
+code:Play a rdfs:Class, owl:Class;
+  rdfs:subClassOf skos:Concept ;
+  rdfs:label "Code list for play - codelist class"@en;
+  rdfs:comment "Specifies the play for each observation";
+  rdfs:seeAlso code:play .
+
+code:play a skos:ConceptScheme;
+  skos:prefLabel "Code list for play - codelist scheme"@en;
+  rdfs:label "Code list for play - codelist scheme"@en;
+  skos:notation "CL_PLAY";
+  skos:note "Specifies the play for each observation";
+  skos:hasTopConcept <code/play/no> ;
+  skos:hasTopConcept <code/play/yes> ;
+  .
+
+code:Windy a rdfs:Class, owl:Class;
+  rdfs:subClassOf skos:Concept ;
+  rdfs:label "Code list for windy - codelist class"@en;
+  rdfs:comment "Specifies the windy for each observation";
+  rdfs:seeAlso code:windy .
+
+code:windy a skos:ConceptScheme;
+  skos:prefLabel "Code list for windy - codelist scheme"@en;
+  rdfs:label "Code list for windy - codelist scheme"@en;
+  skos:notation "CL_WINDY";
+  skos:note "Specifies the windy for each observation";
+  skos:hasTopConcept <code/windy/FALSE> ;
+  skos:hasTopConcept <code/windy/TRUE> ;
+  .
+
+<code/outlook/sunny> a skos:Concept, code:Outlook;
+  skos:topConceptOf code:outlook ;
+  skos:prefLabel "sunny" ;
+  skos:inScheme code:outlook .
+
+<code/outlook/overcast> a skos:Concept, code:Outlook;
+  skos:topConceptOf code:outlook ;
+  skos:prefLabel "overcast" ;
+  skos:inScheme code:outlook .
+
+<code/outlook/rainy> a skos:Concept, code:Outlook;
+  skos:topConceptOf code:outlook ;
+  skos:prefLabel "rainy" ;
+  skos:inScheme code:outlook .
+
+<code/play/no> a skos:Concept, code:Play;
+  skos:topConceptOf code:play ;
+  skos:prefLabel "no" ;
+  skos:inScheme code:play .
+
+<code/play/yes> a skos:Concept, code:Play;
+  skos:topConceptOf code:play ;
+  skos:prefLabel "yes" ;
+  skos:inScheme code:play .
+
+<code/windy/FALSE> a skos:Concept, code:Windy;
+  skos:topConceptOf code:windy ;
+  skos:prefLabel "FALSE" ;
+  skos:inScheme code:windy .
+
+<code/windy/TRUE> a skos:Concept, code:Windy;
+  skos:topConceptOf code:windy ;
+  skos:prefLabel "TRUE" ;
+  skos:inScheme code:windy .
+
+ns:obs1 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/sunny> ;
+  prop:play <code/play/no> ;
+  prop:windy <code/windy/FALSE> ;
+  prop:humidity 85 ;
+  prop:temperature 85 ;
+  .
+
+ns:obs2 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/sunny> ;
+  prop:play <code/play/no> ;
+  prop:windy <code/windy/TRUE> ;
+  prop:humidity 90 ;
+  prop:temperature 80 ;
+  .
+
+ns:obs3 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/overcast> ;
+  prop:play <code/play/yes> ;
+  prop:windy <code/windy/FALSE> ;
+  prop:humidity 86 ;
+  prop:temperature 83 ;
+  .
+
+ns:obs4 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/rainy> ;
+  prop:play <code/play/yes> ;
+  prop:windy <code/windy/FALSE> ;
+  prop:humidity 96 ;
+  prop:temperature 70 ;
+  .
+
+ns:obs5 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/rainy> ;
+  prop:play <code/play/yes> ;
+  prop:windy <code/windy/FALSE> ;
+  prop:humidity 80 ;
+  prop:temperature 68 ;
+  .
+
+ns:obs6 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/rainy> ;
+  prop:play <code/play/no> ;
+  prop:windy <code/windy/TRUE> ;
+  prop:humidity 70 ;
+  prop:temperature 65 ;
+  .
+
+ns:obs7 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/overcast> ;
+  prop:play <code/play/yes> ;
+  prop:windy <code/windy/TRUE> ;
+  prop:humidity 65 ;
+  prop:temperature 64 ;
+  .
+
+ns:obs8 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/sunny> ;
+  prop:play <code/play/no> ;
+  prop:windy <code/windy/FALSE> ;
+  prop:humidity 95 ;
+  prop:temperature 72 ;
+  .
+
+ns:obs9 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/sunny> ;
+  prop:play <code/play/yes> ;
+  prop:windy <code/windy/FALSE> ;
+  prop:humidity 70 ;
+  prop:temperature 69 ;
+  .
+
+ns:obs10 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/rainy> ;
+  prop:play <code/play/yes> ;
+  prop:windy <code/windy/FALSE> ;
+  prop:humidity 80 ;
+  prop:temperature 75 ;
+  .
+
+ns:obs11 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/sunny> ;
+  prop:play <code/play/yes> ;
+  prop:windy <code/windy/TRUE> ;
+  prop:humidity 70 ;
+  prop:temperature 75 ;
+  .
+
+ns:obs12 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/overcast> ;
+  prop:play <code/play/yes> ;
+  prop:windy <code/windy/TRUE> ;
+  prop:humidity 90 ;
+  prop:temperature 72 ;
+  .
+
+ns:obs13 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/overcast> ;
+  prop:play <code/play/yes> ;
+  prop:windy <code/windy/FALSE> ;
+  prop:humidity 75 ;
+  prop:temperature 81 ;
+  .
+
+ns:obs14 a qb:Observation ;
+  qb:dataSet ns:dataset-weather ;
+  prop:outlook <code/outlook/rainy> ;
+  prop:play <code/play/no> ;
+  prop:windy <code/windy/TRUE> ;
+  prop:humidity 91 ;
+  prop:temperature 71 ;
+  .
+