Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1223 1375 (N19W21 L=240)   273     96        0 (1173/1364-1274/1390) -38.7 W18-W23 N16-N20
      2 1635 1356 (N06W46 L=265)   620    106        4 (1591/1321-1675/1389) -38.7 W43-W49 N03-N08
      3 1505 1236 (N03W33 L=252)   807    214        2 (1437/1166-1582/1332)  21.0 W27-W40 N00-N06
      4 1239 1289 (N14W19 L=238)   515    138        0 (1176/1252-1301/1322)  -6.3 W14-W23 N12-N14
      5  653 1200 (N24E17 L=202)   250    121        0 ( 604/1176- 710/1234) -39.8 E20-E13 N21-N26
      6  994 1087 (N09E00 L=219)   613    125        1 ( 953/1033-1047/1130)  26.6 E03-W03 N06-N11
      7 1637 1039 (S11W36 L=256)   351    104        0 (1600/1003-1673/1092) -63.4 W35-W38 S13-S07
      8  381 1029 (N20E40 L=179)   307     54        0 ( 351/1013- 409/1047) -26.6 E42-E37 N19-N21
      9  268  959 (N19E51 L=168)   584    101        2 ( 244/ 906- 303/1003)  38.7 E54-E47 N15-N20
     10 1923  910 (S28W65 L=284)   662     72        1 (1892/ 885-1961/ 941)   0.0 W59-W74 S29-S26
     11  620  785 (N01E29 L=190)   635    171        0 ( 563/ 707- 657/ 843) -82.9 E31-E27 S03-N05
     12 1317  683 (S22W08 L=227)  1270    297        0 (1257/ 564-1377/ 821)  42.7 W01-W14 S27-S15
     13 1792  707 (S36W46 L=266)  2395    262        4 (1694/ 635-1866/ 810)  17.5 W35-W56 S39-S31
     14  565  601 (S08E39 L=181)  1068    240        2 ( 520/ 529- 642/ 702)  85.2 E42-E34 S13-S01
     15 1109  676 (S17E04 L=215)   216     24        1 (1085/ 660-1130/ 695) -45.0 E05-E02 S17-S15
     16  818  488 (S20E27 L=192)  1487    444        5 ( 751/ 323- 919/ 642)  79.7 E31-E19 S33-S11
     17  704  583 (S12E30 L=189)   336     61        1 ( 666/ 556- 735/ 610)  21.8 E33-E28 S12-S10
     18  563  373 (S21E51 L=169)  3533    394        8 ( 425/ 265- 709/ 499)   5.1 E81-E36 S27-S15
     19  391  449 (S13E61 L=159)   990    123        3 ( 355/ 400- 436/ 487)  50.2 E64-E55 S16-S10
     20  574  451 (S17E45 L=174)   293     55        0 ( 553/ 432- 593/ 478) -90.0 E46-E43 S17-S14
     21 1166  422 (S34E09 L=210)   401    106        0 (1130/ 377-1203/ 467)  29.7 E12-E05 S36-S31
     22  465  399 (S18E57 L=162)   752     96        5 ( 422/ 364- 496/ 433) -68.2 E62-E53 S20-S15
  

    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

  c = WHERE(data EQ Fil_ID, area)
  f = '(2(A,I6))'
  PRINT, FORM=f, "Area of Fil_ID", Fil_ID," =", area 

  data = ROTATE(data,7)
  Solar_y = 2048-Solar_y