apply_par_list: apply_par_list
In conmolfields: Continuous molecular fields

apply_par_list

1	apply_par_list(xyz_m, par_list)

`xyz_m`
`par_list`

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
apply_par_list <- function(xyz_m, par_list) {
    q1 <- par_list[1]
    q2 <- par_list[2]
    q3 <- par_list[3]
    q4 <- par_list[4]
    t1 <- par_list[5]
    t2 <- par_list[6]
    t3 <- par_list[7]
    R <- q2r(q1, q2, q3, q4)
    Tr <- c(t1, t2, t3)
    xyz_a <- R 
	xyz_a
  }