logo kso logo uni graz

20130921 - Filament data for 15 UTC
Available data for 20130921: »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 1405 1742 (N36W57 L=143)  2594    346        3 (1340/1619-1488/1826)  16.2 W46-W80 N27-N39
      2 1744 1057 (S12W46 L=132)   364     82        1 (1725/1029-1771/1102) -78.7 W44-W48 S13-S08
      3 1641  913 (S16W35 L=120)  1048    238        0 (1619/ 804-1662/1027)  59.7 W31-W38 S22-S10
      4  473  974 (N17E35 L= 50)   281     64        0 ( 444/ 944- 500/ 995) -53.1 E37-E33 N14-N18
      5  269  793 (N10E58 L= 28)  2140    357        3 ( 204/ 642- 334/ 935) -78.1 E61-E54 N00-N19
      6 1476  558 (S34W16 L=102)   320     59        0 (1446/ 534-1497/ 586)  26.6 W13-W17 S35-S31
      7 1009  440 (S27E18 L= 68)   426     85        0 ( 975/ 413-1052/ 460)   0.0 E20-E14 S28-S25
      8 1378  312 (S50W02 L= 88)  1049    260        1 (1264/ 234-1467/ 376)  12.3 E11-W12 S53-S46
      9  810  253 (S35E42 L= 44)   496     59        0 ( 778/ 232- 845/ 280)   7.1 E46-E37 S36-S33
  
Download Binary data for this image

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