sp_multiply Function

  1. fidasim.f90
  2. libfida
  3. sp_multiply

public function sp_multiply(real_scalar, p1) result(p3)

Defines how to multiply Profiles types by a scalar

Arguments

Type IntentOptional AttributesName
real(kind=Float64), intent(in) :: real_scalar
type(Profiles), intent(in) :: p1

Return Value type(Profiles)


Called by

proc~~sp_multiply~~CalledByGraph proc~sp_multiply sp_multiply interface~operator(*) operator(*) interface~operator(*)->proc~sp_multiply

Contents

Source Code

sp_multiply

Source Code

function sp_multiply(real_scalar, p1) result (p3)
    !+ Defines how to multiply [[Profiles]] types by a scalar
    type(Profiles), intent(in) :: p1
    real(Float64), intent(in)  :: real_scalar
    type(Profiles)             :: p3

    p3 = p1*real_scalar

end function sp_multiply