Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1226 1749 (N49W38 L=181)  1473    277        3 (1119/1720-1363/1776) -18.4 W27-W49 N43-N52
      2 1170 1624 (N41W25 L=167)   286     31        1 (1148/1606-1195/1641)  11.3 W22-W27 N39-N42
      3 1334 1615 (N37W37 L=179)   344     52        1 (1308/1591-1365/1634) -45.0 W34-W40 N35-N38
      4 1682 1393 (N15W54 L=196)   372     70        1 (1655/1359-1712/1424) -78.7 W51-W55 N12-N17
      5 1591 1403 (N18W46 L=189)   441    138        0 (1533/1383-1645/1421) -16.7 W40-W50 N15-N19
      6 1579 1265 (N10W40 L=183)   253     61        0 (1551/1247-1607/1280)   0.0 W37-W42 N09-N11
      7 1352 1198 (N11W23 L=166)   762    270        1 (1250/1157-1457/1243) -17.1 W17-W30 N08-N15
      8 1901 1088 (S08W68 L=211)  4377    212        8 (1855/ 992-1939/1185) -80.5 W61-W77 S14-S02
      9  332 1083 (N19E47 L= 95)   732    185        1 ( 312/1014- 370/1181) -70.0 E49-E44 N14-N25
     10  756 1045 (N12E16 L=126)   413    112        1 ( 731/ 995- 780/1102)  63.4 E18-E14 N09-N15
     11 1373 1027 (N01W21 L=163)   462    248        1 (1257/1004-1474/1040)  -4.1 W13-W27 S01-N02
     12 1853  979 (S13W59 L=202)   434     90        0 (1831/ 943-1867/1016) -59.0 W57-W61 S15-S10
     13 1802  978 (S11W53 L=196)   568     74        1 (1781/ 941-1821/1015) -90.0 W51-W55 S13-S09
     14 1549  905 (S10W31 L=173)  1365    268        5 (1454/ 832-1652/ 957)  11.3 W23-W39 S12-S07
     15 1397  855 (S10W20 L=162)   271     46        2 (1377/ 822-1415/ 886) -78.7 W18-W21 S12-S07
     16 1553  811 (S16W30 L=173)   724    176        2 (1501/ 731-1585/ 878)  48.8 W25-W33 S20-S11
     17  362  834 (N04E47 L= 95)   340     54        1 ( 339/ 806- 385/ 862) -63.4 E49-E45 N01-N05
     18  783  683 (S10E20 L=122)   433    142        0 ( 735/ 628- 825/ 740)  32.0 E24-E16 S13-S07
     19  366  675 (S06E51 L= 91)   864    146        4 ( 328/ 609- 402/ 731)  69.4 E55-E48 S10-S02
     20  523  590 (S13E41 L=102)  1681    354        7 ( 438/ 499- 622/ 718) -66.4 E44-E36 S20-S04
     21 1614  609 (S31W35 L=177)  1108    181        1 (1558/ 555-1675/ 679)  31.0 W30-W40 S33-S27
     22  613  628 (S12E33 L=109)   269     47        0 ( 587/ 608- 636/ 649) -45.0 E34-E31 S13-S10
     23  616  449 (S24E39 L=103)   438     73        1 ( 594/ 407- 638/ 486)  45.0 E42-E36 S26-S21
     24  757  378 (S31E32 L=110)   389     94        0 ( 716/ 358- 802/ 408)  14.0 E35-E27 S31-S29
     25  415  380 (S27E65 L= 78)   810     47        3 ( 392/ 355- 439/ 403) -90.0 E69-E60 S29-S25
     26 1123  228 (S51E11 L=131)   730     94        3 (1088/ 202-1168/ 254)  -8.1 E14-E06 S54-S47
  

    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