Nonlinear state equation and adaptive symplectic algorithm for the control rod drop. (15th December 2022)