normalized_R4P Function

  1. vecfor_R4P.F90
  2. vecfor_R4P
  3. normalized_R4P

public elemental function normalized_R4P(self) result(norm)

Return a normalized copy of vector.

The normalization is made by means of norm L2. If the norm L2 of the vector is less than the parameter smallRPP the normalization value is set to normL2(vec)+smallRPP.

 type(vector_R4P) :: pt
 pt = ex_R4P + ey_R4P
 pt = pt%normalized()
 print "(3(F4.2,1X))", abs(pt%x), abs(pt%y), abs(pt%z)

 type(vector_R4P) :: pt
 pt = ex_R4P + ey_R4P
 pt = normalized_R4P(pt)
 print "(3(F4.2,1X))", abs(pt%x), abs(pt%y), abs(pt%z)

Arguments

TypeIntentOptionalAttributesName
class(vector_R4P), intent(in) :: self

Vector.

Return Value type(vector_R4P)

Normalized copy.


Called by

proc~~normalized_r4p~~CalledByGraph proc~normalized_r4p normalized_R4P proc~face_normal3_r4p face_normal3_R4P proc~face_normal3_r4p->proc~normalized_r4p proc~parallel~4 parallel proc~parallel~4->proc~normalized_r4p program~volatile_doctest~381 volatile_doctest program~volatile_doctest~381->proc~normalized_r4p proc~face_normal4_r4p face_normal4_R4P proc~face_normal4_r4p->proc~normalized_r4p proc~mirror_matrix_r4p mirror_matrix_R4P proc~mirror_matrix_r4p->proc~normalized_r4p proc~rotation_matrix_r4p rotation_matrix_R4P proc~rotation_matrix_r4p->proc~normalized_r4p proc~vector_eq_vector~4 vector_eq_vector proc~vector_eq_vector~4->proc~normalized_r4p proc~vector_not_eq_vector~4 vector_not_eq_vector proc~vector_not_eq_vector~4->proc~normalized_r4p proc~distance_to_plane_r4p distance_to_plane_R4P proc~distance_to_plane_r4p->proc~face_normal3_r4p program~volatile_doctest~531 volatile_doctest program~volatile_doctest~531->proc~face_normal3_r4p proc~mirror_by_normal~4 mirror_by_normal proc~mirror_by_normal~4->proc~mirror_matrix_r4p proc~distance_vectorial_to_plane_r4p distance_vectorial_to_plane_R4P proc~distance_vectorial_to_plane_r4p->proc~face_normal3_r4p program~volatile_doctest~476 volatile_doctest program~volatile_doctest~476->proc~face_normal4_r4p proc~rotate_by_axis_angle~4 rotate_by_axis_angle proc~rotate_by_axis_angle~4->proc~rotation_matrix_r4p program~volatile_doctest~450 volatile_doctest program~volatile_doctest~450->proc~distance_to_plane_r4p program~volatile_doctest~484 volatile_doctest program~volatile_doctest~484->proc~distance_vectorial_to_plane_r4p

Contents

None