Changeset 38d77eb for bldmol.f

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:

• bldmol.f (modified) (2 diffs)

bldmol.f

@@ -134 +134 @@
 
           if (ix.ne.0) then
-            write (*,'(2a,i3)') 
+            write (logString, '(2a,i3)') 
      &         ' fnd3ba> Can handle only simple ring at 1st',
      &         ' atom of molecule #',nml
@@ -166 +166 @@
       endif
 
-      write (*,'(4a,i4,a,i4)') 
+      write (logString, '(4a,i4,a,i4)') 
      &   ' fnd3ba> Cannot find backbone atom following ',nmat(i2),
      &   ' of residue ',seq(irs),irs,' in molecule #',nml