Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1754 1553 (N19W67 L=186)  1306    155        1 (1680/1498-1808/1598) -35.0 W60-W73 N15-N22
      2  529 1393 (N31E27 L= 92)  1111    232        2 ( 472/1298- 602/1488)  45.0 E31-E21 N25-N36
      3  881 1429 (N27E02 L=117)   551    153        1 ( 826/1355- 937/1478) -66.0 E04-W00 N21-N30
      4 1253 1438 (N21W21 L=140)  1383    400        2 (1055/1392-1413/1475) -17.7 W09-W32 N18-N25
      5  293 1302 (N29E48 L= 71)  1515    233        3 ( 190/1256- 413/1342) -17.1 E62-E36 N24-N33
      6 1553 1251 (N05W36 L=155)   317     74        0 (1517/1225-1582/1283) -53.1 W34-W38 N03-N07
      7  848 1171 (N12E08 L=111)   651    226        2 ( 762/1097- 908/1246)  31.0 E13-E03 N08-N15
      8 1786 1014 (S12W51 L=169)  1806    364        8 (1720/ 895-1863/1151)  39.1 W43-W60 S18-S05
      9 1572 1103 (S04W35 L=153)   377     93        0 (1557/1049-1586/1149)  71.6 W33-W35 S06-N00
     10  566 1121 (N14E26 L= 93)   294     54        1 ( 546/1089- 593/1144)  71.6 E27-E24 N11-N15
     11 1702 1069 (S08W44 L=163)   498    106        1 (1669/1024-1736/1128)  45.0 W40-W46 S09-S04
     12 1858  998 (S14W58 L=177)   995    134        1 (1815/ 935-1887/1068)  41.2 W53-W62 S17-S10
     13  475  911 (N03E35 L= 84)   346    113        0 ( 418/ 899- 533/ 926) -14.0 E39-E31 N01-N03
     14 1185  845 (S12W06 L=125)   207     75        0 (1154/ 818-1213/ 881)  36.9 W04-W08 S13-S10
     15  377  807 (S02E45 L= 74)   323     83        1 ( 353/ 772- 403/ 843) -90.0 E46-E42 S03-N00
     16 1573  812 (S21W31 L=150)   227     36        1 (1555/ 785-1588/ 839)  56.3 W29-W32 S22-S19
     17  301  712 (S06E54 L= 65)  2268    319       10 ( 249/ 621- 363/ 832)  76.0 E60-E49 S11-N01
     18  161  775 (S00E68 L= 51)   991     80        1 ( 134/ 732- 199/ 808)  14.0 E74-E62 S02-N01
     19 1370  773 (S19W17 L=136)   265     61        0 (1337/ 753-1399/ 795)  14.0 W14-W18 S20-S18
     20  545  744 (S08E34 L= 85)   260     79        1 ( 530/ 704- 564/ 785)  78.7 E35-E32 S10-S05
     21 1507  685 (S27W26 L=145)   459     99        0 (1451/ 672-1563/ 699)  -6.3 W21-W30 S28-S25
     22  386  403 (S26E64 L= 55)  1107    142        1 ( 345/ 354- 428/ 471)  13.5 E78-E53 S28-S22
     23 1503  350 (S53W29 L=148)   517     71        0 (1471/ 326-1527/ 378) -32.0 W24-W32 S55-S50
     24 1301  275 (S54W07 L=126)  1108    161        2 (1227/ 245-1384/ 311)   3.8 W00-W15 S56-S52
     25  884  252 (S46E31 L= 88)   344     74        0 ( 852/ 237- 930/ 264)   0.0 E34-E26 S46-S44
  

    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