Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1708 1415 (N07W55 L=223)  1062     81        3 (1671/1374-1748/1454) -59.0 W51-W59 N04-N09
      2 1068 1322 (N20W10 L=178)  1162    456        1 ( 913/1194-1236/1397)   7.4 E01-W22 N16-N22
      3 1800 1230 (S05W56 L=224)   576     84        1 (1764/1202-1840/1260) -50.2 W52-W59 S08-S02
      4  444 1150 (N25E33 L=135)   637    152        0 ( 401/1090- 501/1187)  24.0 E37-E28 N22-N26
      5 1421 1130 (N00W25 L=193)   664    107        1 (1382/1069-1451/1176) -80.5 W23-W26 S03-N03
      6 1617 1078 (S08W36 L=204)   701    172        3 (1553/1025-1674/1139)   5.7 W31-W41 S10-S05
      7 1888  911 (S26W59 L=227)  3598    383        4 (1812/ 761-1940/1100)  43.4 W49-W68 S33-S16
      8 1752 1064 (S13W46 L=214)   299     32        0 (1727/1046-1775/1079) -14.0 W44-W48 S13-S11
      9  268  992 (N20E51 L=117)   707    131        1 ( 244/ 926- 289/1059)  81.9 E52-E49 N15-N23
     10 1740 1000 (S16W44 L=212)   434    101        2 (1698/ 952-1768/1034) -56.3 W40-W45 S19-S13
     11 1287  985 (S04W13 L=181)   234     72        0 (1274/ 942-1304/1023)  53.1 W12-W15 S06-S02
     12  312  896 (N13E48 L=120)  1226    227        1 ( 267/ 827- 361/ 989)  38.7 E53-E42 N10-N18
     13  127  948 (N20E70 L= 98)   754     71        0 ( 107/ 915- 153/ 988) -45.0 E73-E65 N17-N22
     14 1560  932 (S15W29 L=197)   624    143        1 (1514/ 873-1616/ 963)  12.5 W24-W33 S16-S13
     15  800  812 (S02E18 L=150)  1102    232        0 ( 710/ 723- 873/ 898) -71.6 E20-E15 S08-N04
     16 1591  859 (S20W30 L=198)   358     65        0 (1565/ 824-1619/ 891)  45.0 W27-W32 S21-S18
     17 1250  699 (S19W05 L=173)   203     41        1 (1235/ 676-1271/ 725) -90.0 W03-W05 S20-S17
     18  676  499 (S17E35 L=133)  1845    445        4 ( 546/ 360- 817/ 644)  20.1 E51-E21 S22-S11
     19  518  610 (S07E41 L=127)   311     57        0 ( 480/ 594- 546/ 632)   0.0 E44-E38 S07-S05
     20  365  601 (S04E54 L=114)   331     50        2 ( 336/ 582- 401/ 622) -18.4 E56-E50 S05-S02
     21  383  469 (S12E60 L=108)  3410    416       10 ( 285/ 336- 480/ 617)  84.3 E68-E53 S22-S02
     22 1668  597 (S39W33 L=201)   318     30        0 (1640/ 584-1692/ 613) -31.0 W30-W36 S40-S37
     23 1029  511 (S25E14 L=154)  1395    293        2 ( 907/ 445-1160/ 585)   5.7 E23-E03 S26-S22
     24  771  359 (S28E36 L=132)   355     65        0 ( 737/ 333- 801/ 385)  15.9 E39-E32 S29-S26
  

    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