tc

real, dimension(ntb_t), parameter, private module_mp_thompson::tc = (/-0.01, -5., -10., -15., -20., -25., -30., -35., -40./)

private