*SetForce() - symmetric translational for command sets

*SetForce(ftpair, LEFT/RIGHT, fxl, fyl, fzl)

ftpair

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

fxl, fyl, fzl

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_0, "Force 0", TRANS, B_Ground, P_Global_Origin, 
                       Global_Frame)
  *SetForce(frc_wc, RIGHT,  10.0,  11.0,  12.0)
  *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, RIGHT,  7.0,  8.0,  9.0)
  *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()