logo kso logo uni graz

20130722 - Filament data for 11 UTC
Available data for 20130722: »06 UTC   »07 UTC   »08 UTC   »09 UTC   »10 UTC   »11 UTC   »12 UTC   »13 UTC   »14 UTC   »15 UTC   »16 UTC   »17 UTC  
Click on image to open sensitive map!
 
  Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1213 1836 (N61W39 L=213)   428     46        0 (1199/1806-1227/1860)  24.4 W34-W45 N58-N64
      2 1813 1318 (N15W65 L=239)   440     59        0 (1784/1297-1838/1333) -18.4 W61-W68 N13-N15
      3 1352 1255 (N17W23 L=197)   286     96        0 (1312/1240-1406/1276)  -9.5 W20-W26 N15-N18
      4  518 1088 (N12E33 L=141)   743    215        3 ( 491/1010- 563/1190) -65.6 E35-E29 N06-N18
      5 1796  977 (S05W55 L=229)  1115    121        2 (1741/ 937-1856/1008) -13.0 W49-W62 S07-S02
      6  525  961 (N04E33 L=141)   264     41        0 ( 507/ 933- 545/ 987)  56.3 E34-E31 N02-N05
      7  520  700 (S12E36 L=138)   673    169        2 ( 462/ 669- 576/ 746)  29.1 E40-E31 S14-S09
      8 1156  557 (S26W05 L=179)  1823    539        3 (1002/ 383-1328/ 737)  43.7 E07-W17 S37-S15
      9 1626  600 (S28W42 L=216)   601    132        0 (1593/ 550-1670/ 658)  60.3 W39-W44 S31-S24
  
Download Binary data for this image

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