twist_init Function

private function twist_init(prim, k) result(out)

Initialise the twist modifier for a SDF.

Arguments

Type IntentOptional Attributes Name
class(sdf_base), target :: prim

SDF to modify

real, intent(in) :: k

Twist parameter.

Return Value type(twist)


Source Code

    type(twist) function twist_init(prim, k) result(out)
        !! Initialise the twist modifier for a SDF.
        
        !> SDF to modify
        class(sdf_base), target :: prim
        !> Twist parameter.
        real, intent(in) :: k

        out%k = k
        out%prim => prim
        out%optProps = prim%optProps

        out%layer = prim%layer
        out%transform = identity()

    end function twist_init