發送短信: A Functional Derivation of the Warren Abstract Machine