Home
last modified time | relevance | path

Searched refs:PresSin (Results 1 – 1 of 1) sorted by relevance

/phasta/phSolver/compressible/
H A DBCprofileKW.f8 real*8 PresSin, PresAmp, PresFreq local
15 PresSin=PresAmp*sin(two*pi*PresFreq*((lstep-tsBase)+1)*Delt(1)) ! pressure disturbance
25 BC(kk,1)=11597+PresSin