Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  556 1756 (N32E55 L= 96)   958    141        2 ( 531/1683- 578/1820) -38.2 E62-E48 N26-N37
      2 1360 1724 (N47W10 L=161)   401     42        2 (1329/1703-1389/1743)  26.6 W06-W12 N44-N49
      3  921 1691 (N33E22 L=129)   748    159        1 ( 855/1641- 979/1724) -15.3 E27-E16 N30-N35
      4  580 1612 (N22E42 L=109)   828    148        3 ( 538/1556- 662/1657)  -5.2 E47-E36 N17-N24
      5  416 1561 (N16E54 L= 97)   455    124        1 ( 397/1491- 444/1610) -63.4 E55-E50 N11-N19
      6  674 1540 (N18E33 L=118)   592     99        2 ( 624/1497- 701/1592) -50.2 E35-E29 N15-N21
      7 1134 1536 (N26E03 L=148)   464     95        0 (1116/1493-1154/1587) -71.6 E04-E01 N23-N29
      8  579 1480 (N13E37 L=114)   477     93        3 ( 545/1441- 607/1519) -68.2 E39-E34 N10-N15
      9 1877 1257 (N27W61 L=211)  1557    178        1 (1808/1206-1928/1331)  -9.5 W51-W70 N24-N29
     10 1726 1129 (N14W43 L=194)  1147    288        3 (1709/ 967-1752/1241) -83.3 W41-W46 N04-N21
     11 1917 1137 (N21W66 L=217)   580     74        1 (1899/1090-1927/1175) -80.5 W62-W68 N17-N23
     12  829 1105 (S06E13 L=138)   190     53        1 ( 798/1085- 859/1121)  33.7 E14-E11 S06-S04
     13  517 1043 (S14E32 L=119)  1044    209        3 ( 462/ 964- 579/1086)  48.8 E35-E27 S19-S11
     14 1798 1021 (N10W51 L=202)   394     76        1 (1778/ 991-1826/1052) -11.3 W49-W54 N08-N11
     15  693 1017 (S13E20 L=131)   216     41        0 ( 661/1005- 722/1030)  14.0 E21-E17 S13-S11
     16  969  893 (S15E01 L=150)   362    116        0 ( 920/ 865-1010/ 936)  59.0 E03-W01 S17-S12
     17  340  864 (S27E45 L=106)   729    129        0 ( 286/ 815- 375/ 913) -32.0 E50-E41 S29-S24
     18  285  742 (S35E53 L= 98)   664     86        1 ( 250/ 708- 332/ 776) -20.6 E57-E47 S36-S33
     19 1662  603 (S17W53 L=204)  1000    262        1 (1566/ 527-1737/ 681)  61.7 W48-W58 S23-S10
     20 1014  635 (S30W07 L=158)  1312    373        3 ( 846/ 592-1184/ 677)   7.4 E04-W19 S32-S26
     21  460  562 (S45E36 L=115)  1364    216        2 ( 360/ 530- 558/ 606)   2.7 E47-E26 S47-S42
     22 1143  491 (S36W21 L=172)   336     72        1 (1114/ 464-1181/ 520)  63.4 W18-W22 S38-S33
     23  781  385 (S52E04 L=147)   273     25        0 ( 766/ 362- 797/ 410) -76.0 E05-E01 S54-S50
     24  557  279 (S68E39 L=112)   942    137        1 ( 480/ 255- 615/ 301)   3.6 E57-E25 S70-S65
  

    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