logo kso logo uni graz

20130804 - Filament data for 05 UTC
Available data for 20130804: »05 UTC   »06 UTC   »07 UTC   »08 UTC   »09 UTC   »10 UTC   »11 UTC   »12 UTC   »13 UTC   »14 UTC   »15 UTC  
Click on image to open sensitive map!
 
  Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  327 1449 (N40E57 L=308)   509     60        0 ( 302/1433- 360/1472) -11.3 E61-E51 N39-N41
      2  284 1240 (N26E54 L=311)   391    103        0 ( 263/1201- 313/1291)  63.4 E56-E51 N23-N29
      3  957 1125 (N13E03 L=  2)   444    189        2 ( 935/1040- 991/1200) -90.0 E04-W00 N07-N17
      4  270 1067 (N16E54 L=311)   732    157        2 ( 240/1006- 309/1145) -66.0 E57-E50 N11-N20
      5  310  952 (N08E51 L=315)   414     65        1 ( 275/ 934- 344/ 975) -18.4 E53-E47 N07-N09
      6 1704  833 (S16W44 L= 49)   418    114        0 (1675/ 793-1722/ 897)  63.4 W41-W46 S18-S12
      7 1589  681 (S24W34 L= 40)   499     89        2 (1549/ 650-1626/ 720)  38.7 W31-W37 S25-S21
      8  793  347 (S36E29 L=336)   311     43        1 ( 766/ 334- 821/ 366) -14.0 E31-E26 S37-S34
  
Download Binary data for this image

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