# =============================================================
#		MODULE: table
# =============================================================
module table

	using DelimitedFiles

	# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
	#		FUNCTION : Output(path.Output, ∑Psd, Id, N_∑Psd, Clay, Sand, Clay, SoilClass) ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
	function Output(Path, ∑Psd, Id, N_∑Psd, Sand, Silt, Clay, SoilClass)

		Header =  ["Id" "Sand" "Silt" "Clay" "SoilClass"]
  
		if isfile(Path) # If the file is there than delete it before saving figure
			  rm(Path)
		end

		DelimitedFiles.writedlm(Path, [Header; Id Sand Silt Clay SoilClass], ",")
		
	end

end  # module table
# ............................................................