      t0 = 2.D0/3.D0*M/(R+2*M)*sqrt(6.D0)*sqrt(pi)
                                  B11(1)=t0

      t0 = cmplx(0.D0,-2.D0/3.D0)*M/(R+2*M)*sqrt(6.D0)*sqrt(pi)
                                  B11(2)=t0

      t0 = 0
                                  B11(3)=t0

