*SetForce() - symmetric rotational for command sets

*SetForce(tqpair, LEFT/RIGHT, txl, tyl, tzl)

tqpair

The variable name of the set force.

Type: Varname

LEFT/RIGHT

Left

If specified, the properties are assigned to the left set force, and the right is made symmetric to the left.

RIGHT

If specified, the properties are assigned to the right set force, and the left properties are made symmetric to the right.

Type: Boolean

txl, tyl, tzl

Numbers, MDL expressions, or solver expressions that determine the values of the translational X, Y, and Z components of the force.

Type: real or string

*BeginMDL(the_model, "Example model")
*Analysis(the_analysis, "The analysis", andef)
*DefineAnalysis(andef)
  *ActionOnlyForcePair(frc_wc,
                       "Applied force on wheel center",
                       ROT,
                       b_wheel,
                       p_wc)
  *SetForce(frc_wc, LEFT,  ds.real1.value * ds.real2.value, 
                           10.3, 
                           ds.real3.value)
  *CommandSet(the_commandset, "Simple command set", evdef, frc_0, tpl_begin, tpl_end)
  *Template(tpl_begin, "Begin template", USER, tpldef_commandset_begin)
  *Template(tpl_end, "End template", USER, tpldef_commandset_end)
  *Template(tpl_superfluous, "Should be ignored", ACF, tpldef_commandset_begin)
*EndDefine()
*DefineCommandSet(evdef, local_frc_0, local_tpl_begin, local_tpl_end)
  *Write(local_tpl_begin)
  *SetForce(frc_wc, LEFT,  ds.real1.value * ds.real2.value, 
                           9.3, 
                           ds.real3.value)
  *Write(local_tpl_end)
*EndDefine()
*DefineTemplate(tpldef_commandset_begin)
{AbsToRelative(Solver_File_basename.path, Solver_File_basename.value + 
".adm")}
PREFERENCES/SIMFAIL=STOPCF
*EndDefine()
*DefineTemplate(tpldef_commandset_end)
STOP
*EndDefine()
*EndMDL()