Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1470 1607 (N27W44 L=201)   442    121        0 (1409/1577-1517/1624) -33.7 W39-W46 N24-N29
      2 1423 1402 (N16W32 L=189)   804    254        1 (1325/1363-1545/1441) -11.3 W26-W41 N13-N19
      3  150 1266 (N30E67 L= 91)  2606    255        3 (  86/1169- 225/1369)  32.0 E81-E58 N24-N36
      4  342 1292 (N29E43 L=115)   611    111        0 ( 315/1242- 372/1350) -54.5 E46-E39 N25-N32
      5  655 1238 (N20E19 L=139)  1292    349        5 ( 473/1146- 777/1290) -15.9 E31-E10 N13-N25
      6  319 1077 (N16E45 L=112)  1789    464        6 ( 221/ 941- 400/1214)  33.7 E55-E37 N08-N23
      7 1853 1141 (S07W59 L=217)  1208    142        6 (1796/1096-1911/1177) -15.9 W53-W67 S09-S04
      8  386 1109 (N17E39 L=118)   344     80        1 ( 373/1066- 406/1156)  68.2 E40-E37 N14-N19
      9  958 1020 (N02E04 L=154)   684    243        1 ( 892/ 915- 997/1123) -80.5 E06-E02 S04-N08
     10  790 1077 (N08E13 L=145)   404    115        0 ( 722/1054- 844/1099)   0.0 E16-E09 N07-N08
     11 1809 1007 (S14W52 L=210)  1594    325        6 (1746/ 910-1868/1092) -67.4 W47-W59 S19-S07
     12  229 1036 (N15E54 L=103)   351     54        0 ( 210/1000- 248/1067)  45.0 E56-E52 N13-N16
     13  130  983 (N13E68 L= 90)   595     50        3 ( 109/ 957- 159/1013) -31.0 E71-E63 N11-N15
     14 1729  915 (S18W44 L=202)   345     22        1 (1709/ 892-1749/ 941) -63.4 W42-W46 S19-S15
     15 1596  859 (S18W33 L=191)   453    130        1 (1578/ 802-1624/ 926) -90.0 W31-W35 S21-S14
     16 1240  886 (S10W10 L=168)   191     60        1 (1209/ 866-1271/ 907)   0.0 W08-W11 S11-S09
     17 1336  855 (S14W15 L=173)   214    115        0 (1280/ 831-1370/ 892)   9.5 W11-W17 S14-S12
     18 1220  811 (S14W08 L=165)   407    155        1 (1195/ 756-1255/ 865)  81.9 W06-W10 S18-S11
     19  475  763 (S05E38 L=119)   273     50        1 ( 460/ 730- 488/ 801)  63.4 E40-E36 S06-S02
     20  947  734 (S14E10 L=148)   239     72        2 ( 930/ 697- 975/ 773)  78.7 E10-E07 S16-S11
     21 1014  713 (S17E06 L=152)   419    110        0 ( 986/ 650-1043/ 758)  45.0 E09-E03 S19-S14
     22  604  700 (S10E31 L=126)   256     93        0 ( 580/ 656- 622/ 745)  51.3 E34-E29 S12-S07
     23  285  619 (S10E60 L= 98)  2672    214        7 ( 211/ 546- 356/ 710) -90.0 E71-E54 S14-S04
     24  165  670 (S05E74 L= 84)   791     98        3 ( 125/ 637- 199/ 707) -20.0 E81-E68 S07-S02
     25  821  616 (S19E20 L=138)   637    193        1 ( 743/ 575- 917/ 664)   0.0 E25-E13 S20-S17
     26 1365  594 (S31W14 L=172)   260     71        0 (1340/ 561-1386/ 634)  53.1 W12-W15 S32-S28
     27  964  540 (S26E13 L=145)   370    143        0 ( 892/ 523-1036/ 561)  -6.3 E17-E08 S27-S24
     28  627  226 (S42E58 L=100)  1129    149        0 ( 606/ 150- 649/ 293)  27.6 E74-E49 S48-S36
     29  998  197 (S53E27 L=131)   747     87        1 ( 952/ 172-1045/ 219) -20.6 E31-E21 S55-S50
  

    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