Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1512 1542 (N19W46 L=239)   343     91        1 (1468/1526-1562/1557) -33.7 W43-W49 N17-N21
      2 1612 1470 (N13W50 L=243)   756    143        0 (1551/1435-1667/1518)   4.8 W44-W56 N11-N13
      3  995 1375 (N25W08 L=201)   410    159        0 ( 930/1352-1072/1422) -49.4 W04-W11 N21-N28
      4 1397 1260 (N08W27 L=220)   875    157        4 (1352/1204-1461/1323)  60.3 W23-W31 N04-N11
      5 1884 1196 (S10W64 L=257)  1233    138        2 (1857/1142-1917/1262) -69.4 W61-W68 S13-S05
      6  684 1143 (N19E17 L=176)  1034    462        3 ( 556/1011- 863/1231)   9.5 E27-E03 N14-N21
      7  381 1080 (N23E39 L=153)   477    133        0 ( 344/1024- 415/1138) -69.4 E42-E37 N18-N26
      8 1537 1078 (S06W31 L=223)   377     98        1 (1492/1061-1591/1105) -45.0 W28-W34 S08-S03
      9 1612  759 (S26W29 L=222)  3620    713        5 (1419/ 490-1750/1033)  35.2 W10-W45 S38-S14
     10 1027  959 (N01E01 L=191)   746    170        2 ( 976/ 871-1068/1019)  82.9 E03-W00 S04-N04
     11 1247  926 (S06W10 L=202)   862    287        2 (1165/ 874-1337/1007) -48.8 W05-W15 S09-N00
     12 1258  949 (S05W11 L=204)   228     52        1 (1239/ 920-1280/ 978)  76.0 W09-W12 S07-S03
     13  168  836 (N13E66 L=127)  1260    226        4 ( 131/ 755- 220/ 947) -54.0 E69-E60 N08-N19
     14  118  837 (N14E75 L=118)  1627    109        1 (  89/ 789- 146/ 882) -40.6 E81-E69 N10-N16
     15  911  756 (S07E13 L=180)   350    102        1 ( 889/ 711- 939/ 809)  71.6 E13-E11 S10-S04
     16 1203  771 (S14W03 L=196)   576    139        1 (1165/ 716-1259/ 805)  15.9 W00-W07 S16-S11
     17 1277  750 (S17W07 L=200)   270     53        0 (1259/ 720-1293/ 783)  76.0 W05-W08 S18-S14
     18  453  657 (S02E44 L=148)  1470    221        2 ( 382/ 558- 514/ 744) -80.5 E46-E41 S09-N03
     19 1088  659 (S17E06 L=187)   295     92        2 (1068/ 629-1113/ 701)  45.0 E07-E04 S19-S14
     20  643  550 (S13E35 L=157)   370     48        1 ( 610/ 522- 670/ 573) -76.0 E36-E33 S14-S10
     21  896  536 (S20E21 L=172)   209     66        1 ( 865/ 516- 917/ 561) -56.3 E21-E19 S20-S17
     22  447  432 (S16E56 L=136)  2497    286        4 ( 356/ 346- 535/ 545)  15.7 E75-E43 S20-S10
     23  736  395 (S24E37 L=156)  2051    410        4 ( 575/ 317- 930/ 463)   0.0 E53-E21 S26-S22
  

    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