logo kso logo uni graz

20130801 - Filament data for 12 UTC
Available data for 20130801: »05 UTC   »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  959 1700 (N52W06 L= 47)   411     68        1 ( 925/1680- 994/1719)  -8.1 W02-W09 N50-N53
      2 1762 1486 (N22W70 L=111)   850    106        1 (1706/1471-1818/1503) -17.4 W62-W80 N19-N24
      3  168 1223 (N24E71 L=330)   830    112        2 ( 154/1173- 187/1284) -45.0 E76-E66 N21-N28
      4  422 1033 (N12E40 L=  1)   310     81        0 ( 404/ 990- 436/1071) -68.2 E41-E39 N09-N14
      5  227 1017 (N12E59 L=342)   381     53        1 ( 210/ 986- 240/1046) -90.0 E61-E57 N09-N13
      6 1877  892 (S16W65 L=106)  1057     99        2 (1840/ 846-1902/ 939)  51.3 W59-W68 S18-S12
      7 1234  782 (S11W10 L= 51)   272     88        0 (1211/ 742-1261/ 819)  45.0 W08-W12 S13-S09
      8 1297  676 (S19W13 L= 55)   480    182        0 (1235/ 610-1368/ 717)  26.6 W08-W18 S22-S17
  
Download Binary data for this image

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