You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
26 lines
356 B
26 lines
356 B
// complex().
|
|
|
|
// General includes.
|
|
#include "cl_sysdep.h"
|
|
|
|
// Specification.
|
|
#include "cl_C.h"
|
|
|
|
|
|
// Implementation.
|
|
|
|
#include "cl_R.h"
|
|
|
|
namespace cln {
|
|
|
|
const cl_N complex (const cl_R& a, const cl_R& b)
|
|
{
|
|
// Methode:
|
|
// Falls b=0, nur a. sonst komplexe Zahl erzeugen.
|
|
if (eq(b,0))
|
|
return a;
|
|
else
|
|
return allocate_complex(a,b);
|
|
}
|
|
|
|
} // namespace cln
|