# Define initial soil with 5 layers
spar <- defaultSoilParams(5)
spar
# Redefine to four layers
soil_redefineLayers(spar)
# Same but after soil parameter initialization
examplesoil <- soil(spar)
examplesoil
soil_redefineLayers(examplesoil)
Run the code above in your browser using DataLab