Searched refs:phie_t (Results 1 – 2 of 2) sorted by relevance
199 phie_t = phie220 ; phie = [phie[0:nsboost],phie_t[nsboost+1:2*nsboost]]223 ; phie = [phie_t[0:nsboost],phie[nsboost+1:2*nsboost]]227 phie[nsboost+1] = phie_t[nsboost+1:2*nsboost]230 phie[0] = phie_t[0:nsboost]
928 real(dp), dimension(1:2*nsboost+1) :: f, f1, phiw_t, phie_t local950 phie_t = phie976 phie(nsboost+2:2*nsboost+1) = phie_t(nsboost+2:2*nsboost+1)979 phie(1:nsboost+1) = phie_t(1:nsboost+1)