Searched refs:yboundhi (Results 1 – 2 of 2) sorted by relevance
/dports/science/lammps/lammps-stable_29Sep2021/tools/ |
H A D | micelle2d.f90 | 15 REAL(KIND=8) :: xprd,yprd,zprd,xboundlo,xboundhi,yboundlo,yboundhi,zboundlo,zboundhi variable 27 IF (y >= yboundhi) y = y - yprd 91 yboundhi = ny*rlattice 98 yprd = yboundhi - yboundlo 199 WRITE (6,*) yboundlo,yboundhi,' ylo yhi'
|
H A D | chain.f90 | 11 REAL(KIND=8) :: xprd,yprd,zprd,xboundlo,xboundhi,yboundlo,yboundhi,zboundlo,zboundhi variable 23 IF (y >= yboundhi) y = y - yprd 120 yboundhi = xboundhi 290 WRITE (6,'(2F15.6,A)') yboundlo,yboundhi,' ylo yhi'
|