Write an MT3DMS Sink-Source Mixing Package file

rmt_write_ssm writes an MT3DMS sink & source mixing package file from a RMT3DMS ssm object.

rmt_write_ssm(
  ssm,
  file = {    
    cat("Please select ssm file to overwrite or provide new filename ...\n")    
    file.choose() },
  btn = {     cat("Please select corresponding btn file ...\n")    
    rmt_read_btn(file.choose()) },
  iprn = -1,
  ...
)

Arguments

ssm	an RMT3DMS ssm object
file	filename to write to; typically '*.ssm'
btn	an RMT3DMS btn object
iprn	format code for printing arrays in the listing file; defaults to -1 (no printing)
additional	arguments passed to rmti_write_array

Value

NULL

See also

rmt_create_ssm, rmt_read_ssm

Examples

btn <- rmt_create_btn()
wel <- rmt_create_list(data.frame(i = 5, j = 4:5, k = 3, css1 = 6.45, css2 = 47, itype = 2), kper = 1)
ssm <- rmt_create_ssm(wel, crch = 0, btn = btn)
#> Warning: Number of active species in btn is 1, but more species defined in rmf_lists. Only using the first 1
rmt_write_ssm(ssm, file = file.path(tempdir(), 'input.ssm'), btn = btn)