Lines Matching refs:one

18          almi   = one
19          alfi   = one
20          gami   = one
23          almi   = (three-rhoinf(itseq))/(one+rhoinf(itseq))/two
24          alfi   = one/(one+rhoinf(itseq))
44          y=y-(one-alfi)*Delt(1)*acold
52       Dtgl   = one / Delt(itseq)  ! caution: inverse of time step
76          fct = (gami-one)/gami
91          y  = yold + (one - gami)/Dtgl * acold
101          fct1 = alfi/(one-alfi)
102          fct2 = one-almi/gami