From: Łukasz Golon <golon@uchicago.edu>
Date: Wed, 30 Oct 2019 19:17:22 +0000 (+0100)
Subject: tttest
X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=commitdiff_plain;h=e9af9725daa77c2cfbf1c689b24ed86b01e59f4a;hp=603baff0aabf21ffced01092a8e60ebce34f1adc;p=unres4.git

tttest
---

diff --git a/source/wham/wham.F90 b/source/wham/wham.F90
index fcf1d15..def4ee1 100644
--- a/source/wham/wham.F90
+++ b/source/wham/wham.F90
@@ -54,6 +54,9 @@
 !#define WHAM_RUN
 !      call alloc_wham_arrays
 !write(iout,*) "after alloc wham"
+      write (*,"(A,/,A,/,A,/,A)") "Last Christmas", &
+      "I gave you my heart","But the very next day", &
+      "You gave it away"
 #ifdef MPI
       call MPI_Init( IERROR )
       call MPI_Comm_rank( MPI_COMM_WORLD, me, IERROR )