z<-matrix(c(
rep(rnorm(nr,-c-d-e+cd+ce+de-cde,ep2),2^nfp),
rep(rnorm(nr,+c-d-e-cd-ce+de+cde,ep2),2^nfp),
rep(rnorm(nr,-c+d-e-cd+ce-de+cde,ep2),2^nfp),
rep(rnorm(nr,+c+d-e+cd-ce-de-cde,ep2),2^nfp),
rep(rnorm(nr,-c-d+e+cd-ce-de+cde,ep2),2^nfp),
rep(rnorm(nr,+c-d+e-cd+ce-de-cde,ep2),2^nfp),
rep(rnorm(nr,-c+d+e-cd-ce+de-cde,ep2),2^nfp),
rep(rnorm(nr,+c+d+e+cd+ce+de+cde,ep2),2^nfp)))
w<-matrix(c(
rnorm(nr,+ac+ad+ae+bc+bd+be-abc-abd-abe-acd-ace-ade-bcd-bce-bde+abcd+abce+
abde+acde+bcde-abcde,esp),
rnorm(nr,-ac-ad-ae+bc+bd+be+abc+abd+abe+acd+ace+ade-bcd-bce-bde-abcd-abce-
abde-acde+bcde+abcde,esp),
rnorm(nr,+ac+ad+ae-bc-bd-be+abc+abd+abe-acd-ace-ade+bcd+bce+bde-abcd-abce-
abde+acde-bcde+abcde,esp),
rnorm(nr,-ac-ad-ae-bc-bd-be-abc-abd-abe+acd+ace+ade+bcd+bce+bde+abcd+abce+
abde-acde-bcde-abcde,esp),
rnorm(nr,-ac+ad+ae-bc+bd+be+abc-abd-abe+acd+ace-ade+bcd+bce-bde-abcd-abce+
abde-acde-bcde+abcde,esp),
rnorm(nr,+ac-ad-ae-bc+bd+be-abc+abd+abe-acd-ace+ade+bcd+bce-bde+abcd+abce-
abde+acde-bcde-abcde,esp),
rnorm(nr,-ac+ad+ae+bc-bd-be-abc+abd+abe+acd+ace-ade-bcd-bce+bde+abcd+abce-
abde-acde+bcde-abcde,esp),
rnorm(nr,+ac-ad-ae+bc-bd-be+abc-abd-abe-acd-ace+ade-bcd-bce+bde-abcd-abce+
abde+acde+bcde+abcde,esp),
rnorm(nr,+ac-ad+ae+bc-bd+be-abc+abd-abe+acd-ace+ade+bcd-bce+bde-abcd+abce-
abde-acde-bcde+abcde,esp),
rnorm(nr,-ac+ad-ae+bc-bd+be+abc-abd+abe-acd+ace-ade+bcd-bce+bde+abcd-abce+
abde+acde-bcde-abcde,esp),
rnorm(nr,+ac-ad+ae-bc+bd-be+abc-abd+abe+acd-ace+ade-bcd+bce-bde+abcd-abce+
abde-acde+bcde-abcde,esp),
rnorm(nr,-ac+ad-ae-bc+bd-be-abc+abd-abe-acd+ace-ade-bcd+bce-bde-abcd+abce-
abde+acde+bcde+abcde,esp),
rnorm(nr,-ac-ad+ae-bc-bd+be+abc+abd-abe-acd+ace+ade-bcd+bce+bde+abcd-abce-
abde+acde+bcde-abcde,esp),
rnorm(nr,+ac+ad-ae-bc-bd+be-abc-abd+abe+acd-ace-ade-bcd+bce+bde-abcd+abce+
abde-acde+bcde+abcde,esp),
rnorm(nr,-ac-ad+ae+bc+bd-be-abc-abd+abe-acd+ace+ade+bcd-bce-bde-abcd+abce+
abde+acde-bcde+abcde,esp),
rnorm(nr,+ac+ad-ae+bc+bd-be+abc+abd-abe+acd-ace-ade+bcd-bce-bde+abcd-abce-
abde-acde-bcde-abcde,esp),
rnorm(nr,+ac+ad-ae+bc+bd-be-abc-abd+abe-acd+ace+ade-bcd+bce+bde+abcd-abce-
abde-acde-bcde+abcde,esp),
rnorm(nr,-ac-ad+ae+bc+bd-be+abc+abd-abe+acd-ace-ade-bcd+bce+bde-abcd+abce+
abde+acde-bcde-abcde,esp),
rnorm(nr,+ac+ad-ae-bc-bd+be+abc+abd-abe-acd+ace+ade+bcd-bce-bde-abcd+abce+
abde-acde+bcde-abcde,esp),
rnorm(nr,-ac-ad+ae-bc-bd+be-abc-abd+abe+acd-ace-ade+bcd-bce-bde+abcd-abce-
76