Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  574 1677 (N28E44 L=358)  1599    320        4 ( 489/1626- 674/1719)  -9.0 E53-E34 N25-N30
      2  639 1344 (N07E29 L= 14)   342    154        4 ( 615/1293- 670/1400) -50.2 E31-E25 N03-N09
      3  818 1342 (N09E17 L= 25)   489    143        1 ( 773/1300- 884/1394) -26.6 E20-E12 N07-N11
      4 1065 1305 (N11E02 L= 40)   223     65        1 (1046/1274-1088/1337) -63.4 E03-W00 N08-N12
      5 1827 1060 (N11W54 L= 96)  1193    257        6 (1791/ 965-1866/1213)  90.0 W49-W58 N05-N21
      6  871 1186 (N00E11 L= 31)   195     46        1 ( 843/1171- 903/1202)   0.0 E13-E09 N00-N01
      7 1219 1165 (N05W09 L= 51)   319    113        2 (1161/1144-1269/1178)   0.0 W05-W12 N03-N06
      8 1882 1001 (N09W61 L=103)  2066    334        4 (1849/ 885-1923/1120) -74.1 W55-W68 N01-N15
      9  463 1003 (S16E35 L=  7)  1057    476        2 ( 305/ 945- 662/1052)  15.1 E47-E21 S20-S11
     10  862  980 (S12E09 L= 33)   184     62        1 ( 838/ 949- 896/1008) -26.6 E10-E06 S12-S10
     11  868  906 (S16E07 L= 35)   187     74        0 ( 830/ 882- 903/ 943)  53.1 E09-E05 S17-S13
     12  404  859 (S25E39 L=  3)   477    201        1 ( 354/ 785- 459/ 927)  48.4 E43-E34 S29-S20
     13 1181  858 (S13W12 L= 54)   282    125        0 (1136/ 811-1245/ 886)  50.2 W09-W15 S16-S10
     14 1731  812 (S05W50 L= 93)   324     70        2 (1709/ 784-1757/ 836) -11.3 W48-W53 S06-S03
     15  964  773 (S22W01 L= 43)   313     98        0 ( 922/ 739-1019/ 807) -18.4 E02-W04 S23-S20
     16 1281  734 (S19W21 L= 63)   284    134        2 (1255/ 694-1323/ 801) -35.5 W17-W24 S20-S15
     17  604  726 (S31E23 L= 19)  1218    330        4 ( 484/ 682- 738/ 770)  22.8 E32-E13 S34-S26
     18 1696  691 (S13W51 L= 94)   736    162        5 (1661/ 637-1722/ 742)  90.0 W47-W54 S15-S09
     19 1775  647 (S13W61 L=103)  4587    840       14 (1669/ 532-1878/ 739)  49.1 W53-W75 S21-S06
     20 1256  664 (S23W21 L= 63)   194     55        1 (1229/ 649-1287/ 681)  14.0 W19-W23 S24-S22
     21 1739  530 (S20W63 L=105)  1126    234        2 (1674/ 480-1808/ 586)  45.0 W57-W68 S24-S15
     22 1058  547 (S34W12 L= 54)   390     77        0 (1029/ 514-1104/ 574)  45.0 W09-W14 S36-S32
     23 1355  446 (S35W36 L= 78)   337     90        0 (1318/ 406-1382/ 480)  80.5 W34-W37 S37-S31
     24 1249  399 (S40W31 L= 73)   479    128        1 (1201/ 385-1311/ 428)   6.3 W26-W35 S41-S38
     25  586  332 (S61E29 L= 13)   427    106        0 ( 548/ 319- 629/ 347)   0.0 E34-E23 S62-S58
  

    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