vec4 Interface

public interface vec4

Initalise a vec4 from a vec3 and a scalar


Module Procedures

private function init_vec4_vector_real(vec, val) result(out)

Initalise vec4 from a vec3 and Scalar e.g vec4 = [vec3%x, vec3%y, vec3%z, scalar]

Arguments

Type IntentOptional Attributes Name
type(vector), intent(in) :: vec

Input vec3
real(kind=wp), intent(in) :: val

Input Scalar

Return Value type(vec4)