Changeset 38d77eb for enyshe_p.f


Ignore:
Timestamp:
11/19/09 11:29:48 (14 years ago)
Author:
baerbaer <baerbaer@…>
Branches:
master
Children:
7137e5d
Parents:
32289cd
Message:

Redirected standard out to logString.

SMMP produced a lot of log messages. This became an issue when run in massively
parallel environments. I replaced all writes to standard out to a write to logString.
The next step is to pass this string to a function that writes the messages to a log
file according to their importance and the chosen log level.

git-svn-id: ​svn+ssh://svn.berlios.de/svnroot/repos/smmp/trunk@34 26dc1dd8-5c4e-0410-9ffe-d298b4865968

File:
1 edited

Legend:

Unmodified
Added
Removed

  • enyshe_p.f

    r32289cd r38d77eb  
    4646
    4747      if (ntlvr.eq.0) then
    48          write (*,'(a,i4)')
     48         write (logString, '(a,i4)')
    4949     &        ' enyshe> No variables defined in molecule #',nml
    5050         return
Note: See TracChangeset for help on using the changeset viewer.