Choral
Data Types | Functions/Subroutines
r1d_mod Module Reference

OPENMP OPERATIONS ON 1-DIMENSIONAL REAL ARRAYS More...

Data Types

interface  axpby
 z = a*x + b*y More...
 
interface  axpy
 x = a*x + y More...
 
interface  copy
 y = x More...
 
interface  mult
 z = x*y More...
 
interface  norm_2
 L2 vector norm. More...
 
interface  reorder
 array entry permutation More...
 
interface  scale
 x = a*x // OR // y = a*x More...
 
interface  scalprod
 scalar product More...
 
interface  xpay
 x = x + b*y // OR // z = x + b*y More...
 

Functions/Subroutines

subroutine r1d_axpy (a, x, y)
 x(:) := a*x(:) + y(:) More...
 
subroutine xpay_1 (x, a, y)
 x(:) := x(:) + a*y(:) More...
 
subroutine xpay_2 (z, x, a, y)
 z(:) := x(:) + a*y(:) More...
 
subroutine axpby_1 (a, x, b, y)
 x(:) := a*x(:) + b*y(:) More...
 
subroutine axpby_2 (z, a, x, b, y)
 z(:) := a*x(:) + b*y(:) More...
 
subroutine ax_1 (x, a)
 x(:) := a*x(:) More...
 
subroutine ax_2 (y, a, x)
 y(:) := a*x(:) More...
 
subroutine r1d_copy (y, x)
 y(:) := x(:) More...
 
real(rp) function r1d_scalprod (x, y)
 scalar product More...
 
real(rp) function r1d_norm_2 (x)
 Euclidian norm. More...
 
subroutine r1d_reorder (y, sigma, x)
 y(ii) := x(sigma(ii)) More...
 
subroutine xy_2 (z, x, y)
 z(:) := x(:)*y(:) More...
 

Detailed Description

OPENMP OPERATIONS ON 1-DIMENSIONAL REAL ARRAYS

Author
Charles Pierre

Function/Subroutine Documentation

◆ ax_1()

subroutine r1d_mod::ax_1 ( real(rp), dimension(:), intent(inout)  x,
real(rp), intent(in)  a 
)
private

x(:) := a*x(:)

Definition at line 249 of file R1d_mod.F90.

◆ ax_2()

subroutine r1d_mod::ax_2 ( real(rp), dimension(:), intent(out)  y,
real(rp), intent(in)  a,
real(rp), dimension(:), intent(in)  x 
)
private

y(:) := a*x(:)

Definition at line 269 of file R1d_mod.F90.

Here is the call graph for this function:

◆ axpby_1()

subroutine r1d_mod::axpby_1 ( real(rp), intent(in)  a,
real(rp), dimension(:), intent(inout)  x,
real(rp), intent(in)  b,
real(rp), dimension(:), intent(in)  y 
)
private

x(:) := a*x(:) + b*y(:)

Definition at line 197 of file R1d_mod.F90.

Here is the call graph for this function:

◆ axpby_2()

subroutine r1d_mod::axpby_2 ( real(rp), dimension(:), intent(out)  z,
real(rp), intent(in)  a,
real(rp), dimension(:), intent(in)  x,
real(rp), intent(in)  b,
real(rp), dimension(:), intent(in)  y 
)
private

z(:) := a*x(:) + b*y(:)

Definition at line 222 of file R1d_mod.F90.

Here is the call graph for this function:

◆ r1d_axpy()

subroutine r1d_mod::r1d_axpy ( real(rp), intent(in)  a,
real(rp), dimension(:), intent(inout)  x,
real(rp), dimension(:), intent(in)  y 
)
private

x(:) := a*x(:) + y(:)

Definition at line 96 of file R1d_mod.F90.

Here is the call graph for this function:

◆ r1d_copy()

subroutine r1d_mod::r1d_copy ( real(rp), dimension(:), intent(out)  y,
real(rp), dimension(:), intent(in)  x 
)
private

y(:) := x(:)

Definition at line 295 of file R1d_mod.F90.

Here is the call graph for this function:

◆ r1d_norm_2()

real(rp) function r1d_mod::r1d_norm_2 ( real(rp), dimension(:), intent(in)  x)
private

Euclidian norm.

Definition at line 343 of file R1d_mod.F90.

◆ r1d_reorder()

subroutine r1d_mod::r1d_reorder ( real(rp), dimension(:), intent(out)  y,
integer, dimension(:), intent(in)  sigma,
real(rp), dimension(:), intent(in)  x 
)
private

y(ii) := x(sigma(ii))

Definition at line 355 of file R1d_mod.F90.

Here is the call graph for this function:

◆ r1d_scalprod()

real(rp) function r1d_mod::r1d_scalprod ( real(rp), dimension(:), intent(in)  x,
real(rp), dimension(:), intent(in)  y 
)
private

scalar product

Definition at line 319 of file R1d_mod.F90.

Here is the call graph for this function:

◆ xpay_1()

subroutine r1d_mod::xpay_1 ( real(rp), dimension(:), intent(inout)  x,
real(rp), intent(in)  a,
real(rp), dimension(:), intent(in)  y 
)
private

x(:) := x(:) + a*y(:)

Definition at line 121 of file R1d_mod.F90.

Here is the call graph for this function:

◆ xpay_2()

subroutine r1d_mod::xpay_2 ( real(rp), dimension(:), intent(out)  z,
real(rp), dimension(:), intent(in)  x,
real(rp), intent(in)  a,
real(rp), dimension(:), intent(in)  y 
)
private

z(:) := x(:) + a*y(:)

Definition at line 157 of file R1d_mod.F90.

Here is the call graph for this function:

◆ xy_2()

subroutine r1d_mod::xy_2 ( real(rp), dimension(:), intent(out)  z,
real(rp), dimension(:), intent(in)  x,
real(rp), dimension(:), intent(in)  y 
)
private

z(:) := x(:)*y(:)

Definition at line 384 of file R1d_mod.F90.

Here is the call graph for this function: