logo kso logo uni graz

20130620 - Filament data for 15 UTC
Available data for 20130620: »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  428 1572 (N31E56 L=179)  1367    108        1 ( 375/1515- 487/1614)  -6.3 E66-E48 N27-N33
      2 1706 1435 (N33W53 L=288)  1247    160        2 (1668/1362-1736/1502)  63.4 W49-W56 N28-N38
      3  465 1219 (N09E39 L=196)   274     77        1 ( 427/1206- 508/1231)  18.4 E41-E35 N07-N09
      4  300  839 (S16E51 L=184)   323     48        0 ( 277/ 820- 319/ 866)  56.3 E53-E48 S17-S14
      5  627  813 (S15E24 L=211)   632    212        0 ( 536/ 761- 718/ 846)  -8.7 E30-E17 S17-S13
      6 1690  757 (S10W49 L=284)   634    100        0 (1649/ 728-1714/ 801)  68.2 W45-W51 S11-S06
      7 1405  512 (S28W33 L=268)   299     47        0 (1373/ 491-1433/ 529)  36.9 W30-W34 S29-S26
      8  415  439 (S44E52 L=183)   757     69        2 ( 393/ 402- 446/ 475)  31.0 E59-E46 S47-S41
  
Download Binary data for this image

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