MAGMA scripts for studying the mutations of WPS