logo kso logo uni graz

20130613 - Filament data for 15 UTC
Available data for 20130613: »04 UTC   »05 UTC   »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  593 1584 (N31E41 L=287)   841    155        1 ( 563/1529- 635/1645) -63.4 E43-E37 N27-N35
      2 1596 1398 (N31W38 L=  6)   520    121        0 (1550/1349-1631/1439) -39.8 W34-W40 N28-N33
      3 1138 1188 (N12W05 L=333)   855    315        2 (1076/1061-1181/1325) -59.0 W00-W09 N04-N19
      4  730 1245 (N11E21 L=307)   697    163        1 ( 707/1173- 763/1322) -66.0 E23-E18 N06-N15
      5 1440 1118 (N11W25 L=353)   700    160        0 (1406/1038-1477/1195)  78.7 W23-W27 N06-N16
      6  280  932 (S14E52 L=276)  1774    317        5 ( 232/ 789- 323/1054)  73.6 E58-E48 S23-S06
      7 1120  958 (S02W06 L=334)   341    102        1 (1080/ 934-1166/ 983)  -9.5 W03-W09 S03-N00
      8 1501  523 (S25W42 L=  9)  3090    494        5 (1310/ 435-1732/ 609)  23.6 W28-W60 S33-S17
  
Download Binary data for this image

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