Домой Классы Статические функции Перечисления (ENUM) Структуры (STRUCTURE)

{Complex|_numbers}



CLASS {Complex|_numbers}
,
OPERATORS, TESTED(99):



 Класс для работы с комплексными числами в форме, максимально близкой к их
 естественной математической записи (а именно, переменные типа {complex} могут
 учавствовать в выражениях, комбинируясь математическими знаками +, -, *, /).
 Но функции, в которых используются такие операторы над комплексными числами,
 должны быть помечены модификаитором OPERATORS({Complex}).





IMPORT : 
{Mathematics}
 .











STRUCTURE 
{complex|_number}

      REAL Re|al_part

      REAL Im|aginable
 .






 Тип экземпляра комплексного числа.










FUNCTION 
To_complex|_from_REAL_or_INT

(

     REAL 
X|_parameter
)
 ==> {complex} 






 Преобразут целое или вещественное числов комплексное.










FUNCTION 
Complex|_from_Re_Im

(

     REAL 
Re|al_part
, 

     REAL 
Im|agine_part
)
 ==> {complex} 






 Создает комплексное число на основе вещественной и мнимой частей,
 представленных вещественными компонентами.










FUNCTION 
Complement|_to_complex

(

     {complex} 
X|_original_value
)
 ==> {complex} 






 Дополнение (сопряженное значение) для комплексного числа: Re' = Re, Im' = -Im










FUNCTION 
Cmod|ule_of_complex_number

(

     {complex} 
X|_argument
)
 ==> REAL 






 Модуль комплексного числа (корень квадратный суммы квадратов компонентов).










FUNCTION 
Carg|ument_of_complex

(

     {complex} 
X|_parameter
)
 ==> REAL 






 Аргумент комплексного числа (в радианах).










FUNCTION 
I|_imagine_one

 ==> {complex} 






 Мнимая единица (математическое i). можно записать 5 + 3 * I (или 5+3*I),
 чтобы представить значение 5+3i, напримерю










FUNCTION 
C_from_mod_arg

(

     REAL 
R|_module
, 

     REAL 
Arg|ument
)
 ==> {complex} 






 Создает сомплексное число из его модуля и аргумента.










FUNCTION 
Csame|_complex_number

(

     {complex} 
A|_argument
, 

     {complex} 
B|_argument
)
 ==> BOOL 






 Сравнение двух комплексных числел на равенствою Возвращает TRUE, если
 сравниваемые числа имеют очень близкие значения.






----------------------------------------------------------------------- '+'






OPERATOR {complex} + {complex}
 ==> {complex} 






 Сложение комплексных чисел.







OPERATOR {complex} + REAL
 ==> {complex} 
 , OPERATORS






 Сложение комплексного и вещественного (или целого, т.к. целое может быть
 неявано преобразовано в вещественное).







OPERATOR REAL + {complex}
 ==> {complex} 
 , OPERATORS






 Сложение вещественного и комплексного.






----------------------------------------------------------------------- '-'






OPERATOR - {complex}
 ==> {complex} 






 Смена знака.







OPERATOR {complex} - {complex}
 ==> {complex} 
 , OPERATORS






 Вычистание комплексного числа B из комплексного числа A.







OPERATOR {complex} - REAL
 ==> {complex} 
 , OPERATORS






 Вычистание вещественного из комплексного.







OPERATOR REAL - {complex}
 ==> {complex} 
 , OPERATORS






 Вычистание комплексного из вещественного.






----------------------------------------------------------------------- '*'






OPERATOR {complex} * {complex}
 ==> {complex} 






 Умножение двух комплексных чисел.







OPERATOR {complex} * REAL
 ==> {complex} 
 , OPERATORS






 Умножение комплексного и вещественного.







OPERATOR REAL * {complex}
 ==> {complex} 
 , OPERATORS






 Умножение вещественного и комплексного чисел.










FUNCTION 
Cmul_i|_multimply_by_i

