logo kso logo uni graz

20130418 - Filament data for 13 UTC
Available data for 20130418: »06 UTC   »07 UTC   »08 UTC   »09 UTC   »10 UTC   »11 UTC   »12 UTC   »13 UTC   »14 UTC   »15 UTC   »16 UTC  
Click on image to open sensitive map!
 
  Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1105 1694 (N37E17 L=332)   305     38        0 (1080/1674-1132/1716) -21.8 E19-E14 N36-N38
      2  615 1551 (N14E41 L=309)   290     58        1 ( 591/1535- 648/1574)   0.0 E43-E38 N12-N15
      3  302 1173 (S15E51 L=298)  1068    152        1 ( 274/1095- 339/1252)  90.0 E53-E49 S19-S09
      4 1702 1189 (N24W38 L= 28)   288     83        0 (1667/1163-1746/1207)   8.1 W35-W42 N23-N24
      5 1266  728 (S15W22 L= 12)   288     46        0 (1233/ 703-1300/ 752)  63.4 W20-W23 S16-S12
      6 1334  613 (S19W31 L= 21)   507    174        0 (1255/ 594-1419/ 630)  26.6 W25-W35 S21-S15
      7  780  577 (S38E02 L=348)   743    159        2 ( 706/ 527- 843/ 615)  -4.8 E08-W04 S39-S35
      8 1414  369 (S30W51 L= 41)   836    101        1 (1369/ 333-1468/ 400)  45.0 W47-W54 S31-S26
  
Download Binary data for this image

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