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