logo kso logo uni graz

20130613 - Filament data for 10 UTC
Available data for 20130613: »04 UTC   »05 UTC   »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  566 1596 (N31E44 L=286)   902    146        1 ( 536/1533- 614/1653) -66.0 E46-E41 N26-N35
      2 1566 1400 (N31W35 L=  6)   403     89        0 (1529/1357-1596/1439) -45.0 W32-W37 N28-N33
      3  689 1269 (N12E24 L=306)   709    163        0 ( 666/1195- 719/1348) -60.9 E27-E21 N07-N16
      4 1105 1171 (N11W03 L=334)   839    336        0 (1048/1046-1179/1311) -61.9 E01-W09 N03-N18
      5 1400 1125 (N11W22 L=353)   603    165        1 (1365/1046-1439/1201)  78.7 W20-W24 N06-N16
      6 1911 1063 (N13W72 L= 43)   717     48        0 (1878/1046-1939/1078)  -4.4 W66-W79 N11-N13
      7  256  952 (S13E55 L=276)  1650    268        2 ( 213/ 823- 290/1062)  71.6 E60-E51 S21-S06
      8 1525  550 (S23W42 L= 13)  2681    474        3 (1342/ 444-1719/ 623)  32.6 W32-W58 S32-S16
      9  981  509 (S33W04 L=335)   448    124        0 ( 932/ 490-1051/ 525)  20.6 W00-W08 S34-S30
  
Download Binary data for this image

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