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

# · MATLAB · 33 lines · 23 code · 10 blank · 0 comment · 0 complexity · 216b47ea08cbad9827bc9109a2225876 MD5 · raw file

  1. template_typedef_cplx4
  2. #
  3. # this is OK
  4. #
  5. s = Sin();
  6. s.get_base_value();
  7. s.get_value();
  8. s.get_arith_value();
  9. my_func_r(s);
  10. make_Multiplies_double_double_double_double(s,s);
  11. z = CSin();
  12. z.get_base_value();
  13. z.get_value();
  14. z.get_arith_value();
  15. my_func_c(z);
  16. make_Multiplies_complex_complex_complex_complex(z,z);
  17. #
  18. # Here we fail
  19. #
  20. d = make_Identity_double();
  21. my_func_r(d);
  22. c = make_Identity_complex();
  23. my_func_c(c);