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