test_05.stable.out

一个内存数据库的源代码这是服务器端还有客户端

#	io.print("b.select(4.5,15.6).print();"); 	# 84  (_109:str)
    rb_a := algebra.select(b,4.5,15.6000004);	# 85 ALGselect (rb_a:bat[:flt,:flt])<-(b:bat[:flt,:flt])(_75:flt)(_90:flt)
    sb_a := io.print(rb_a);	# 86 IOprint_val (sb_a:void)<-(rb_a:bat[:flt,:flt])
#	io.print("b.select(4.5,4.5).print();"); 	# 87  (_112:str)
    tb_a := algebra.select(b,4.5,4.5);	# 88 ALGselect (tb_a:bat[:flt,:flt])<-(b:bat[:flt,:flt])(_114:flt)(_114:flt)
    ub_a := io.print(tb_a);	# 89 IOprint_val (ub_a:void)<-(tb_a:bat[:flt,:flt])
#	io.print("# This should cause an error\n"); 	# 90  (_82:str)
    vb_a := algebra.select(b,4.5,3.4000001);	# 91 ALGselect (vb_a:bat[:flt,:flt])<-(b:bat[:flt,:flt])(_114:flt)(_117:flt)
    wb_a := io.print(vb_a);	# 92 IOprint_val (wb_a:void)<-(vb_a:bat[:flt,:flt])
#	io.print("b.select(81.2,flt(nil)).print();"); 	# 93  (_119:str)
    xb_a := calc.flt(nil:void);	# 94 CALCnil2flt (xb_a:flt)<-(_121:void)
    yb_a := algebra.select(b,81.1999969,xb_a);	# 95 ALGselect (yb_a:bat[:flt,:flt])<-(b:bat[:flt,:flt])(_123:flt)(xb_a:flt)
    ac_a := io.print(yb_a);	# 96 IOprint_val (ac_a:void)<-(yb_a:bat[:flt,:flt])
#	io.print("b.select(flt(nil),flt(nil)).print();"); 	# 97  (_125:str)
    bc_a := calc.flt(nil:void);	# 98 CALCnil2flt (bc_a:flt)<-(_121:void)
    cc_a := calc.flt(nil:void);	# 99 CALCnil2flt (cc_a:flt)<-(_121:void)
    dc_a := algebra.select(b,bc_a,cc_a);	# 100 ALGselect (dc_a:bat[:flt,:flt])<-(b:bat[:flt,:flt])(bc_a:flt)(cc_a:flt)
    ec_a := io.print(dc_a);	# 101 IOprint_val (ec_a:void)<-(dc_a:bat[:flt,:flt])
#	io.print("# A 2-dimensional cut\n"); 	# 102  (_130:str)
    bn := algebra.fragment(b,1.20000005,5.5999999,4.5,15.6000004);	# 103 ALGfragment (bn:bat[:flt,:flt])<-(b:bat[:flt,:flt])(_132:flt)(_133:flt)(_114:flt)(_134:flt)
    fc_a := io.print(bn);	# 104 IOprint_val (fc_a:void)<-(bn:bat[:flt,:flt])
#	io.print("b.fragment(1.2,5.6,16.2,flt(nil)).print();"); 	# 105  (_136:str)
    gc_a := calc.flt(nil:void);	# 106 CALCnil2flt (gc_a:flt)<-(_121:void)
    hc_a := algebra.fragment(b,1.20000005,5.5999999,16.2000008,gc_a);	# 107 ALGfragment (hc_a:bat[:flt,:flt])<-(b:bat[:flt,:flt])(_132:flt)(_133:flt)(_139:flt)(gc_a:flt)
    ic_a := io.print(hc_a);	# 108 IOprint_val (ic_a:void)<-(hc_a:bat[:flt,:flt])
#	io.print("b.fragment(1.2,flt(nil),16.2,flt(nil)).print();"); 	# 109  (_141:str)
    jc_a := calc.flt(nil:void);	# 110 CALCnil2flt (jc_a:flt)<-(_121:void)
    kc_a := calc.flt(nil:void);	# 111 CALCnil2flt (kc_a:flt)<-(_121:void)
    lc_a := algebra.fragment(b,1.20000005,jc_a,16.2000008,kc_a);	# 112 ALGfragment (lc_a:bat[:flt,:flt])<-(b:bat[:flt,:flt])(_132:flt)(jc_a:flt)(_139:flt)(kc_a:flt)
    mc_a := io.print(lc_a);	# 113 IOprint_val (mc_a:void)<-(lc_a:bat[:flt,:flt])
