Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1628 1583 (N18W60 L=185)   571     88        2 (1604/1531-1653/1619)  29.7 W54-W64 N15-N19
      2 1695 1589 (N15W67 L=193)   652     36        1 (1671/1562-1716/1610)   8.1 W64-W71 N14-N16
      3 1562 1550 (N18W52 L=177)   297     28        0 (1537/1533-1590/1566) -21.8 W49-W54 N17-N19
      4 1760 1508 (N09W68 L=193)  1365    161        4 (1708/1477-1825/1548) -30.3 W63-W79 N05-N12
      5 1865 1157 (S12W60 L=186)  7103    553       18 (1780/ 993-1951/1388)  87.6 W49-W79 S24-N00
      6 1226 1348 (N18W21 L=147)   569    129        0 (1165/1329-1292/1367) -23.2 W17-W24 N15-N20
      7 1047 1267 (N19W08 L=134)   358    135        0 ( 990/1231-1100/1301) -56.3 W05-W10 N15-N21
      8  416 1043 (N22E37 L= 88)  1740    379        1 ( 298/ 904- 526/1173) -55.0 E46-E31 N12-N32
      9 1152 1125 (N08W10 L=135)   236    123        0 (1088/1112-1213/1142) -14.0 W05-W13 N07-N09
     10 1428  904 (S11W19 L=145)   770    365        0 (1386/ 754-1449/1089)  57.1 W13-W24 S18-S01
     11  680 1050 (N16E19 L=107)   411    182        0 ( 609/1026- 780/1082) -37.9 E23-E13 N12-N19
     12 1767 1004 (S17W46 L=172)   371     49        1 (1746/ 979-1802/1026) -11.3 W44-W49 S18-S15
     13 1541  631 (S31W21 L=147)  3154    546        6 (1418/ 438-1692/ 851)  31.8 W07-W36 S41-S22
     14  932  768 (S05E12 L=114)   241     64        1 ( 895/ 753- 965/ 790) -14.0 E13-E09 S06-S03
     15 1338  772 (S16W11 L=136)   234     57        0 (1307/ 752-1369/ 787) -53.1 W09-W12 S18-S14
     16  758  682 (S06E24 L=102)   455    171        1 ( 744/ 588- 777/ 753)  63.4 E27-E21 S11-S01
     17 1170  629 (S20E03 L=123)   529    225        0 (1123/ 539-1221/ 711)  35.0 E08-W02 S23-S15
     18  499  653 (S01E42 L= 84)   905    219        3 ( 409/ 595- 568/ 698) -20.0 E48-E37 S05-N00
     19  588  660 (S03E35 L= 90)   460     78        1 ( 548/ 629- 629/ 694) -59.0 E37-E32 S05-N00
     20  938  541 (S18E19 L=107)   796    279        1 ( 904/ 415- 984/ 666)  42.9 E25-E11 S26-S12
     21 1674  536 (S44W32 L=158)   330     20        0 (1657/ 518-1694/ 557) -53.1 W30-W34 S45-S41
     22  333  469 (S09E67 L= 59)   511     73        2 ( 313/ 439- 354/ 506)  68.2 E69-E64 S11-S06
     23  995  390 (S30E22 L=104)   239     74        0 ( 952/ 379-1037/ 400) -45.0 E23-E19 S31-S27
     24 1460  279 (S58W07 L=133)   497     68        2 (1422/ 266-1498/ 299) -21.8 W02-W12 S61-S54
  

    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