link ../../GridNPB3.1-SHF-SER/BT/x_solve.f