nwtnCoolingRC :: RelationConcept
nwtnCoolingRC = makeRC "nwtnCoolingRC" (nounPhraseSP "Newton's law of cooling") 
  EmptyS nwtnCoolingEqn
nwtnCoolingRC :: RelationConcept
nwtnCoolingRC = makeRC "nwtnCoolingRC" (nounPhraseSP "Newton's law of cooling") 
  EmptyS nwtnCoolingEqn
nwtnCoolingRC = makeRC "nwtnCoolingRC" (nounPhraseSP "Newton's law of cooling") 
  EmptyS nwtnCoolingEqn