logo kso logo uni graz

20131219 - Filament data for 10 UTC
Available data for 20131219: »07 UTC   »08 UTC   »09 UTC   »10 UTC   »11 UTC   »12 UTC  
Click on image to open sensitive map!
 
  Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1005 1805 (N52W08 L=  3)   334     44        0 ( 986/1781-1032/1824)  31.0 W06-W11 N50-N54
      2 1610 1573 (N28W50 L= 45)  1634    252        1 (1473/1533-1720/1614) -12.8 W39-W62 N24-N31
      3 1525 1492 (N23W39 L= 34)   754    130        2 (1471/1460-1592/1522) -18.4 W35-W44 N20-N25
      4 1068 1463 (N25W07 L=  2)   719    177        1 ( 983/1416-1142/1495) -33.7 W01-W10 N21-N27
      5  695 1473 (N29E18 L=337)   250     95        0 ( 648/1454- 741/1488) -18.4 E21-E15 N27-N30
      6 1633 1234 (N06W41 L= 36)   441     95        0 (1606/1195-1671/1280) -59.0 W39-W43 N03-N09
      7 1281  925 (S09W15 L= 10)   278     99        0 (1239/ 881-1306/ 965)  38.7 W11-W16 S11-S07
      8  252  723 (S12E59 L=296)  1126    157        1 ( 227/ 654- 274/ 802)  48.4 E64-E55 S16-S07
  
Download Binary data for this image

» All Filament Data of 20131219 ...
IDL code for reading binary data:
    OPENR, u, binfile, /COMP, /GET_LUN
    head = FLTARR(6) ;[xsize,ysize,radius,hh,mm,ss]
    READU, u, head
    data = INTARR(FIX(head[0]),FIX(head[1]))
    READU, u, data
    FREE_LUN, u
    
  • each filament has the value of Fil_ID
  • all values are in pixel
to get the area of a filament:
  c = WHERE(data EQ Fil_ID, area)
  f = '(2(A,I6))'
  PRINT, FORM=f, "Area of Fil_ID", Fil_ID," =", area 
be careful: y-origin is upper left! you can transpose the data:
  data = ROTATE(data,7)
  Solar_y = 2048-Solar_y