Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1442 1768 (N41W62 L=259)   542     54        1 (1413/1741-1468/1788)  11.3 W57-W67 N39-N42
      2 1300 1752 (N45W47 L=243)   369     51        0 (1281/1725-1327/1769)   8.1 W43-W50 N43-N46
      3 1097 1706 (N48W26 L=223)   407     32        1 (1070/1681-1118/1732)  53.1 W24-W29 N45-N49
      4  776 1581 (N47E05 L=191)  1928    424        5 ( 614/1503- 952/1654)   3.7 E20-W11 N43-N49
      5 1671 1428 (N15W54 L=251)   372     89        0 (1636/1390-1702/1456) -59.0 W52-W55 N12-N17
      6  616 1376 (N36E21 L=175)   336     90        0 ( 572/1346- 659/1396) -33.7 E24-E17 N33-N37
      7  235 1338 (N39E62 L=134)   514     67        1 ( 212/1304- 260/1363)  90.0 E66-E58 N36-N40
      8 1043 1200 (N17W05 L=201)  1312    324        2 ( 951/1071-1133/1326) -72.5 W01-W07 N07-N26
      9  288 1290 (N35E53 L=143)   323     38        1 ( 264/1268- 313/1304)   0.0 E56-E49 N33-N36
     10  234 1003 (N18E57 L=139)   496    106        0 ( 215/ 955- 257/1058) -60.3 E59-E54 N14-N21
     11  879  791 (S04E13 L=183)   404    124        1 ( 860/ 736- 905/ 852)  66.8 E14-E10 S07-N00
     12 1749  778 (S24W45 L=242)  1312    215        1 (1698/ 724-1817/ 847) -59.0 W40-W52 S28-S18
     13  425  817 (N05E42 L=154)   286     59        1 ( 400/ 792- 447/ 844) -56.3 E43-E40 N03-N06
     14  155  734 (N02E76 L=120)  2960    182        5 ( 116/ 664- 199/ 820) -69.4 E84-E71 S03-N06
     15 1143  659 (S17E00 L=196)   491    173        1 (1089/ 595-1174/ 742)  49.4 E04-W03 S19-S12
     16  315  667 (S03E56 L=140)   367     40        1 ( 296/ 646- 339/ 685) -71.6 E58-E53 S04-S01
     17 1352  506 (S32W11 L=207)   260     72        0 (1321/ 483-1381/ 538)  21.8 W08-W13 S33-S30
     18  723  433 (S24E33 L=163)  1278    243        0 ( 687/ 327- 764/ 534)  51.8 E39-E26 S31-S17
     19  423  440 (S19E58 L=139)  3934    258       13 ( 358/ 328- 503/ 529)  68.2 E66-E51 S27-S12
     20 1636  451 (S46W38 L=234)  1563    264        1 (1529/ 386-1737/ 516)   5.0 W25-W50 S49-S43
     21 1173  419 (S34E04 L=193)   378     85        0 (1148/ 370-1198/ 460)  45.0 E06-W00 S37-S31
     22  877  271 (S39E31 L=166)   316     34        1 ( 852/ 255- 900/ 285) -33.7 E32-E28 S40-S37
     23 1144  201 (S53E15 L=182)  1121    153        0 (1085/ 172-1226/ 232)  -3.8 E21-E05 S56-S50
  

    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