Searched refs:crdmax (Results 1 – 4 of 4) sorted by relevance
| /dports/science/tinker/tinker/source/ |
| H A D | prtxyz.f | 31 real*8 crdmin,crdmax
55 crdmax = 0.0d0
58 crdmax = max(crdmax,x(i),y(i),z(i))
62 if (crdmax .ge. 10000.0d0) crdsiz = 7
64 if (crdmax .ge. 100000.0d0) crdsiz = 8
|
| H A D | prtpdb.f | 31 real*8 crdmin,crdmax
118 crdmax = 0.0d0
126 crdmax = max(crdmax,xpdb(i),ypdb(i),zpdb(i))
132 if (crdmax .ge. 1000.0d0) crdc = '3f9.3 '
134 if (crdmax .ge. 10000.0d0) crdc = '3f10.3'
|
| H A D | archive.f | 471 real*8 crdmin,crdmax local
495 crdmax = 0.0d0
498 crdmax = max(crdmax,x(i),y(i),z(i))
502 if (crdmax .ge. 10000.0d0) crdsiz = 7
504 if (crdmax .ge. 100000.0d0) crdsiz = 8
|
| H A D | xyzedit.f | 1175 real*8 crdmin,crdmax local
1188 crdmax = 0.0d0
1191 crdmax = max(crdmax,x(i),y(i),z(i))
1195 if (crdmax .ge. 10000.0d0) crdsiz = 7
1197 if (crdmax .ge. 100000.0d0) crdsiz = 8
|