infod 0.0.1 → 0.0.2

data/infod/{W/examine/examine.rb → H/facets.rb}

@@ -1,9 +1,9 @@
 #watch __FILE__
-%w{exhibit hist history normal protovis sw time/graph time/line}.each{|e|require_relative e}
 class E
 
-  fn 'view/examine',->a,m,e{
-    a=Hash[(a.split ',').map{|a|[a,{}]}] # facets
+  fn 'view/facets/main',->a,m,e{
+    # facets
+    a = Hash[(a.split ',').map{|a|[a,{}]}]
 
     # facet stats
     m.map{|s,r| a.map{|p,_|
@@ -17,27 +17,26 @@ class E
     n=->o{ 
       i[o]||='f'+(c+=1).to_s}
 
-    view=F['view/'+ (e.q['ev'] || 'divine') + '/item']
-
+    view=F['view/'+ (e.q['fv'] || 'divine') + '/resource']
     resources=->{
       m.map{|u,r| # each resource
         a.map{|p,_| # each facet
-          [n.(p),r[p].do{|o| # value
+          [n[p], r[p].do{|o| # value
              (o.class==Array ? o : [o]).map{|o|
-               n.(o.to_s) # identifier
+               n[o.to_s] # identifier
              }}].join ' '
         }.do{|f|
           [f.map{|o|'<div class="'+o+'">'}, # facet wrapper
-           view.(r,e), # resource
+           view[r,e], # resource
            (0..f.size-1).map{|c|'</div>'}]}}}
 
-    [(H.css'/css/examine'),(H.js'/js/examine'),(H.js'/js/mu'),
+    [(H.css'/css/facets'),(H.js'/js/facets'),(H.js'/js/mu'),
 
-     a.map{|b,_|{_: :style, class: n.(b)}},
+     a.map{|b,_|{_: :style, class: n[b]}},
 
      # facet selection
      {class: :sidebar, c: a.map{|f,v|
-         {class: :facet, title: f, facet: n.(f), # predicate
+         {class: :facet, title: f, facet: n[f], # predicate
            c: [f.label,
                v.sort_by{|k,v|v}.reverse.map{|k,v| # sort by popularity
                  k.respond_to?(:label) &&
@@ -45,15 +44,16 @@ class E
                    c: [{_: :span, class: :count, c: v},
                        {_: :span, class: :name, c: k.label}]}}]}}},
      
-     (F['view/'+e.q['ev']+'/base']||
+     (F['view/'+e.q['fv']+'/base']||
       ->m,e,r{r.()}).(m,e,resources)]}
   
-  fn 'view/examine/selectFacets',->m,e{
-    [(H.js '/js/examine.selectFacet'),(H.js '/js/mu'),(H.css '/css/examine'),
+  fn 'view/facets/select',->m,e{
+    [(H.js '/js/facets.select'),(H.js '/js/mu'),(H.css '/css/facets'),
      E.graphProperties(m).map{|e|[{c: e},' ']},
      {_: 'button', c: 'Go'}]}
 
-  fn 'view/e',->m,e{
-    e.q['a'].do{|a|Fn 'view/examine',a,m,e} || 
-                  (Fn 'view/examine/selectFacets',m,e)}
+  fn 'view/facets',->m,e{
+    e.q['a'].do{|a|Fn 'view/facets/main',a,m,e} || 
+                  (Fn 'view/facets/select',m,e)}
+
 end

data/infod/{W → H}/forum.rb

@@ -1,3 +1,4 @@
 class E
 
+
 end

data/infod/{W/examine/sw.rb → H/hf.rb}

@@ -1,9 +1,9 @@
 #watch __FILE__
 
-#curl http://eibispace.de/dx/sked-b11.csv > s.ssv
-#wget http://www1.m2.mediacat.ne.jp/binews/bib11.zip http://hfcc.org/data/b11/b11allx2.zip
-#unzip bia11.zip ;unzip b11allx2.zip
-#xlsx2csv 
+# databases of HF frequencies
+# curl http://eibispace.de/dx/sked-b11.csv > s.ssv
+# wget http://www1.m2.mediacat.ne.jp/binews/bib11.zip http://hfcc.org/data/b11/b11allx2.zip
+# unzip *zip
 
 class E
 
@@ -42,8 +42,7 @@ class E
     e[:clr]={}
     e[:fmax]=d.map{|_,r|r['FREQ'][0].to_f}.flatten.max||30000.0
     e[:scale]=100/(e[:fmax] - (d.map{|_,r|r['FREQ'][0].to_f}.flatten.min||0))
-    [(H.css '/css/sw'),(H.js '/js/sw'),
-#    [(H.css '/css/sw',true),(H.js '/js/sw',true),
+    [(H.css '/css/sw'),(H.js '/js/mu'),(H.js '/js/sw'),
      {id: :bands,
        c: bands.map{|meters,bounds|
          band += 1
@@ -66,9 +65,10 @@ class E
   fn 'view/sw/item',->r,x{
     min=->t{t='%04d' % (t.class==String && t.empty? ? 0 : t)
       t[0..1].to_i*60+t[2..3].to_i}
-    u=r['UTC'][0].match(/(\d+)-(\d+)/)    
-    b=u[1].to_i; e=u[2].to_i
-    f=r['FREQ'][0].to_f
+    u = r['UTC'][0].to_s.match(/(\d+)-?(\d+)?/)
+    b = u[1].to_i.max 2359
+    e = (u[2] ? u[2].to_i : b + 30).max 2359
+    f = r['FREQ'][0].to_f
     fi = f.to_i
     n = fi / 100
     x[:clr][n] ||= '#%06x' % rand(16777216)
@@ -101,10 +101,10 @@ width:#{(e-b) * 4.0}px;
              'big'=>[l.scan(/\b[A-Z][A-Z][A-Z]+\b/)],
              Content=>[l]}
            l.scan(/\d{4,}/){|d| d=d.to_i
-             if (d > 2400) && (d < 30000)
+             if d < 2400
+               m[u]['UTC']=[d]
+             elsif d < 30000
                m[u]['FREQ']=[d]
-             elsif
-               m[u]['UTC']=["#{d}-#{d+30}"]
              end}
            m.delete u unless m[u].has_keys ['UTC','FREQ']
            )}

data/infod/H/histogram.rb

@@ -0,0 +1,78 @@
+#watch __FILE__
+class E
+
+  fn 'view/histogram',->d,e{
+
+    # a :: attribute to chart
+    a = e.q['a'].do{|e|e.expand} || Date
+
+    # bins :: number of buckets
+    n = e.q['bins'].do{|b| b.to_f.max(999.0).min(1)} || 64.0
+    
+    # hv :: bin template 
+    v = F['view/'+e.q['hv']]
+
+    # construct histogram bins
+    (Fn 'view/histogram/bins',d,a,n).do{|h,m|
+      
+      [H.css('/css/hist'),%w{mu hist}.map{|s|H.js('/js/'+s)},
+       (Fn 'view/histogram/render',h),{style: "width: 100%; height: 5em"},
+       h.map{|b,r|
+         # skip empty bins
+         r.empty? ? ' ' :
+         (x = m[:min] + m[:bw] * b
+          from = a == Date ? Time.at(x).to_s : x.to_s
+          to = a == Date ? Time.at(x + m[:bw]).to_s : (x + m[:bw]).to_s
+          # wrap bin
+          { class: 'histBin b'+b.to_s,
+            c: [# label bin
+                {_: :h3, c: from + ' → ' + to },
+                # bin children view
+                (v.(r,e) if v)]})}]}}
+
+  F['view/h']=F['view/histogram']
+
+  # Graph, property, numBins  -> {bin -> Graph}
+  fn 'view/histogram/bins',->m,p,nb{
+    h = {}; bw = 0; min = 0; max = 0
+    m.map{|u,r|
+      # attribute accessor
+      r[p]
+    }.flatten.do{|v|
+      # values
+      v = v.compact.map{|v|
+       ( p == Date ? v.to_time : v ).to_f}
+      max = v.max || 0
+      min = v.min || 0
+      width = (max-min).do{|w| w.zero? ? 1 : w}
+      bw = width / nb }
+
+    # construct bins
+    (0..nb).map{|b|h[b] = {}}
+
+    # each resource
+    m.map{|u,r|
+
+      # binnable properties
+      r[p].do{|v|
+        v.each{|v|
+          # bin selector
+          b = (((p == Date ? v.to_time : v).to_f - min) / bw).floor
+
+          # append to bin
+          h[b][u] = r }}}
+
+    # histogram model
+    [h, {min: min, max: max, bw: bw}] }
+
+  fn 'view/histogram/render',->h{
+    scale = 255 / h.map{|b,r|r.keys.size}.max.do{|m|m.zero? ? 1 : m}.to_f
+    bins = h.keys.sort
+    ['<table class=histogram><tr>',
+     bins.map{|b|
+       mag = h[b].keys.size
+       {_: :td, class: 'b' + b.to_s,
+         style: 'background-color:#'+('%02x' % (255-mag*scale)).do{|x|'ff'+x+x}}},
+     '</tr></table>']}
+
+end

data/infod/H/mail.rb

@@ -0,0 +1,92 @@
+class E
+
+  fn 'view/mail',->d,e{
+    title = nil
+
+    # JS/CSS
+    [(H.once e,'mail.js',
+      (H.css '/css/mail'), {_: :style, c: "a {background-color: #{E.cs}}"},
+      (H.js '/js/mail'),
+      (H.once e,:mu,(H.js '/js/mu')),
+
+      # up to set-overview
+      ({_: :a, id: :up, href: e['REQUEST_PATH'] + e.q.merge({'view' => 'page', 'v' => 'threads'}).qs, c: '↑'} if d.keys.size > 2),
+
+      # collapse/expand quoted content
+      {id: :showQuote, c: :quotes, show: :true},{_: :style, id: :quote}),'<br>',
+
+     # each message
+     d.values.map{|m|
+
+       # content available?
+       [m.class == Hash && (m.has_key? E::SIOC+'content') &&
+        
+        {:class => :mail,
+          
+          c: [# message link
+              {_: :a, name: m.uri, href: m.url+'?view=base', rel: :raw, title: :raw, c: '&nbsp;'},
+              
+              # To:, From: index search links
+              [['sioc:has_creator',Creator],['sioc:addressed_to',To]].map{|a|
+                m[a[1]].do{|m|
+                  m.map{|f| f.respond_to?(:uri) &&
+                    {_: :a, property: a[0], href: f.url+'?set=indexPO&p='+a[0]+'&view=threads&c=12', c: f.uri}}}},
+
+              # mailto URI with embedded reply metadata
+              (m['/mail/reply_to']||m[Creator]).do{|r| r[0] && r[0].respond_to?(:uri) &&
+                {_: :a, title: :reply, c: 'r',
+                  href: "mailto:#{r[0].uri}?References=<#{m.uri}>&In-Reply-To=<#{m.uri}>&Subject=#{m[Title].join}"}},
+
+              {class: :timestamp, c: m[Date].do{|d|d.map{|d|d.to_s[0..18]}}}, '<br clear=all>',
+
+              # content
+              {_: :pre,
+                c: m[Content].map{|b|
+
+                  # line count
+                  i = 0
+
+                  # HTML message content
+                  b.class==String && b.              
+
+                  # erase empty quoted lines
+                  gsub(/^\s*(&gt;)(&gt;|\s)*\n/,"").
+
+                  # each line
+                  lines.to_a.map{|l|
+
+                    # line identifier
+                    f = m.uri + ':' + (i+=1).to_s
+                    
+                    # wrapper
+                    {_: :span, 
+                      
+                      # is line quoted?
+                      class: ((l.match /(^\s*(&gt;|On[^\n]+(said|wrote))[^\n]*)\n/) ? 'q' : 'u'), c:
+
+                      # id
+                      [{_: :a, id: f},
+
+                       # line
+                       l.chomp,
+
+                       # link
+                       (l.size > 64 &&
+                        {_: :a, class: :line, href: '#'+f,c: '&#160;'}),
+
+                     "\n" ]}}}}, # collate lines
+
+              # title
+              m[Title].do{|t|
+                # only show if changed from previous
+                title != t[0] && (
+                 title = t[0] # update title
+                 [{:class => :title, c: t.html, _: :a, href: m.url+'??=thread#'+m.uri},
+                  '<br clear=all>'])}]}]}]}
+  
+  # set a default view for RFC822 and SIOC types
+  [MIMEtype+'message/rfc822',
+   SIOCt+'MailMessage'].
+    map{|m| F['view/'+m] = F['view/mail'] }
+
+end

data/infod/{W/chat.rb → H/microblog.rb}

@@ -1,23 +1,27 @@
 #watch __FILE__
 class E
 
-  def triplrLog &f
+  # sprintf() formats in <https://github.com/infodaemon/www/blob/60a9b5f51cf15d5723afd9172767843d97190d8f/css/i/lotek.theme>
+  def triplrIRC &f
     i=-1
-    day = dirname.uri.split('/')[-3..-1].join('-')
+    day = dirname.uri.split('/')[-3..-1].do{|dp|
+      dp.join('-') if dp[0].match(/^\d{4}$/)
+    }||''
     doc = uri.sub '#','%23'
-    chan = bare
-    yield doc,'chan',chan
-    r.scan(/(\d\d):(\d\d) \[[\s@]*([^\(\]]+)[^\]]*\] (.*)/){|m|
-      s = doc + '#' + doc + ':' + (i+=1).to_s
-      yield s,Date,day+'T'+m[0]+':'+m[1]+':00'
-      yield s,'chan',chan
-      yield s,Creator,m[2]
-      yield s,Content,m[3].hrefs(true)
-      yield s,Type,E[SIOCt+'InstantMessage']
-      yield s,'hasLink',(m[3].match(/http:\//) ? 'true' : 'false')
-      yield s,'hasNum','true' if m[3].match(/\d/)
-    } rescue nil
+    channel = bare
     yield doc,Date,day
+    r.lines.map{|l|
+      l.scan(/(\d\d):(\d\d) \[[\s@]*([^\(\]]+)[^\]]*\] (.*)/){|m|
+        s = doc + '#' + doc + ':' + (i+=1).to_s
+        yield s, Date,                day+'T'+m[0]+':'+m[1]+':00'
+        yield s, SIOCt+'ChatChannel', channel
+        yield s, Creator,             m[2]
+        yield s, Content,             m[3].hrefs(true)
+        yield s, Type,                E[SIOCt+'InstantMessage']
+        yield s, Type,                E[SIOC+'Post']
+        yield s, 'hasLink',           (m[3].match(/http:\//) ? 'true' : 'false')
+        yield s, 'hasNum', 'true' if m[3].match(/\d/)} rescue (puts "skipped #{l}")
+    }
   end
 
   def tw g='m'
@@ -30,6 +34,7 @@ class E
     nokogiri.css('div.tweet').map{|t|
       s = base + t.css('a.details').attr('href') # subject URI
       yield s, Type, E[SIOCt+'MicroblogPost']
+      yield s, Type, E[SIOC+'Post']
       yield s, Creator, E(base+'/'+t.css('.username b')[0].inner_text)
       yield s, SIOC+'name',t.css('.fullname')[0].inner_text
       yield s, Atom+"/link/image", E(t.css('.avatar')[0].attr('src'))
@@ -58,11 +63,11 @@ class E
     [{_: :a, id: line},
      {_: :a, :class => :date, href: r.url, c: r[Date][0].match(/T([0-9:]{5})/)[1]},
      {_: :span, :class => :nick, c: {_: :a, href: r[Atom+'/link/alternate'].do{|a|a[0].uri}||r.url,
-            c: [{_: :img, class: :a, src: r[Atom+"/link/image"][0].uri},
+            c: [r[Atom+"/link/image"].do{|p| {_: :img, class: :a, src: p[0].uri}},
                 {_: :span, c: r[SIOC+'name']||r[Creator]||'#'}]}},' ',
         {_: :span, :class => :tw, 
        c: [r[Atom+'/link/media'].do{|a|
-             a.map{|a|{_: :a, href: r.url, c: {_: :img, src: a.uri}}}},
+             a.compact.map{|a|{_: :a, href: r.url, c: {_: :img, src: a.uri}}}},
            ((r[Title].to_s==r[Content].to_s || r.uri.match(/twitter/)) && '' ||
             {_: :a, href: r.url, c: r[Title],:class => r[:mail] ? :titleMail : :title}),
            r[:mail] ? (r[Content].map{|c|c.lines.to_a.grep(/^[^&@_]+$/)[0..21]}) : r[Content],

data/infod/H/threads.rb

@@ -0,0 +1,77 @@
+watch __FILE__
+class E
+  
+  fn 'protograph/thread',->d,_,g{
+    d.walk SIOC+'reply_of',g
+    F['docsID'][g]}
+  
+  fn 'view/threads',->d,env{
+
+    # CSS
+    [(H.css '/css/threads'),{_: :style, c: "body {background-color: ##{rand(2).even? ? 'fff' : '000'}}"},
+
+     # predicate tafting & search
+     (p = env.q['p']
+      o = env['uri'].E
+      [(H.js '/js/search'),
+       {_: :a, class: :rangeP, href: '/@'+p+'?set=indexP&view=page&v=linkPO&c=12', c: {'sioc:addressed_to' => 'to', 'sioc:has_creator' => 'From'}[p] || p}, ' ',
+       {_: :a, class: :rangePO, href: o.url+'?set=indexPO&view=page&v=threads&c=32&p='+p, c: env['uri']},
+       {_: :form, action: (URI.escape (p.expand.E.poIndex o).uri),
+         c: [{_: :input, name: :set, value: :grep, type: :hidden},
+             {_: :input, name: :view,value: :grep, type: :hidden},
+             {_: :input, name: :q}
+            ]},
+      ] if env.q['set']=='indexPO'),
+
+     '<table>',
+
+     # group posts by thread name
+     d.values.select{|r| r[Type].do{|t| t.map(&:uri).member? SIOC+'Post'}
+     }.group_by{|r|
+       [*r[Title]][0].do{|t|t.sub(/^[rR][eE][^A-Za-z]./,'')}}.
+
+     # group by recipient
+     group_by{|r,k| k[0].do{|k|
+         k[To].do{|o|o.head.uri}}}.map{|e|
+
+       # group
+       c = E.c
+       ['<tr><td class=subject>', e[1].map{|t|
+
+          # thread
+          [{_: :a, property: Title, :class => 'thread', style: "border-color:#{c}", href: t[1][0].url+'??=thread',
+             c: t[0].to_s.gsub(/[<>]/,'_').gsub(/\[([a-z\-A-Z0-9]+)\]/,'<span class=g>\1</span>')},
+
+
+           # post
+           (t[1].size > 1 &&
+            ['<br>', t[1].map{|s|
+               
+               # author name and RDFa
+               {_: :a, property: Creator, href: s.url+'??=thread#'+s.uri, :class => 'sender', style: 'background-color:'+c,
+                 c: (s[SIOC+'name']||s[Creator]).do{|n|n[0]}
+               }}]),'<br>']},'</td>',
+
+        {_: :td, class: :group, property: To,
+          c: {_: :a, :class => :to, style: 'background-color:'+c, c: e[0] && e[0].split(/@/)[0],
+            href: e[0] && e[0].E.url+'?set=indexPO&p=sioc:addressed_to&view=page&v=threads'}},
+
+        '</tr>']},'</table>',
+
+     # link to unabbreviated content of post-set
+     {_: :a, id: :down, c: '&darr;',
+       href: env['REQUEST_PATH'] + env.q.merge({'view'=>'page','views'=>'timegraph,mail','arc'=>'/parent','v'=>'multi','sort'=>'dc:date','reverse'=>true}).qs}]}
+
+  F["?"] ||= {}
+  F["?"].update({'thread' =>{
+                    'graph'=>'thread',
+                    'sort' => 'dc:date',
+                    'reverse' => nil,
+                    'view' => 'mail'},
+                  'ann' =>{
+                    'view'=>'threads',
+                    'set'=>'glob',
+                    'matchP' => 'dc:title',
+                    'match' => /[^a-zA-Z][Aa][Nn][nN]([oO][uU]|[^a-zA-Z])/}})
+
+end

data/infod/H/time.rb

@@ -0,0 +1,131 @@
+#watch __FILE__
+
+class Time
+  def html; H({_: :time, datetime: iso8601, c: to_s}) end
+end
+
+class Object
+  def time?
+    (self.class == Time) || (self.class == DateTime)
+  end
+  def to_time
+    time? ? self : Time.parse(self)
+  rescue
+    nil
+  end
+end
+
+class E
+
+  # linked-timeline
+  fn 'view/timegraph',->g,e{
+    i = F['view/timegraph/item']
+    Fn 'view/timegraph/base',g,e,->{
+      g.map{|u,r|i.(r,e)}}}
+  
+  # timegraph container-element
+  fn 'view/timegraph/base',->d,e,c{
+    Fn 'filter/timegraph', e.q,d,nil
+
+    e[:graph] = d
+    e[:group] = {}
+    e[:color] = E.cs
+    h = e.q['height'].do{|h|h.match(/[0-9]+/) && h.to_i.min(1).max(1024) } || '64'
+    
+
+    [H.css('/css/timegraph'),{class: :timegraph, style: "height: #{h}em", c: c.()}]}
+
+  # timegraph entry
+  fn 'view/timegraph/item',->r,x{
+
+    # on resources w x-axis field
+    if r[x.q['x'] || Date]
+
+      labelP = x.q['label'].do{|l|l.expand} || Creator
+      label = ([*r[labelP]][0]).do{|l|
+               l.respond_to?(:uri) ? l.uri : l.to_s}
+      lc = x[:group][label] ||= E.c
+      arc = x.q['arc'].do{|a| a.expand }
+
+      [{style: "top: #{r['x']}%; left: #{r['y']}%",
+         c: [{_: :a,
+               title: r[Date][0],
+               href: r.url,
+               class: :label,
+               style: "background-color: #{lc}",
+               c: label,
+             }]},
+       
+       # arc(s)
+       {_: :svg, c:
+         r[arc].do{|a|a.map{|e|
+             # target resource
+             x[:graph][e.uri].do{|e|
+               # arc path
+               {_: :line, class: :arc, stroke: x[:color], 'stroke-dasharray'=>"2,2",
+                 y1: e['x'].to_s+'%', x1: e['y'].to_s+'%',
+                 y2: r['x'].to_s+'%', x2: r['y'].to_s+'%'}}}}}]
+    end }
+
+  fn 'filter/timeofday',->e,m,_{
+    m.map{|_,r|r[Date].do{|ds| ds.map{|d|
+          d = d.to_time
+          r['timeofday']=[60 * d.hour + d.min]}}}}
+
+  fn 'filter/timegraph',->e,m,_{
+
+    x = e['x'] || Date # x property
+    y = e['y']         # y property
+
+    # 2D values
+    vX = m.map{|_,r|r[x]}.flatten.compact.map(&:to_time).map &:to_f
+    vY = m.map{|_,r|r[y]}.flatten.compact.map &:to_f
+    maxX = vX.max || 0
+    minX = vX.min || 0
+    maxY = vY.max || 0
+    minY = vY.min || 0
+
+    # scaling-ratio to normalize values to %
+    scaleX = 100/((maxX-minX).do{|v|v==0 ? 100 : v}||100)
+    scaleY = 100/((maxY-minY).do{|v|v==0 ? 100 : v}||100)
+
+    # annotate resources
+    m.map{|u,r|
+      r['x'] = [*r[x]][0].do{|v|(maxX - v.to_time.to_f)*scaleX} || 0
+      r['y'] = y.do{|y|[*r[y]][0].do{|v|(maxY - v.to_f)*scaleY} || 0} || rand(100)}}
+
+ ## SIMILE Timeline 
+ #  http://www.simile-widgets.org/
+
+  fn Render+'application/timeline',->d,e{
+    {dateTimeFormat: 'iso8601',
+      events: d.values.map{|r|
+        r[Date].do{|d|
+          {description: r.uri,
+          title: r[Title],
+          start: [*d][0],
+          link: r.url,
+        }}}.compact}.to_json}
+
+  fn 'head/timeline',->d,e{
+  ['<script>var t="'+e['REQUEST_PATH']+e.q.except('view','?').merge({format: 'application/timeline'}).qs+'"</script>',
+   (H.js '/js/timeline'),
+   (H.js 'http://api.simile-widgets.org/timeline/2.3.1/timeline-api')]}
+
+  fn 'view/timeline',->d,e{'<div id="tl" class="timeline-default" style="height: 300px;"></div>'}
+
+  # tripleStream -> tripleStream
+  def dateNorm *f
+    send(*f){|s,p,o|
+      yield *({'CreationDate' => true,
+               'Date' => true,
+                RSS+'pubDate' => true,
+                Date => true,
+                Purl+'dc/elements/1.1/date' => true,
+                Atom+'published' => true,
+                Atom+'updated' => true
+              }[p] ?
+              [s,Date,Time.parse(o).utc.iso8601] : [s,p,o])}
+  end
+
+end