logo kso logo uni graz

20130806 - Filament data for 12 UTC
Available data for 20130806: »06 UTC   »07 UTC   »08 UTC   »09 UTC   »10 UTC   »11 UTC   »12 UTC   »13 UTC   »14 UTC   »15 UTC   »16 UTC  
Click on image to open sensitive map!
 
  Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1411 1231 (N13W28 L=  3)   494    161        0 (1385/1170-1453/1301) -77.5 W26-W29 N08-N17
      2  285 1162 (N22E53 L=282)   338     42        1 ( 263/1138- 305/1184) -36.9 E55-E50 N20-N23
      3  704 1010 (N09E20 L=315)   199     86        0 ( 670/ 989- 733/1032) -14.0 E21-E17 N07-N10
      4 1657  897 (S12W40 L= 15)   422     98        1 (1615/ 865-1685/ 938)  31.0 W36-W42 S13-S09
      5 1576  675 (S24W33 L=  8)   693    249        0 (1511/ 577-1637/ 771)  50.7 W27-W37 S30-S19
      6 1415  692 (S20W21 L=356)   231     88        0 (1392/ 645-1432/ 736)  59.0 W18-W21 S23-S17
      7 1080  476 (S30E05 L=330)   406    106        0 (1059/ 423-1111/ 512)  50.2 E06-E01 S33-S27
      8  400  410 (S27E64 L=272)  1541    122        3 ( 379/ 346- 435/ 468)  32.0 E77-E56 S33-S22
  
Download Binary data for this image

» All Filament Data of 20130806 ...
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