logo kso logo uni graz

20130921 - Filament data for 13 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 1393 1727 (N35W54 L=141)  2491    298        3 (1329/1612-1467/1825)  21.4 W45-W76 N27-N39
      2 1730 1048 (S12W45 L=132)   279     30        0 (1714/1025-1747/1076) -90.0 W43-W46 S13-S10
      3 1628  900 (S17W33 L=120)  1014    216        0 (1603/ 798-1648/1005)  57.5 W29-W36 S22-S11
      4  455  972 (N17E37 L= 50)   242     49        0 ( 432/ 955- 481/ 992) -45.0 E38-E34 N15-N18
      5  256  796 (N11E59 L= 28)  2009    315        4 ( 196/ 669- 314/ 930) -73.6 E63-E55 N02-N19
      6  586  623 (S05E37 L= 50)   242     47        0 ( 556/ 609- 609/ 642)   0.0 E39-E34 S06-S04
      7 1464  552 (S34W15 L=102)   299     55        0 (1434/ 526-1485/ 580)  26.6 W12-W16 S34-S31
      8  977  429 (S27E20 L= 67)   422     68        0 ( 939/ 400-1010/ 455)   9.5 E23-E17 S28-S25
      9  798  248 (S35E44 L= 43)   510     79        0 ( 766/ 224- 832/ 275)  12.5 E48-E39 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