JGS_subgrade_displacement_Soil Function

public function JGS_subgrade_displacement_Soil(this, area, weight, Is) result(u)

Type Bound

Soil_

Arguments

Type	Intent	Optional	Attributes		Name
class(Soil_),	intent(inout)			::	this
real(kind=real64),	intent(in)			::	area
real(kind=real64),	intent(in)			::	weight
real(kind=real64),	intent(in),	optional		::	Is

Return Value real(kind=real64)