/trunk/Examples/test-suite/octave/li_std_pair_extra_runme.m

# · MATLAB · 69 lines · 50 code · 19 blank · 0 comment · 0 complexity · d4781677b4a7c12e6c3e4db060178f36 MD5 · raw file

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