Void pointer to dispersion model
Actual payload
type :: vp_model !> Actual payload type(d4_model) :: ptr end type vp_model