Changeset 38d77eb for metropolis.f
- Timestamp:
- 11/19/09 11:29:48 (14 years ago)
- Branches:
- master
- Children:
- 7137e5d
- Parents:
- 32289cd
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
metropolis.f
r32289cd r38d77eb 172 172 enw = energy() 173 173 if(abs(eol-enw).gt.0.000001) then 174 write(*,*) 'metropolis: eol,enw,difference:', eol, enw, eol-enw 174 write (logString, *) 'metropolis: eol,enw,difference:', eol, 175 & enw, eol-enw 175 176 if (eol.lt.100000) then 176 177 stop 'metropolis: eol and enw difference unacceptable'
Note:
See TracChangeset
for help on using the changeset viewer.