Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1315 1480 (N22W28 L=215)  2302    542        5 (1103/1431-1563/1517) -14.0 W14-W46 N17-N27
      2 1819 1471 (N11W70 L=257)   643     97        2 (1794/1450-1844/1493) -31.0 W66-W74 N09-N12
      3 1725 1306 (N04W52 L=239)   393     58        1 (1700/1281-1750/1337) -53.1 W50-W54 N02-N06
      4 1205 1297 (N14W16 L=203)   280     81        0 (1171/1275-1257/1329) -45.0 W14-W18 N11-N16
      5  277 1203 (N26E48 L=139)  1781    390        2 ( 183/1096- 374/1308) -46.8 E57-E39 N17-N34
      6  933 1216 (N14E02 L=185)   542    134        0 ( 868/1163- 984/1258) -56.3 E04-W00 N10-N18
      7 1928 1126 (S11W69 L=256)   826    135        3 (1903/1096-1950/1158)  76.0 W65-W73 S12-S08
      8 1863 1076 (S12W59 L=246)  1760    308        8 (1792/1006-1908/1138) -83.7 W51-W64 S16-S07
      9  245 1020 (N15E53 L=134)   342     99        0 ( 222/ 987- 275/1061) -59.0 E54-E50 N13-N18
     10 1686  972 (S14W41 L=228)   653    175        1 (1649/ 909-1715/1031)  66.8 W37-W43 S17-S10
     11 1826  989 (S16W54 L=240)   660     65        1 (1800/ 956-1847/1030)  78.7 W50-W55 S18-S13
     12 1895  969 (S19W61 L=248)  1505    236        4 (1852/ 920-1946/1029)  21.8 W55-W68 S21-S16
     13  204  946 (N12E58 L=129)   516    136        1 ( 190/ 875- 222/1013) -90.0 E59-E56 N07-N15
     14 1552  946 (S13W31 L=217)   227     42        0 (1533/ 920-1571/ 975)  26.6 W28-W32 S14-S11
     15 1900  907 (S23W61 L=248)  1283    303        2 (1829/ 866-1949/ 971)   4.1 W52-W67 S25-S19
     16  424  776 (S02E42 L=144)   635    164        1 ( 404/ 695- 445/ 856)  63.4 E44-E40 S06-N02
     17 1353  696 (S24W14 L=201)   235     97        0 (1301/ 678-1400/ 710) -26.6 W10-W16 S25-S22
     18  263  664 (S05E61 L=126)   614     99        1 ( 231/ 620- 298/ 709) -56.3 E63-E58 S08-S02
     19 1388  576 (S32W15 L=201)   983    209        0 (1301/ 495-1449/ 660)  30.3 W07-W19 S36-S27
     20  218  622 (S07E69 L=118)   927    192        1 ( 194/ 576- 248/ 659)  21.8 E75-E63 S10-S05
     21  789  528 (S23E25 L=162)   370    122        0 ( 732/ 490- 833/ 567)  20.6 E29-E21 S24-S21
     22  892  457 (S30E21 L=166)  1023    274        0 ( 803/ 361- 987/ 559)  29.1 E30-E11 S34-S24
     23  402  521 (S16E53 L=134)   425     82        2 ( 373/ 498- 433/ 546) -36.9 E55-E51 S18-S14
     24  357  477 (S18E60 L=127)  1270    157        2 ( 310/ 427- 397/ 527) -60.3 E63-E57 S21-S14
  

    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