logo kso logo uni graz

20130726 - Filament data for 10 UTC
Available data for 20130726: »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  508 1653 (N52E47 L= 74)   436     41        1 ( 486/1630- 531/1673) -12.5 E52-E43 N50-N53
      2 1343 1108 (N07W21 L=142)   475    113        0 (1315/1056-1365/1163) -90.0 W19-W21 N04-N10
      3 1327  773 (S13W17 L=139)   467    146        0 (1257/ 746-1393/ 805) -24.0 W12-W21 S15-S10
      4 1825  731 (S23W61 L=183)   757     86        2 (1788/ 697-1858/ 763)  12.5 W56-W65 S25-S20
      5 1664  519 (S36W48 L=170)   531     63        0 (1641/ 488-1683/ 542) -35.5 W44-W51 S38-S33
      6  538  522 (S23E40 L= 82)   325     54        0 ( 509/ 505- 571/ 539) -21.8 E42-E37 S24-S21
      7  463  472 (S27E49 L= 72)   594     71        0 ( 443/ 430- 489/ 507)  35.5 E53-E45 S29-S24
      8 1614  449 (S41W45 L=167)   455     53        1 (1586/ 430-1637/ 467) -20.6 W40-W48 S42-S38
  
Download Binary data for this image

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