Lines Matching refs:offphase
7 real*8 offphase local
30 offphase = 0.d0
33 offphase = 1.d0
38 offphase = 1.d0
40 offphase = 0.d0
46 offphase = 1.d0
48 offphase = 0.d0
55 offphase = 1.d0
57 offphase = 0.d0
61 BC(kk,3)=r_time_factor*vbc_prof(kk,1)*offphase
62 BC(kk,4)=r_time_factor*vbc_prof(kk,2)*offphase
63 BC(kk,5)=r_time_factor*vbc_prof(kk,3)*offphase