Searched refs:vmagref (Results 1 – 1 of 1) sorted by relevance
96 real*8 :: vmagref, vmag local137 vmagref = (vmax - vmin)*(t - t0)/(t1 - t0) + vmin139 vmagref = vmax141 vmagref = (vmax - vmin)*(t - t3)/(t2 - t3) + vmin143 vmagref = vmin155 vmagref = 0.5*(vmax - vmin)*sin(2*pi*t) + 0.5*(vmax + vmin)157 vmagref = max(vmax, vmin) 165 vmag = vmagref*blower(iBlower)%vscale(i) !scale the reference