logo kso logo uni graz

20130822 - Latest Filament data
Available data for 20130822: »06 UTC   »07 UTC   »08 UTC   »09 UTC   »10 UTC   »11 UTC   »12 UTC   »13 UTC  
Click on image to open sensitive map!
 
  Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  487 1336 (N35E33 L= 90)   340     95        0 ( 445/1305- 525/1362) -35.5 E36-E29 N32-N37
      2 1681 1015 (S08W42 L=165)   343     64        1 (1657/ 979-1703/1043)  21.8 W39-W44 S09-S06
      3 1778  906 (S17W49 L=172)   811    210        0 (1736/ 869-1829/ 965)   5.7 W45-W55 S19-S12
      4  923  729 (S09E12 L=111)   212     38        0 ( 907/ 702- 939/ 753)  71.6 E12-E10 S10-S07
      5 1096  666 (S16E03 L=120)   567    239        0 (1062/ 581-1183/ 720)  36.9 E05-W03 S20-S12
      6  442  544 (S13E50 L= 73)   385     76        0 ( 422/ 504- 464/ 581)  35.5 E53-E46 S15-S10
      7 1529  454 (S42W26 L=149)   418     50        1 (1505/ 432-1556/ 476)  11.3 W23-W28 S43-S39
      8 1422  378 (S45W16 L=139)   356     53        1 (1407/ 353-1447/ 411)  78.7 W14-W18 S47-S41
  
Download Binary data for this image

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