it(i12)
t(e13.5)
dt(e13.5)
a(e13.5)
H(e13.5)
Q(e13.5)
Qdot(e13.5)
chi(e13.5)
chidot(e13.5)
psi(e13.5)
psiL(e13.5)
TR(e13.5)
TL(e13.5)
grand2(e13.5)
dgrant(e13.5)