operator(*) Interface

public interface operator(*)

Contents

Module Procedures

tf_tf_mult poly_tf_mult tf_poly_mult tf_scalar_mult scalar_tf_mult

Module Procedures

private function tf_tf_mult(x, y) result(rst)

Multiplies two transfer functions.

Arguments

Type	Intent	Optional	Attributes		Name
class(transfer_function),	intent(in)			::	x	The left-hand-side argument.
class(transfer_function),	intent(in)			::	y	The right-hand-side argument.

Return Value type(transfer_function)

The resulting transfer function.

private function poly_tf_mult(x, y) result(rst)

Multiplies a polynomial and a transfer function to result in a new transfer function.

Arguments

Type	Intent	Optional	Attributes		Name
class(polynomial),	intent(in)			::	x	The left-hand-side argument.
class(transfer_function),	intent(in)			::	y	The right-hand-side argument.

Return Value type(transfer_function)

The resulting transfer function.

private function tf_poly_mult(x, y) result(rst)

Multiplies a transfer function and a polynomial to result in a new transfer function.

Arguments

Type	Intent	Optional	Attributes		Name
class(transfer_function),	intent(in)			::	x	The left-hand-side argument.
class(polynomial),	intent(in)			::	y	The right-hand-side argument.

Return Value type(transfer_function)

The resulting transfer function.

private function tf_scalar_mult(x, y) result(rst)

Multiplies a transfer function by a scalar value.

Arguments

Type	Intent	Optional	Attributes		Name
class(transfer_function),	intent(in)			::	x	The left-hand-side argument.
real(kind=real64),	intent(in)			::	y	The right-hand-side argument.

Return Value type(transfer_function)

The resulting transfer function.

private function scalar_tf_mult(x, y) result(rst)

Multiplies a transfer function by a scalar value.

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=real64),	intent(in)			::	x	The left-hand-side argument.
class(transfer_function),	intent(in)			::	y	The right-hand-side argument.

Return Value type(transfer_function)

The resulting transfer function.