Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1144 1641 (N41W27 L=128)  1210    202        3 (1095/1573-1193/1717)  57.5 W21-W34 N35-N46
      2 1349 1683 (N37W45 L=146)   413     77        0 (1323/1645-1380/1706)  15.9 W42-W49 N35-N38
      3 1551 1661 (N30W60 L=161)   775     89        1 (1506/1636-1598/1682)  -4.8 W54-W66 N28-N31
      4 1154 1466 (N30W19 L=121)   335     62        0 (1133/1438-1174/1500)  56.3 W18-W20 N27-N31
      5 1751 1459 (N13W64 L=165)   846     96        1 (1720/1402-1775/1498)  80.5 W62-W67 N09-N15
      6 1249 1397 (N23W23 L=124)   443     77        1 (1209/1373-1289/1426) -21.8 W20-W25 N21-N25
      7  983 1304 (N24W04 L=105)   247     64        0 ( 956/1283-1013/1326) -53.1 W02-W05 N22-N26
      8  621 1233 (N27E21 L= 80)   623    270        0 ( 534/1134- 708/1301) -51.8 E27-E16 N19-N33
      9  928 1090 (N13E04 L= 97)   222    125        0 ( 913/1041- 959/1147)  51.3 E05-E01 N09-N15
     10  260 1106 (N25E54 L= 48)   321     67        1 ( 248/1070- 274/1136) -76.0 E54-E52 N23-N27
     11  139 1060 (N24E71 L= 31)   913    131        2 ( 123/1009- 155/1134) -69.4 E73-E67 N20-N28
     12 1173 1074 (N07W10 L=111)   643    239        2 (1076/1016-1264/1117) -37.9 W04-W13 N02-N09
     13 1353 1013 (S01W19 L=120)   242     90        0 (1307/ 994-1394/1036)   0.0 W15-W21 S01-N00
     14  414  929 (N13E41 L= 60)   754    274        1 ( 352/ 863- 463/ 984) -60.3 E46-E37 N08-N16
     15 1903  869 (S25W64 L=165)  1535    171        2 (1859/ 791-1948/ 943)  26.6 W57-W74 S29-S22
     16  180  856 (N11E66 L= 35)  1423    190        1 ( 137/ 775- 216/ 930) -56.3 E71-E62 N06-N15
     17 1562  897 (S13W30 L=131)   331     60        0 (1537/ 871-1596/ 917)   0.0 W27-W32 S13-S11
     18  910  833 (S01E11 L= 91)   305     73        1 ( 893/ 784- 931/ 869)  76.0 E11-E09 S04-N00
     19 1720  827 (S21W41 L=143)   334    112        0 (1688/ 797-1742/ 853) -63.4 W38-W43 S23-S19
     20 1368  800 (S13W15 L=117)   367    113        0 (1348/ 758-1391/ 850)  78.7 W13-W16 S15-S10
     21 1532  763 (S20W26 L=127)   254    101        0 (1485/ 741-1567/ 782) -18.4 W22-W28 S21-S18
     22 1439  750 (S18W19 L=120)   269     38        0 (1412/ 727-1458/ 769) -56.3 W17-W20 S19-S16
     23 1703  734 (S27W39 L=140)   397     71        0 (1679/ 702-1726/ 767)  36.9 W37-W41 S28-S25
     24 1286  690 (S18W08 L=109)   424    169        0 (1252/ 626-1336/ 761) -84.3 W06-W10 S23-S13
     25 1531  570 (S33W23 L=125)   520     61        2 (1497/ 543-1560/ 596) -31.0 W20-W25 S34-S30
     26  701  512 (S17E32 L= 69)   863    184        1 ( 635/ 455- 757/ 592)  26.6 E38-E26 S19-S12
     27 1395  434 (S39W11 L=112)  1630    238        2 (1313/ 351-1461/ 529)  32.7 W03-W17 S43-S32
     28  566  460 (S18E44 L= 57)   572     96        0 ( 522/ 437- 609/ 490) -51.3 E46-E41 S20-S15
     29 1097  326 (S39E14 L= 88)  4029    673        8 ( 807/ 186-1359/ 438)   4.5 E44-W08 S45-S34
  

    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