Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1544 1727 (N28W65 L=315)   762     76        1 (1509/1690-1565/1759)  15.3 W60-W72 N25-N29
      2  949 1593 (N40W14 L=263)   373    134        0 ( 882/1576-1010/1608) -18.4 W08-W17 N37-N41
      3 1648 1544 (N15W58 L=307)  1133    135        1 (1572/1513-1708/1569) -22.6 W51-W63 N11-N17
      4 1772 1442 (N06W64 L=313)  1176    102        3 (1731/1403-1817/1484) -63.4 W59-W67 N02-N08
      5  686 1217 (N24E15 L=234)   242    103        0 ( 642/1193- 734/1236) -15.9 E18-E11 N22-N25
      6 1263 1155 (N06W16 L=266)   498    112        0 (1203/1131-1319/1172) -26.6 W13-W19 N04-N07
      7 1062 1010 (N03W02 L=251)   565    175        0 ( 986/ 977-1131/1059)   6.3 E03-W06 N01-N04
      8 1791  931 (S22W47 L=297)  1179    141        2 (1746/ 867-1840/ 994)  82.9 W43-W53 S25-S17
      9  177  941 (N20E63 L=186)   426     79        1 ( 149/ 907- 215/ 969)  11.3 E67-E57 N18-N21
     10  522  889 (N10E33 L=216)   827    167        1 ( 464/ 832- 570/ 962)  21.8 E38-E27 N05-N12
     11 1195  844 (S09W05 L=254)   297    105        1 (1167/ 808-1231/ 892) -81.9 W03-W05 S12-S05
     12  584  801 (N03E31 L=218)   326    129        1 ( 529/ 779- 654/ 817)  -6.3 E35-E26 N02-N04
     13 1651  742 (S29W32 L=281)   706    136        0 (1603/ 701-1701/ 787)  12.5 W27-W37 S30-S27
     14  394  475 (S11E59 L=190)  9372      0       33 ( 208/ 301- 554/ 748) -75.5 E74-E47 S24-N07
     15  543  696 (S01E37 L=212)   263    119        0 ( 493/ 654- 587/ 728) -45.0 E39-E34 S04-N01
     16  895  529 (S20E21 L=228)   559    174        0 ( 869/ 450- 928/ 607)  41.6 E25-E16 S24-S15
     17  532  585 (S08E42 L=207)   269     44        1 ( 509/ 558- 552/ 603)  26.6 E43-E39 S09-S06
     18  744  560 (S14E29 L=220)   292     46        1 ( 713/ 538- 771/ 581)   0.0 E30-E26 S15-S12
     19  633  533 (S13E37 L=212)   554     96        1 ( 593/ 485- 671/ 578) -90.0 E40-E34 S16-S09
     20 1459  526 (S37W14 L=263)   716     98        2 (1420/ 486-1506/ 563)   0.0 W10-W17 S39-S33
     21  584  463 (S16E44 L=205)  1477    320        4 ( 466/ 403- 656/ 536) -51.3 E49-E39 S20-S09
     22 1387  488 (S37W08 L=257)   256     43        1 (1363/ 462-1408/ 509) -76.0 W06-W09 S38-S34
     23  533  398 (S19E52 L=198)   742    133        2 ( 484/ 357- 600/ 432) -54.5 E55-E48 S23-S16
     24  640  241 (S32E57 L=192)  1364    201        5 ( 577/ 201- 679/ 311)  36.9 E65-E49 S35-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