Work Done on a Crate

Pulling a crate 40 m at 37°: the pull does 3200 J, friction −2000 J, gravity and the floor none. Net 1200 J.