/************************************************************/
/*                          qcount                          */
/************************************************************/

/* :SUMMARY: query with COUNT
:PRIORITY: 3
:STATUS: ok
:FEATURE: 
:HISTORY: 
:MODEL: 
:DATA: 
M mt2
T "1995" T 10
T "1995" T 20
T "1996" T 11
T "1996" T 21
N nt2
N nt3

... (all others have fewer ?N pointers)
:RESULT: 
should find one M-object "mt2"
works in: ace950522a4n, ace950716
:SCRIPT: */
qcount: dbinit wspec.mini  // count command in queries
  tace
    parse: do parse $data/mini.tab.ace   
    q: do Query >?M COUNT N > 1    
       count
  exit