extract waldwolf routines from psa.w