#	io.print("b.fragment(flt(nil),flt(nil),16.2,flt(nil)).print();"); 	# 114  (_146:str)
    nc_a := calc.flt(nil:void);	# 115 CALCnil2flt (nc_a:flt)<-(_121:void)
    oc_a := calc.flt(nil:void);	# 116 CALCnil2flt (oc_a:flt)<-(_121:void)
    pc_a := calc.flt(nil:void);	# 117 CALCnil2flt (pc_a:flt)<-(_121:void)
    qc_a := algebra.fragment(b,nc_a,oc_a,16.2000008,pc_a);	# 118 ALGfragment (qc_a:bat[:flt,:flt])<-(b:bat[:flt,:flt])(nc_a:flt)(oc_a:flt)(_139:flt)(pc_a:flt)
    rc_a := io.print(qc_a);	# 119 IOprint_val (rc_a:void)<-(qc_a:bat[:flt,:flt])
#	io.print("var b1:= b.join(bn.reverse());"); 	# 120  (_152:str)
    sc_a := bat.reverse(bn);	# 121 BKCreverse (sc_a:bat[:flt,:flt])<-(bn:bat[:flt,:flt])
    b1 := algebra.join(b,sc_a);	# 122 ALGjoin (b1:bat[:flt,:flt])<-(b:bat[:flt,:flt])(sc_a:bat[:flt,:flt])
#	io.print("b1.print();"); 	# 123  (_155:str)
    tc_a := io.print(b1);	# 124 IOprint_val (tc_a:void)<-(b1:bat[:flt,:flt])
#	io.print("var b2:= b.semijoin(b1);"); 	# 125  (_157:str)
    b2 := algebra.semijoin(b,b1);	# 126 ALGsemijoin (b2:bat[:flt,:flt])<-(b:bat[:flt,:flt])(b1:bat[:flt,:flt])
#	io.print("b2.print();"); 	# 127  (_159:str)
    uc_a := io.print(b2);	# 128 IOprint_val (uc_a:void)<-(b2:bat[:flt,:flt])
#	io.print("# band join experiment\n"); 	# 129  (_161:str)
    c := algebra.copy(b);	# 130 ALGcopy (c:bat[:flt,:flt])<-(b:bat[:flt,:flt])
#	io.print("bandjoin(b,c,4.5,4.5).print();"); 	# 131  (_163:str)
    vc_a := algebra.bandjoin(b,c,4.5,4.5);	# 132 ALGbandjoin (vc_a:bat[:flt,:flt])<-(b:bat[:flt,:flt])(c:bat[:flt,:flt])(_165:flt)(_165:flt)
    wc_a := io.print(vc_a);	# 133 IOprint_val (wc_a:void)<-(vc_a:bat[:flt,:flt])
#	io.print("quit();"); 	# 134  (_167:str)
    xc_a := clients.quit();	# 135 CLTquitDefault (xc_a:void)
