Searched refs:RLENGT (Results 1 – 3 of 3) sorted by relevance
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/DALTON/abacus/ |
H A D | abandsym.F | 1897 RLENGT = D0 1899 RLENGT = RLENGT+ TRIAL(ICOOR1)**2 1901 RLENGT = SQRT(RLENGT) 1902 IF (RLENGT.GT.DTHR) THEN 1903 RINV = D1/RLENGT 1913 RLENGT = D0 1915 RLENGT = RLENGT+ TRIAL(ICOOR1)**2 1917 IF (RLENGT.LT.DTHR) EXIST = .TRUE.
|
/dports/graphics/dataplot/dataplot-2c1b27601a3b7523449de612613eadeead9a8f70/src/ |
H A D | dp42.F | 45326 1 TIMEL,TIMEU,RLENGT) 45342 DOUBLE PRECISION RLENGT(*) 45413 F=PNRFUN(X,N,TIMEL,TIMEU,RLENGT) 45455 F=PNRFUN(X,N,TIMEL,TIMEU,RLENGT) 45701 F=PNRFUN(X,N,TIMEL,TIMEU,RLENGT)
|
H A D | dp40.F | 3019 SUBROUTINE HESS(PNRFUN,X,N,SCL,STPSZ,FNBR,H,TIMEL,TIMEU,RLENGT) argument 3041 DOUBLE PRECISION RLENGT(*) 3051 FC = PNRFUN(X,N,TIMEL,TIMEU,RLENGT) 3062 FNBR(I) = PNRFUN(X,N,TIMEL,TIMEU,RLENGT)
|