logo kso logo uni graz

20130613 - Filament data for 13 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  582 1591 (N31E43 L=287)   904    146        1 ( 546/1533- 624/1650) -63.4 E45-E38 N27-N35
      2 1583 1399 (N31W37 L=  6)   517    143        1 (1525/1351-1620/1447) -35.5 W32-W39 N28-N33
      3 1116 1206 (N13W03 L=333)   771    302        1 (1045/1089-1155/1339) -60.3 E02-W06 N06-N20
      4  714 1258 (N11E22 L=307)   687    151        0 ( 691/1191- 746/1329) -58.0 E24-E19 N07-N15
      5 1434 1140 (N12W25 L=354)   762    261        0 (1379/1034-1490/1239)  66.8 W21-W28 N05-N19
      6  271  947 (S13E53 L=276)  1521    238        4 ( 235/ 835- 306/1054)  74.1 E57-E49 S20-S06
      7 1098  960 (S02W05 L=334)   215     52        0 (1066/ 944-1132/ 973)   0.0 W03-W07 S03-S01
      8 1501  529 (S25W41 L= 10)  3099    535        2 (1291/ 435-1731/ 617)  27.3 W27-W60 S33-S16
  
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