Examples/test-suite/octave/li_std_pair_extra_runme.m

   1 li_std_pair_extra
   2
   3 p = {1,2};
   4 p1 = li_std_pair_extra.p_inout(p);
   5 assert(all(cell2mat(p1)==[2,1]));
   6 p2 = li_std_pair_extra.p_inoutd(p1);
   7 assert(all(cell2mat(p2)==[1,2]));
   8
   9 d1 = li_std_pair_extra.d_inout(2);
  10 assert(d1==4);
  11
  12 [i,d2] = li_std_pair_extra.d_inout2(2);
  13 assert(all([i,d2]==[1,4]));
  14
  15 [i,p] = li_std_pair_extra.p_inout2(p);
  16 assert(i==1&&all([cell2mat(p)]==[2,1]));
  17 [p3,p4] = li_std_pair_extra.p_inout3(p1,p1);
  18 assert(all(cell2mat(p3)==[2,1]));
  19 assert(all(cell2mat(p4)==[2,1]));
  20
  21 psi = li_std_pair_extra.SIPair("hello",1);
  22 assert(psi=={"hello",1});
  23 pci = li_std_pair_extra.CIPair(complex(1,2),1);
  24 assert(pci.first==complex(1,2)&&pci.second==1);
  25
  26
  27 psi = li_std_pair_extra.SIPair("hi",1);
  28 assert(psi.first=="hi"&&psi.second==1);
  29
  30 psii = li_std_pair_extra.SIIPair(psi,1);
  31 assert(psii.first.first=="hi");
  32 assert(psii.first.second==1);
  33 assert(psii.second==1);
  34
  35 a = li_std_pair_extra.A();
  36 b = li_std_pair_extra.B();
  37
  38 pab = li_std_pair_extra.ABPair(a,b);
  39
  40 pab.first = a;
  41 pab.first.val = 2;
  42
  43 assert(pab.first.val == 2);
  44
  45 pci = li_std_pair_extra.CIntPair(1,0);
  46 assert(pci.first==1&&pci.second==0);
  47
  48 a = li_std_pair_extra.A(5);
  49 p1 = li_std_pair_extra.pairP1(1,a);
  50 p2 = li_std_pair_extra.pairP2(a,1);
  51 p3 = li_std_pair_extra.pairP3(a,a);
  52
  53 assert(a.val == li_std_pair_extra.p_identa(p1){2}.val);
  54
  55 p = li_std_pair_extra.IntPair(1,10);
  56 assert(p.first==1&&p.second==10);
  57 p.first = 1;
  58 assert(p.first==1);
  59
  60 p = li_std_pair_extra.paircA1(1,a);
  61 assert(p.first==1);
  62 assert(swig_this(p.second)==swig_this(a));
  63
  64 p = li_std_pair_extra.paircA2(1,a);
  65 assert(p.first==1);
  66 assert(swig_this(p.second)==swig_this(a));
  67 #pp = li_std_pair_extra.pairiiA(1,p); # conversion pb re const of pairA1/A2
  68 pp = li_std_pair_extra.pairiiA(1,{1,A()});
  69