extrude_init Function

private function extrude_init(prim, h) result(out)

Initialise the extrude modifier for a SDF.

Arguments

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

SDF to modify
real(kind=wp), intent(in) :: h

Distance to extrude by.

Return Value type(extrude)


Source Code

    type(extrude) function extrude_init(prim, h) result(out)
        !! Initialise the extrude modifier for a SDF.
        
        !> SDF to modify
        class(sdf_base), target :: prim
        !> Distance to extrude by.
        real(kind=wp), intent(IN) :: h

        out%h = h
        out%prim => prim

        out%optProps = prim%optProps

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

    end function extrude_init