bond_fene_set Subroutine

private subroutine bond_fene_set(params, k, rmax, r0)

Setter for FENE bond.

  U = -0.5 k rmax^2 log [1 - ((r - r0)/rmax)^2]

User-set parameters:

  • params(1) = k
  • params(2) = rmax
  • params(3) = r0

Internally stored parameters:

  • params(4) = rmax^2

Arguments

Type IntentOptional AttributesName
real(kind=rp), intent(inout), dimension(:):: params
real(kind=rp), intent(in), optional :: k
real(kind=rp), intent(in), optional :: rmax
real(kind=rp), intent(in), optional :: r0

Contents

None