anchor.diff:          and broader.object is null
           and inScheme.object = '#{ @conceptScheme}'
         order by type.subject
  -
  -
       } , nil )%>
       <%= @concept%>
     <% end %>
  
positive.code: 
    <% for @topConcept in query_sql_subject( %{
      select
        r1.subject
      from _rdf_m r1
      join _rdf_m r2 on r2.subject = r1.subject
      where r1.predicate = 'rdf:type'
      and r1.object = 'skos:TopConcept'
      and r2.predicate = 'skos:inScheme'
      and r2.object = '#{ @conceptScheme }' ; } , nil )%>
    <%= @topConcept %>
  
      <% for @narrower in query_sql_subject( %{
        select
          r1.subject
        from _rdf_m r1
        join _rdf_m r2 on r2.subject = r1.subject
        where r1.predicate = 'rdf:type'
        and r1.object = 'skos:Concept'
        and r2.predicate = 'skos:broader'
        and r2.object = '#{ @topConcept}' ; } , nil )%>
      <%= @narrower%>
  
  
        <% for @narrower2 in query_sql_subject( %{
          select
            r1.subject
          from _rdf_m r1
          join _rdf_m r2 on r2.subject = r1.subject
          where r1.predicate = 'rdf:type'
          and r1.object = 'skos:Concept'
          and r2.predicate = 'skos:broader'
          and r2.object = '#{ @narrower}' ; } , nil )%>
        <%= @narrower2%>
        <% end %>
      <% end %>
    <% end %>
  
negative.code: 
  
      <% for @concept in query_sql_subject( %{
        select
          type.subject
        from _rdf_m type
  