logo kso logo uni graz

20130804 - Filament data for 14 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  377 1227 (N25E44 L=316)   416    144        0 ( 364/1162- 391/1286) -81.9 E46-E43 N21-N28
      2  335 1034 (N13E48 L=313)  1200    289        2 ( 286/ 939- 403/1140) -50.2 E52-E42 N07-N20
      3 1040 1096 (N10W02 L=  2)   253    107        0 (1011/1047-1071/1137) -71.6 W00-W03 N06-N12
      4  633 1092 (N15E24 L=336)   298    103        3 ( 589/1064- 675/1121) -31.0 E26-E21 N12-N16
      5 1767  847 (S17W50 L= 51)   422     83        0 (1751/ 805-1783/ 888)  68.2 W48-W52 S19-S14
      6 1643  694 (S24W39 L= 39)   504    107        0 (1601/ 662-1679/ 738)  33.7 W35-W42 S25-S21
  
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