primitive Interface

interface
public pure function primitive(pos) result(res)

Arguments

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

vector position of photon packet.

Return Value real(kind=wp)

Description

Abstract function used as base for displacement function