logo kso logo uni graz

20130821 - Filament data for 10 UTC
Available data for 20130821: »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 1640 1515 (N21W57 L=195)   339     72        1 (1601/1499-1674/1534) -26.6 W54-W60 N19-N22
      2 1859 1197 (S03W65 L=203)  1924    318        1 (1816/1059-1899/1344)  72.6 W62-W71 S11-N05
      3 1797  887 (S19W51 L=189)   949    202        0 (1757/ 814-1822/ 999)  59.0 W46-W54 S22-S12
      4  361  858 (N07E47 L= 91)   576    183        1 ( 328/ 778- 391/ 946) -78.7 E48-E45 N02-N12
      5 1617  821 (S18W34 L=172)   588    162        0 (1569/ 790-1673/ 857)   0.0 W30-W39 S19-S14
      6  901  612 (S16E16 L=122)   796    310        0 ( 835/ 520-1018/ 669)  24.8 E20-E07 S20-S13
      7 1412  446 (S39W15 L=153)   426     55        1 (1378/ 421-1443/ 468)   9.5 W12-W18 S40-S37
  
Download Binary data for this image

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