logo kso logo uni graz

20130803 - Filament data for 05 UTC
Available data for 20130803: »05 UTC   »06 UTC   »07 UTC   »08 UTC   »09 UTC   »10 UTC   »11 UTC   »12 UTC   »13 UTC   »14 UTC  
Click on image to open sensitive map!
 
  Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1631 1344 (N16W47 L= 66)   345     95        0 (1596/1312-1670/1382) -51.3 W45-W49 N13-N18
      2  753 1065 (N11E16 L=  2)   408    219        0 ( 730/ 979- 787/1167) -90.0 E17-E14 N06-N17
      3  166  996 (N11E68 L=311)   678     69        1 ( 147/ 958- 190/1024) -53.1 E70-E63 N08-N12
      4 1410  633 (S24W21 L= 39)   322     84        1 (1370/ 610-1449/ 660)  18.4 W17-W23 S25-S22
  
Download Binary data for this image

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