Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1199 1632 (N44W14 L=128)  1280    265        4 (1139/1543-1232/1716)  70.3 W09-W18 N37-N51
      2 1529 1611 (N42W43 L=157)  1284    184        3 (1481/1539-1572/1662)  78.7 W39-W47 N36-N46
      3  452 1530 (N34E47 L= 67)   637    143        2 ( 432/1483- 487/1571) -50.2 E49-E43 N31-N37
      4  721 1450 (N30E22 L= 91)   432    138        1 ( 701/1390- 740/1518) -77.5 E23-E20 N25-N34
      5 1708 1470 (N31W54 L=168)   667     92        1 (1668/1431-1735/1508) -59.0 W51-W56 N28-N33
      6 1627 1419 (N28W45 L=158)   821    218        2 (1558/1360-1706/1472) -35.0 W40-W51 N23-N31
      7 1341 1308 (N21W21 L=134)   464    111        1 (1289/1269-1403/1344) -32.0 W17-W25 N18-N23
      8 1813 1225 (N15W59 L=173)   444     75        1 (1790/1200-1837/1254) -36.9 W56-W62 N13-N16
      9  843 1187 (N13E12 L=102)   316    120        1 ( 821/1137- 869/1252) -60.3 E13-E09 N10-N17
     10 1353 1221 (N16W21 L=135)   432    155        1 (1278/1191-1409/1248)  -6.3 W16-W25 N13-N17
     11  622 1183 (N12E26 L= 87)   309    120        0 ( 600/1126- 665/1238)  69.4 E27-E23 N08-N16
     12 1228 1154 (N11W13 L=126)   289     61        0 (1205/1128-1256/1187) -45.0 W11-W14 N09-N13
     13 1360 1086 (N07W21 L=134)   323    171        0 (1287/1073-1448/1107) -10.3 W16-W27 N06-N08
     14  310 1031 (N02E50 L= 63)   528    152        0 ( 260/ 987- 342/1095)  35.5 E54-E47 N00-N05
     15 1643  875 (S06W42 L=155)   306     85        0 (1630/ 842-1659/ 935) -80.5 W40-W43 S08-S02
     16  552  837 (S09E31 L= 83)   276    114        1 ( 508/ 811- 610/ 869) -23.2 E33-E26 S10-S07
     17  237  740 (S17E60 L= 54)   850    158        1 ( 223/ 667- 252/ 806) -90.0 E61-E57 S21-S12
     18  497  649 (S22E37 L= 77)   419     78        0 ( 453/ 624- 538/ 682) -26.6 E39-E33 S23-S19
     19 1357  623 (S22W23 L=136)   246     55        3 (1339/ 595-1382/ 646) -71.6 W21-W24 S23-S20
     20  332  616 (S25E52 L= 61)   810    236        3 ( 273/ 592- 395/ 645)  13.0 E58-E45 S26-S22
     21  807  378 (S41E17 L= 96)  1601    274        5 ( 715/ 323- 914/ 454)  30.1 E26-E07 S46-S34
     22 1661  412 (S39W56 L=170)   612    104        2 (1638/ 394-1682/ 439) -26.6 W53-W59 S40-S36
     23  664  395 (S40E29 L= 84)   412     68        2 ( 641/ 367- 681/ 425)  78.7 E31-E26 S42-S37
     24 1529  368 (S42W45 L=158)  1237    188        1 (1455/ 339-1597/ 416)   8.7 W38-W51 S44-S37
  

    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