(

     {complex} 
X|_parameter
)
 ==> {complex} 






 Умножение комплексного числа на мнимую единицу.






----------------------------------------------------------------------- '/'






OPERATOR {complex} / REAL
 ==> {complex} 
 , OPERATORS






 Деление комплексного числа на вещественный делитель.







OPERATOR {complex} / {complex}
 ==> {complex} 
 , OPERATORS






 Деление двух комплексных чисел.







OPERATOR REAL / {complex}
 ==> {complex} 
 , OPERATORS






 Деление вещественного числа на комплексный делитель.






------------------------------------------------------------ 'exponent, ln'









FUNCTION 
Cexp|onent

(
{complex} 
X|_base_of_exponent
)
 ==> {complex} 






 Экспонента от комплексного.










FUNCTION 
Cln|atural_logarithm

(
{complex} 
X|_parameter
)
 ==> {complex} 






 Натуральный логарифм от комплексного аргумента.






------------------------------------------------------------- 'power, sqrt'









FUNCTION 
Cpow|er|_complex_by_real

(

     {complex} 
X|_base_to_power
, 

     INT,REAL,{complex} 
E|xponent
)
 ==> {complex} 
 , OPERATORS






 Возведение комплексного числа в вещественную или комплексную степень.










FUNCTION 
Csqrt|_square_root_of_complex

(

     {complex} 
X|_root_value
)
 ==> {complex} 






 Квадратный кореь из комплексного числа.






------------------------------------------------------------ 'trigonometry'









FUNCTION 
Ccos|inus_trigonometric

(

     {complex} 
X|_radians
)
 ==> {complex} 
 , OPERATORS






 Тригонометрический косинус из комплексного числа.










FUNCTION 
Csin|us_trigonometric

(

     {complex} 
X|_radians
)
 ==> {complex} 
 , OPERATORS






 Тригонометрический синус из комплексного числа.










FUNCTION 
Ccosh|iperbolic

(

     {complex} 
X|_parameter
)
 ==> {complex} 
 , OPERATORS






 Гиперболический косинус из комплексного числа.










FUNCTION 
Csinh|iperbolic

(

     {complex} 
X|_parameter
)
 ==> {complex} 
 , OPERATORS






 Гиперболический синус из комплексного числа.










FUNCTION 
Carcsin|us_trigonometric

(

     {complex} 
X|_parameter
)
 ==> {complex} 
 , OPERATORS






 Тригонометрический арксинус из комплексного числа.










FUNCTION 
Carccos|inus_trigonometric

(

     {complex} 
X|_parameter
)
 ==> {complex} 
 , OPERATORS






 Тригонометрический арккосинус из комплексного числа.










FUNCTION 
Carctan|gens_trigonometetric

(

     {complex} 
X|_parameter
)
 ==> {complex} 
 , OPERATORS






 Тригонометрический арктангенс из комплексного числа.










FUNCTION 
Carccotan|gens_trigonometetric

(

     {complex} 
X|_parameter
)
 ==> {complex} 
 , OPERATORS






 Тригонометрический арккотангенс из комплексного числа.










FUNCTION 
Carcsinh

(

     {complex} 
X|_parameter
)
 ==> {complex} 
 , OPERATORS






 Гипербический арксинус из комплексного числа.










FUNCTION 
Carccosh

(

     {complex} 
X|_parameter
)
 ==> {complex} 
 , OPERATORS






 Гипербический арккосинус из комплексного числа.










FUNCTION 
Carcth|iperbolic

(

     {complex} 
X|_parameter
)
 ==> {complex} 
 , OPERATORS






 Гипербический арктангенс из комплексного числа.






------------------------------------------------------------------ 'to STR'









FUNCTION 
Cstr|ing_from_complex_number

(

     {complex} 
X|_complex_number
)
 ==> STR 






 Преобразование комплексного строку, например "5+3.1415926535799i".










FUN 
S_complex

(
{complex} 
X|_parameter
)
 ==> STR 






 Аналогично предыдущему.





END