Changeset 5272e0d for init_molecule.f
- Timestamp:
- 06/15/10 09:29:31 (14 years ago)
- Branches:
- master
- Children:
- 281b862
- Parents:
- 7137e5d
- git-author:
- Jan H. Meinke <meinke@…> (05/31/10 22:26:20)
- git-committer:
- Jan Meinke <j.meinke@…> (06/15/10 09:29:31)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
init_molecule.f
r7137e5d r5272e0d 100 100 l=iendst(varfil) 101 101 if (l.gt.0.and.varfil.ne.' ') then 102 write (logString, '(1x,a,/)') varfil(1:l)102 ! write (logString, '(1x,a,/)') varfil(1:l) 103 103 lunvar=13 104 104
Note:
See TracChangeset
for help on using the changeset viewer.