f1<-c(0,0,0,0,0,0,1,-2,1,0,0,0,0,0,0,-1,2,-1) dim(f1)=c(3,3,2) f2<-c(0,0,0,1,-2,1,0,0,0,0,0,0,-1,2,-1,0,0,0) dim(f2)=c(3,3,2) f3<-c(0,0,1,0,0,-2,-1,2,0,0,0,-1,0,0,2,1,-2,0) dim(f3)=c(3,3,2) f4<-c(0,0,1,0,0,-2,0,0,1,0,0,-1,0,0,2,0,0,-1) dim(f4)=c(3,3,2) f5<-c(0,0,1,1,-2,-1,-1,2,0,0,0,-1,-1,2,1,1,-2,0) dim(f5)=c(3,3,2) f6<-c(0,0,1,1,-2,-1,0,0,1,0,0,-1,-1,2,1,0,0,-1) dim(f6)=c(3,3,2) f7<-c(0,0,1,2,-4,0,-1,2,0,0,0,-1,-2,4,0,1,-2,0) dim(f7)=c(3,3,2) f8<-c(0,0,1,2,-4,0,0,0,1,0,0,-1,-2,4,0,0,0,-1) dim(f8)=c(3,3,2) f9<-c(0,1,-1,-2,2,0,0,1,-1,0,-1,1,2,-2,0,0,-1,1) dim(f9)=c(3,3,2) f10<-c(0,1,-1,-2,2,0,1,-1,0,0,-1,1,2,-2,0,-1,1,0) dim(f10)=c(3,3,2) f11<-c(0,1,-1,-1,0,1,0,1,-1,0,-1,1,1,0,-1,0,-1,1) dim(f11)=c(3,3,2) f12<-c(0,1,-1,-1,0,1,1,-1,0,0,-1,1,1,0,-1,-1,1,0) dim(f12)=c(3,3,2) f13<-c(0,1,-1,0,-2,2,1,-1,0,0,-1,1,0,2,-2,-1,1,0) dim(f13)=c(3,3,2) f14<-c(0,1,0,-1,0,-1,0,1,0,0,-1,0,1,0,1,0,-1,0) dim(f14)=c(3,3,2) f15<-c(0,1,0,-1,0,-1,1,-1,1,0,-1,0,1,0,1,-1,1,-1) dim(f15)=c(3,3,2) f16<-c(0,1,0,0,-2,0,0,1,0,0,-1,0,0,2,0,0,-1,0) dim(f16)=c(3,3,2) f17<-c(0,1,0,0,-2,0,1,-1,1,0,-1,0,0,2,0,-1,1,-1) dim(f17)=c(3,3,2) f18<-c(0,2,-1,-2,0,0,0,2,-1,0,-2,1,2,0,0,0,-2,1) dim(f18)=c(3,3,2) f19<-c(0,2,-1,-2,0,0,1,0,0,0,-2,1,2,0,0,-1,0,0) dim(f19)=c(3,3,2) f20<-c(0,2,-1,-1,-2,1,1,0,0,0,-2,1,1,2,-1,-1,0,0) dim(f20)=c(3,3,2) f21<-c(0,2,-1,0,-4,2,1,0,0,0,-2,1,0,4,-2,-1,0,0) dim(f21)=c(3,3,2) f22<-c(0,2,0,-2,0,-2,1,0,1,0,-2,0,2,0,2,-1,0,-1) dim(f22)=c(3,3,2) f23<-c(0,2,0,-1,-2,-1,1,0,1,0,-2,0,1,2,1,-1,0,-1) dim(f23)=c(3,3,2) f24<-c(0,2,0,0,-4,0,1,0,1,0,-2,0,0,4,0,-1,0,-1) dim(f24)=c(3,3,2) f25<-c(1,-2,0,-2,4,0,0,0,-1,-1,2,0,2,-4,0,0,0,1) dim(f25)=c(3,3,2) f26<-c(1,-2,0,-1,2,1,0,0,-1,-1,2,0,1,-2,-1,0,0,1) dim(f26)=c(3,3,2) f27<-c(1,-2,0,0,0,2,0,0,-1,-1,2,0,0,0,-2,0,0,1) dim(f27)=c(3,3,2) f28<-c(1,-2,0,0,0,2,1,-2,0,-1,2,0,0,0,-2,-1,2,0) dim(f28)=c(3,3,2) f29<-c(1,-2,1,0,0,0,0,0,0,-1,2,-1,0,0,0,0,0,0) dim(f29)=c(3,3,2) f30<-c(1,-1,0,-2,2,0,0,1,-1,-1,1,0,2,-2,0,0,-1,1) dim(f30)=c(3,3,2) f31<-c(1,-1,0,-1,0,1,0,1,-1,-1,1,0,1,0,-1,0,-1,1) dim(f31)=c(3,3,2) f32<-c(1,-1,0,-1,0,1,1,-1,0,-1,1,0,1,0,-1,-1,1,0) dim(f32)=c(3,3,2) f33<-c(1,-1,0,0,-2,2,0,1,-1,-1,1,0,0,2,-2,0,-1,1) dim(f33)=c(3,3,2) f34<-c(1,-1,0,0,-2,2,1,-1,0,-1,1,0,0,2,-2,-1,1,0) dim(f34)=c(3,3,2) f35<-c(1,-1,1,-1,0,-1,0,1,0,-1,1,-1,1,0,1,0,-1,0) dim(f35)=c(3,3,2) f36<-c(1,-1,1,-1,0,-1,1,-1,1,-1,1,-1,1,0,1,-1,1,-1) dim(f36)=c(3,3,2) f37<-c(1,-1,1,0,-2,0,0,1,0,-1,1,-1,0,2,0,0,-1,0) dim(f37)=c(3,3,2) f38<-c(1,-1,1,0,-2,0,1,-1,1,-1,1,-1,0,2,0,-1,1,-1) dim(f38)=c(3,3,2) f39<-c(1,0,0,-2,0,0,0,2,-1,-1,0,0,2,0,0,0,-2,1) dim(f39)=c(3,3,2) f40<-c(1,0,0,-2,0,0,1,0,0,-1,0,0,2,0,0,-1,0,0) dim(f40)=c(3,3,2) f41<-c(1,0,0,-1,-2,1,0,2,-1,-1,0,0,1,2,-1,0,-2,1) dim(f41)=c(3,3,2) f42<-c(1,0,0,-1,-2,1,1,0,0,-1,0,0,1,2,-1,-1,0,0) dim(f42)=c(3,3,2) f43<-c(1,0,0,0,-4,2,0,2,-1,-1,0,0,0,4,-2,0,-2,1) dim(f43)=c(3,3,2) f44<-c(1,0,0,0,-4,2,1,0,0,-1,0,0,0,4,-2,-1,0,0) dim(f44)=c(3,3,2) f45<-c(1,0,1,-2,0,-2,0,2,0,-1,0,-1,2,0,2,0,-2,0) dim(f45)=c(3,3,2) f46<-c(1,0,1,-1,-2,-1,0,2,0,-1,0,-1,1,2,1,0,-2,0) dim(f46)=c(3,3,2) f47<-c(1,0,1,-1,-2,-1,1,0,1,-1,0,-1,1,2,1,-1,0,-1) dim(f47)=c(3,3,2) f48<-c(1,0,1,0,-4,0,0,2,0,-1,0,-1,0,4,0,0,-2,0) dim(f48)=c(3,3,2) f49<-c(1,0,1,0,-4,0,1,0,1,-1,0,-1,0,4,0,-1,0,-1) dim(f49)=c(3,3,2) F=list(f1,f2,f3,f4,f5,f6,f7,f8,f9,f10,f11,f12,f13,f14,f15,f16,f17,f18,f19,f20,f21,f22,f23,f24,f25,f26,f27,f28,f29,f30,f31,f32,f33,f34,f35,f36,f37,f38,f39,f40,f41,f42,f43,f44,f45,f46,f47,f48,f49)