Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1342 1761 (N39W49 L=198)  1474    261        3 (1210/1700-1446/1807)  -2.0 W34-W64 N37-N40
      2 1689 1462 (N12W56 L=205)   354     67        0 (1679/1437-1711/1500)  76.0 W54-W58 N10-N14
      3  647 1403 (N34E16 L=133)   456    113        0 ( 602/1384- 719/1424) -12.5 E19-E10 N31-N35
      4 1742 1327 (N03W55 L=203)   417     70        1 (1704/1304-1775/1348) -26.6 W51-W57 N01-N04
      5  861 1300 (N22E03 L=145)   275     70        0 ( 821/1275- 895/1319)   9.5 E06-W00 N21-N23
      6 1357 1245 (N08W24 L=173)   256     50        0 (1335/1215-1381/1277) -68.2 W23-W25 N05-N10
      7 1800 1170 (S07W55 L=204)   545     38        1 (1774/1149-1828/1197) -31.0 W52-W58 S08-S05
      8  924 1159 (N13E03 L=146)   220    123        0 ( 865/1143- 977/1179) -21.8 E05-W00 N11-N14
      9 1855 1076 (S14W59 L=208)  3012    201        8 (1792/1008-1923/1168)  20.6 W50-W69 S18-S08
     10 1520 1127 (S02W32 L=180)   256     96        0 (1479/1092-1545/1160)  18.4 W28-W34 S03-N00
     11  377 1047 (N18E41 L=107)  1573    361        2 ( 234/1000- 503/1147)   8.7 E55-E29 N14-N21
     12 1602 1019 (S10W35 L=183)   342     80        1 (1584/ 981-1617/1069)  59.0 W33-W36 S12-S07
     13 1708  870 (S22W41 L=190)   412    105        0 (1687/ 829-1725/ 929)  68.2 W38-W42 S24-S18
     14 1552  792 (S22W28 L=176)   936    216        2 (1477/ 708-1606/ 881)  36.0 W21-W32 S26-S18
     15 1361  730 (S22W13 L=162)   775    266        0 (1317/ 619-1418/ 841)  47.7 W08-W19 S27-S16
     16 1580  676 (S31W29 L=177)   424    121        0 (1530/ 643-1624/ 723)  20.6 W24-W32 S32-S28
     17  490  622 (S09E43 L=105)   330     59        1 ( 473/ 589- 506/ 657)  76.0 E44-E41 S10-S06
     18  990  521 (S26E14 L=134)   415    160        0 ( 954/ 445-1023/ 583)  37.9 E19-E10 S29-S22
     19 1730  485 (S51W50 L=199)   699     61        2 (1694/ 471-1771/ 502) -10.6 W43-W59 S52-S48
     20  697  342 (S31E42 L=106)   928    264        0 ( 674/ 226- 721/ 465)  41.8 E53-E34 S39-S22
  

    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