Home Search Reference Manual Up Return
File save_axl1.ins stores variables related to the axle.
#
#
# Result storage file for an axle Rev.000422
# ----------------------------------------------
#
# Argument $1 = Axle number
#
#
substruct save_axl1 [
note
note
note Start of substructure file save_axl1.ins Rev.000422
note ------------------------------------------------------
#
s_var sngl axl_$1.x
s_var sngl axl_$1.y
s_var sngl axl_$1.z
s_var sngl axl_$1.f
s_var sngl axl_$1.k
s_var sngl axl_$1.p
#
s_var sngl axl_$1.vx
s_var sngl axl_$1.vy
s_var sngl axl_$1.vz
s_var sngl axl_$1.vf
s_var sngl axl_$1.vk
s_var sngl axl_$1.vp
#
s_var sngl lsa_$1.pn
#
s_var sngl trc_$1.y
s_var sngl trc_$1.vy
#
s_var sngl tral$1r.y s_var sngl tral$1l.y
s_var sngl tral$1r.z s_var sngl tral$1l.z
#
s_var sngl cpt_$1r.Fn s_var sngl cpt_$1l.Fn
s_var sngl cpt_$1r.Fny s_var sngl cpt_$1l.Fny
s_var sngl cpt_$1r.Fx s_var sngl cpt_$1l.Fx
s_var sngl cpt_$1r.Fy s_var sngl cpt_$1l.Fy
s_var sngl cpt_$1r.Fz s_var sngl cpt_$1l.Fz
#
if_then_init .exist. cpf_$1r.z
s_var sngl cpf_$1r.Fn # Store flange forces if they exists
s_var sngl cpf_$1r.Fny
s_var sngl cpf_$1r.Fx
s_var sngl cpf_$1r.Fy
s_var sngl cpf_$1r.Fz
endif
#
if_then_init .exist. cpf_$1l.z
s_var sngl cpf_$1l.Fn # Store flange forces if they exists
s_var sngl cpf_$1l.Fny
s_var sngl cpf_$1l.Fx
s_var sngl cpf_$1l.Fy
s_var sngl cpf_$1l.Fz
endif
#
func add Y$1r cpt_$1r.Fy { cpf_$1r.Fy | 0. } # Add flange forces
func add Y$1l -cpt_$1l.Fy { -cpf_$1l.Fy | 0. } # if they exists
func add Q$1r cpt_$1r.Fz { cpf_$1r.Fz | 0. }
func add Q$1l cpt_$1l.Fz { cpf_$1l.Fz | 0. }
#
func div Y/Q$1r Y$1r Q$1r # Calculate Y/Q-ratio
func div Y/Q$1l Y$1l Q$1l # also called L/V-ratio
#
func add S$1 Y$1l -Y$1r # Calculate lateral track-shift force
#
s_var sngl Y$1r
s_var sngl Y$1l
s_var sngl Q$1r
s_var sngl Q$1l
s_var sngl Y/Q$1r
s_var sngl Y/Q$1l
s_var sngl S$1
#
note
note -------------------------------------------
note End of substructure file save_axl1.ins
note -------------------------------------------
]