global AnimCpFigH AnimCpAxisH
winName = bdroot(gcs);

M = 1
m = 0.1
l = 1
g = 9.8

Fmax = 20
Botta= 3
PeriodoBotta = 16
PWBotta = 1
DelayBotta = 6


x0 = 0.2
theta0 = 0.55
StepX = 0.8
TstepX = 15
Tfin = 30