end main;	# 136  
[ 3.14700007 ]
#var b:= bbp.new(flt,flt);
#b.insert(1.2, 15.6);
#b.insert(2.3, 4.5);
#b.insert(3.0, calc.flt(nil));
#b.insert(4.5, 16.7);
#b.insert(5.6, 25.6);
#b.insert(6.6, 36.7);
#b.insert(7.8, 49.0);
#b.insert(8.9, 64.5);
#b.insert(9.0, calc.flt(nil));
#b.insert(flt(nil),flt(nil));
#b.insert(flt(nil),81.2);
#b.print();
#---------------------------------#
# h		t		  # name
# flt		flt		  # type
#---------------------------------#
[ 1.20000005,	  15.6000004	  ]
[ 2.29999995,	  4.5		  ]
[ 3,		  nil		  ]
[ 4.5,		  16.7000008	  ]
[ 5.5999999,	  25.6000004	  ]
[ 6.5999999,	  36.7000008	  ]
[ 7.80000019,	  49		  ]
[ 8.89999962,	  64.5		  ]
[ 9,		  nil		  ]
[ nil,		  nil		  ]
[ nil,		  81.1999969	  ]
## Testing simple retrievals\n
[ 15.6000004 ]
#b.find(4.5).print();
[ 16.7000008 ]
#b.find(flt(nil)).print();
[ 81.1999969 ]
## This should cause an error\n
## Can we delete them and re-insert them later on\n
#b.delete(1.2, 15.6);
#b.delete(flt(nil),81.2);
#b.print();
#---------------------------------#
# h		t		  # name
# flt		flt		  # type
#---------------------------------#
[ nil,		  nil		  ]
[ 2.29999995,	  4.5		  ]
[ 3,		  nil		  ]
[ 9,		  nil		  ]
[ 5.5999999,	  25.6000004	  ]
[ 6.5999999,	  36.7000008	  ]
[ 7.80000019,	  49		  ]
[ 8.89999962,	  64.5		  ]
#b.insert(4.5, 16.7);
#b.insert(1.2, 15.6);
#b.insert(flt(nil),81.2);
#b.count().print();
[ 11 ]
## Lets cut out a few sections\n
#---------------------------------#
# h		t		  # name
# flt		flt		  # type
#---------------------------------#
[ 5.5999999,	  25.6000004	  ]
[ 6.5999999,	  36.7000008	  ]
[ 7.80000019,	  49		  ]
[ 8.89999962,	  64.5		  ]
#b.select(4.5,15.6).print();
#---------------------------------#
# h		t		  # name
# flt		flt		  # type
#---------------------------------#
[ 2.29999995,	  4.5		  ]
[ 1.20000005,	  15.6000004	  ]
#b.select(4.5,4.5).print();
#-------------------------#
# h		t	  # name
# flt		flt	  # type
#-------------------------#
[ 2.29999995,	  4.5	  ]
## This should cause an error\n
#-----------------#
# h	t	  # name
# flt	flt	  # type
#-----------------#
#b.select(81.2,flt(nil)).print();
#-------------------------#
# h	t		  # name
# flt	flt		  # type
#-------------------------#
[ nil,	  81.1999969	  ]
#b.select(flt(nil),flt(nil)).print();
#---------------------------------#
# h		t		  # name
# flt		flt		  # type
#---------------------------------#
[ 2.29999995,	  4.5		  ]
[ 5.5999999,	  25.6000004	  ]
[ 6.5999999,	  36.7000008	  ]
[ 7.80000019,	  49		  ]
[ 8.89999962,	  64.5		  ]
[ 4.5,		  16.7000008	  ]
[ 1.20000005,	  15.6000004	  ]
[ nil,		  81.1999969	  ]
## A 2-dimensional cut\n
#---------------------------------#
# h		t		  # name
# flt		flt		  # type
#---------------------------------#
[ 2.29999995,	  4.5		  ]
[ 1.20000005,	  15.6000004	  ]
#b.fragment(1.2,5.6,16.2,flt(nil)).print();
#---------------------------------#
# h		t		  # name
# flt		flt		  # type
#---------------------------------#
[ 5.5999999,	  25.6000004	  ]
[ 4.5,		  16.7000008	  ]
#b.fragment(1.2,flt(nil),16.2,flt(nil)).print();
#---------------------------------#
# h		t		  # name
# flt		flt		  # type
#---------------------------------#
[ 5.5999999,	  25.6000004	  ]
[ 6.5999999,	  36.7000008	  ]
[ 7.80000019,	  49		  ]
[ 8.89999962,	  64.5		  ]
[ 4.5,		  16.7000008	  ]
#b.fragment(flt(nil),flt(nil),16.2,flt(nil)).print();
#---------------------------------#
# h		t		  # name
# flt		flt		  # type
#---------------------------------#
[ 5.5999999,	  25.6000004	  ]
[ 6.5999999,	  36.7000008	  ]
[ 7.80000019,	  49		  ]
[ 8.89999962,	  64.5		  ]
[ 4.5,		  16.7000008	  ]
[ nil,		  81.1999969	  ]
#var b1:= b.join(bn.reverse());
#b1.print();
#---------------------------------#
# h		t		  # name
# flt		flt		  # type
#---------------------------------#
[ 2.29999995,	  2.29999995	  ]
[ 1.20000005,	  1.20000005	  ]
#var b2:= b.semijoin(b1);
#b2.print();
#---------------------------------#
# h		t		  # name
# flt		flt		  # type
#---------------------------------#
[ 2.29999995,	  4.5		  ]
[ 1.20000005,	  15.6000004	  ]
## band join experiment\n
#bandjoin(b,c,4.5,4.5).print();
#---------------------------------#
# h		t		  # name
# flt		flt		  # type
#---------------------------------#
[ nil,		  nil		  ]
[ nil,		  81.1999969	  ]
[ 2.29999995,	  4.5		  ]
[ 2.29999995,	  nil		  ]
[ 2.29999995,	  nil		  ]
[ 2.29999995,	  25.6000004	  ]
[ 2.29999995,	  36.7000008	  ]
[ 2.29999995,	  49		  ]
[ 2.29999995,	  64.5		  ]
[ 2.29999995,	  16.7000008	  ]
[ 2.29999995,	  15.6000004	  ]
[ 3,		  nil		  ]
[ 3,		  81.1999969	  ]
[ 9,		  nil		  ]
[ 9,		  81.1999969	  ]
#quit();

# 00:12:27 >  
# 00:12:27 >  Done.
# 00:12:27 >