LinearSolve[ { { 1/s - 1/2 , -1/2 } , { -1/2 , 1/(D-s) - 1/2 } }, { (s-1)!/2 , - (s-1)!/2 } ]