Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1071 1697 (N49W20 L=180)  2156    400        3 ( 894/1653-1257/1731) -16.7 W04-W35 N43-N53
      2 1565 1676 (N35W63 L=223)  2056    208        2 (1474/1636-1655/1710) -12.3 W51-W76 N31-N36
      3 1062 1556 (N39W14 L=174)   880    282        0 ( 949/1523-1190/1583) -19.4 W05-W22 N35-N42
      4 1282 1493 (N30W27 L=187)   236     67        1 (1252/1475-1313/1516) -45.0 W25-W28 N28-N32
      5 1757 1453 (N17W66 L=226)  1005    118        1 (1718/1406-1800/1508) -81.9 W62-W69 N13-N20
      6  977 1328 (N25W02 L=162)   441    166        1 ( 904/1313-1063/1342)  -6.3 E02-W07 N23-N26
      7 1399 1315 (N17W29 L=189)   505    170        0 (1325/1274-1459/1339) -32.0 W24-W32 N13-N19
      8  182 1086 (N20E65 L= 95)  1737    299        2 ( 161/ 952- 209/1225) -73.6 E70-E61 N11-N28
      9 1098 1124 (N11W06 L=166)   628    272        1 (1002/1081-1206/1175)  -8.7 W00-W13 N08-N14
     10 1818  997 (S10W56 L=216)  4888    484       13 (1712/ 851-1901/1163)  39.8 W43-W67 S16-S01
     11 1604 1035 (S03W37 L=197)   416     88        3 (1562/1014-1650/1074) -26.6 W34-W40 S05-N00
     12  500 1004 (N12E34 L=126)   440    111        1 ( 484/ 952- 521/1059) -90.0 E35-E32 N09-N15
     13 1177  956 (S00W08 L=168)   605    294        0 (1035/ 940-1296/ 980)  -7.6 W00-W15 S01-N01
     14  619  894 (N04E27 L=133)   224     65        0 ( 599/ 873- 649/ 921) -56.3 E28-E25 N02-N06
     15 1370  854 (S09W18 L=178)   437    122        3 (1339/ 821-1413/ 900)  68.2 W16-W21 S11-S06
     16 1850  777 (S26W61 L=221)  1624    176        2 (1801/ 725-1899/ 857)  41.2 W53-W67 S28-S21
     17 1189  789 (S10W06 L=166)   838    153        5 (1147/ 739-1251/ 852)  63.4 W03-W09 S12-S06
     18  706  780 (S04E23 L=137)   295    125        1 ( 653/ 751- 759/ 813) -39.8 E26-E20 S06-S01
     19  341  588 (S12E57 L=103)  3041    419        4 ( 229/ 476- 463/ 762) -70.7 E64-E48 S20-N00
     20 1207  628 (S21W05 L=165)   869    504        3 (1035/ 494-1321/ 737)  25.5 E08-W13 S27-S14
     21 1134  695 (S15W01 L=162)   254    137        1 (1081/ 674-1203/ 722) -33.7 E01-W05 S17-S12
     22  381  642 (S09E51 L=109)   925    160        2 ( 330/ 579- 427/ 716) -73.3 E53-E48 S13-S03
     23  504  591 (S13E42 L=118)  1202    339        4 ( 429/ 460- 579/ 713) -80.5 E45-E38 S22-S04
     24 1388  547 (S30W17 L=177)   759    156        1 (1339/ 484-1432/ 608)  41.2 W12-W20 S33-S26
     25  439  434 (S23E56 L=104)   420     56        0 ( 425/ 403- 457/ 461)  29.7 E59-E52 S25-S21
     26  550  340 (S32E52 L=108)   637     96        1 ( 520/ 306- 584/ 371)  18.4 E59-E47 S34-S28
     27  964  232 (S47E24 L=136)  1428    256        2 ( 860/ 164-1055/ 315)  21.4 E40-E12 S53-S41
  

    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