Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  525 1603 (N28E42 L=126)   455     92        1 ( 498/1570- 560/1644) -35.5 E44-E37 N25-N30
      2  646 1606 (N28E32 L=136)   388    127        0 ( 586/1577- 695/1626)   7.1 E36-E27 N26-N29
      3  299 1473 (N18E58 L=110)   523     77        1 ( 273/1445- 320/1514)  76.0 E59-E55 N16-N20
      4 1547 1437 (N25W32 L=200)   922    209        0 (1475/1361-1613/1501) -35.0 W26-W36 N21-N28
      5 1090 1352 (N15W01 L=169)   714    146        5 (1022/1281-1139/1398)  66.8 E02-W04 N10-N18
      6 1487 1357 (N19W27 L=195)   274     40        1 (1462/1335-1512/1379)  26.6 W24-W28 N17-N20
      7  876 1266 (N08E11 L=158)  1040    334        3 ( 746/1141- 955/1373) -40.6 E20-E05 N01-N13
      8 1923 1165 (N14W68 L=236)   652     77        1 (1896/1137-1949/1187) -18.4 W63-W73 N12-N15
      9  379 1130 (S03E42 L=126)   294     83        2 ( 344/1101- 419/1159) -18.4 E45-E39 S04-S01
     10  634  986 (S10E23 L=145)   790    242        2 ( 557/ 908- 732/1059)  42.3 E28-E17 S15-S05
     11  716  970 (S11E18 L=150)   193     67        0 ( 696/ 951- 749/ 998) -18.4 E19-E16 S11-S08
     12  208  957 (S13E58 L=110)   341     84        0 ( 173/ 924- 227/ 985) -45.0 E61-E55 S15-S11
     13  154  879 (S18E66 L=102)   929    116        2 ( 121/ 833- 179/ 918) -45.0 E70-E62 S20-S15
     14  945  813 (S18E03 L=165)  1771    775        3 ( 643/ 749-1244/ 889)  12.5 E22-W14 S23-S13
     15  621  831 (S19E24 L=144)   263    103        0 ( 591/ 791- 638/ 881)  63.4 E26-E22 S22-S16
     16 1779  712 (S15W57 L=226)   466    111        0 (1746/ 678-1804/ 759)  78.7 W54-W59 S17-S12
     17  609  658 (S30E26 L=143)   373     77        2 ( 590/ 616- 626/ 694)  80.5 E27-E24 S33-S27
     18  479  626 (S33E37 L=132)   389     80        0 ( 449/ 591- 512/ 658) -53.1 E38-E34 S35-S31
     19 1306  496 (S35W26 L=194)   278     76        0 (1265/ 481-1343/ 511)   9.5 W23-W29 S35-S33
     20 1271  399 (S42W27 L=195)   559    117        1 (1240/ 358-1322/ 453) -29.1 W23-W32 S44-S38
     21 1387  382 (S41W38 L=206)   313    109        0 (1331/ 368-1439/ 406)  20.6 W33-W41 S42-S38
  

    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