Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1280 1591 (N32W20 L=119)  1359    332        2 (1145/1508-1422/1676) -35.2 W11-W29 N26-N39
      2  732 1612 (N36E20 L= 79)   412    104        0 ( 708/1571- 751/1670)  90.0 E21-E18 N32-N40
      3  432 1534 (N32E44 L= 55)   382     57        1 ( 398/1510- 455/1553) -23.2 E48-E41 N29-N33
      4 1462 1500 (N26W32 L=131)   299     63        1 (1432/1471-1493/1519)  31.0 W29-W34 N23-N27
      5 1567 1481 (N24W40 L=139)   550    106        0 (1511/1463-1626/1497)  -6.3 W35-W44 N23-N25
      6 1062 1460 (N24W04 L=102)   375    114        2 (1011/1435-1115/1477)  15.9 W00-W07 N22-N24
      7 1287 1344 (N16W17 L=116)   267     78        0 (1274/1297-1300/1387) -90.0 W16-W18 N12-N18
      8 1656 1309 (N13W43 L=142)   392     87        3 (1626/1269-1680/1340) -68.2 W41-W45 N10-N15
      9 1850 1289 (N12W63 L=161)   775     51        3 (1824/1256-1878/1320) -21.8 W59-W66 N10-N14
     10 1173 1228 (N09W09 L=108)   219     25        1 (1151/1205-1191/1250) -90.0 W08-W10 N07-N10
     11  189  768 (S14E65 L= 34)  5302    593        4 ( 113/ 505- 260/1042)  79.4 E78-E59 S30-N02
     12  719  948 (S06E19 L= 80)   426    125        2 ( 669/ 901- 760/ 990)  33.7 E22-E16 S09-S03
     13 1872  851 (S14W64 L=162)  8375      0       17 (1753/ 726-1953/ 987)  35.5 W52-W81 S21-S05
     14  788  915 (S09E15 L= 84)   392     82        1 ( 765/ 872- 807/ 962) -90.0 E15-E13 S11-S05
     15  296  824 (S12E51 L= 48)  1370    182        5 ( 247/ 745- 354/ 879)  48.8 E56-E45 S16-S08
     16  773  833 (S13E16 L= 83)   192     66        1 ( 739/ 819- 805/ 855)   0.0 E18-E14 S14-S12
     17  508  685 (S21E36 L= 63)  1657    429        2 ( 352/ 630- 618/ 823)  12.8 E49-E27 S24-S13
     18 1276  723 (S22W15 L=114)   257    143        0 (1220/ 693-1342/ 754)  14.0 W11-W19 S23-S19
     19 1545  608 (S29W37 L=135)   294     68        1 (1527/ 581-1568/ 648) -45.0 W34-W39 S31-S26
     20  909  431 (S40E11 L= 88)  2632    753        4 ( 642/ 279-1235/ 568)  18.1 E42-W13 S51-S31
     21 1252  216 (S61W24 L=122)   563     49        1 (1226/ 192-1275/ 249) -40.6 W19-W28 S63-S57
     22 1189  206 (S62W16 L=115)   747     48        1 (1153/ 183-1226/ 233) -15.3 W11-W22 S64-S58
  

    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