TrigExpand[Cosh[2a]]

Input

TrigExpand[cosh(2 a)]

Result

sinh^2(a) + cosh^2(a)

Plot

Plot
Plot

Alternate form

cosh(2 a)

2 cosh^2(a) - 1

2 sinh^2(a) + 1