logo kso logo uni graz

20130418 - Filament data for 10 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 1085 1704 (N37E19 L=332)   271     54        0 (1060/1682-1108/1721) -21.8 E21-E16 N36-N38
      2  591 1562 (N14E43 L=308)   273     57        2 ( 572/1538- 612/1599) -53.1 E45-E41 N12-N16
      3  285 1169 (S15E53 L=298)  1161    209        2 ( 254/1070- 325/1258)  80.5 E55-E50 S21-S09
      4  223  889 (S33E57 L=295)   581     99        0 ( 186/ 870- 271/ 918)   0.0 E62-E50 S34-S31
      5 1243  741 (S15W21 L= 12)   225     54        0 (1210/ 721-1278/ 763)  53.1 W19-W22 S16-S12
      6 1319  624 (S19W30 L= 21)   402    149        0 (1249/ 606-1396/ 643)  36.9 W25-W33 S21-S15
      7  763  584 (S38E03 L=348)   745    177        1 ( 683/ 536- 824/ 626)  -9.5 E10-W02 S39-S35
      8 1396  374 (S30W49 L= 41)   805     76        1 (1361/ 334-1437/ 404) -68.2 W45-W52 S32-S27
  
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