bTimA = 1
bTimB = 1
bTimC = 5
bTimD = .5
bTimE = 1
bTimF = 1
bTimG = 3
CASE[0.0000,bTimA]{; < - - - - - - - - 'bTimA'
S=T/bTimA
tFunk = 6*pwr[S,5]-15*pwr[S,4]+10*pwr[S,3] ;; Q
B = 80 *tFunk/57.295779
}
CASE[bTimA+0.000001,bTimB]{; < - - - - 'bTimB'
S=(T-bTimA)/(bTimB-bTimA)
tFunk = 6*pwr[S,5]-15*pwr[S,4]+10*pwr[S,3] ;; Q
B = 80 /57.295779
}
CASE[bTimB+0.000001,bTimC]{; < - - - - 'bTimC'
S=(T-bTimB)/(bTimC-bTimB)
tFunk = 6*pwr[S,5]-15*pwr[S,4]+10*pwr[S,3] ;; Q
B = 80 /57.295779 - 760*tFunk/57.295779
}
CASE[bTimC+0.000001,bTimD]{; < - - - - 'bTimD'
S=(T-bTimC)/(bTimD-bTimC)
tFunk = 6*pwr[S,5]-15*pwr[S,4]+10*pwr[S,3] ;; Q
B = -680 /57.295779 + 35*tFunk/57.295779
}
CASE[bTimD+0.000001,bTimE]{; < - - - - 'bTimE'
S=(T-bTimD)/(bTimE-bTimD)
tFunk = 6*pwr[S,5]-15*pwr[S,4]+10*pwr[S,3] ;; Q
B = -645 /57.295779
}
CASE[bTimE+0.000001,bTimF]{; < - - - - 'bTimF'
S=(T-bTimE)/(bTimF-bTimE)
tFunk = 6*pwr[S,5]-15*pwr[S,4]+10*pwr[S,3]
B = -645 /57.295779 - 75*tFunk/57.295779
}
CASE[bTimF+0.000001,bTimG]{; < - - - - 'bTimG'
S=(T-bTimF)/(bTimG-bTimF)
tFunk = 6*pwr[S,5]-15*pwr[S,4]+10*pwr[S,3]
B = -720 /57.295779
}
CASE[bTimG+0.000001,bTimH]{; < - - - - 'bTimH'
S=(T-bTimG)/(bTimH-bTimG)
tFunk = 6*pwr[S,5]-15*pwr[S,4]+10*pwr[S,3]
B = 0 /57.295779
Thats the whole element in banking terms and im guess thats where it messed up. Ill post the forces if anyone thinks that might be a problem