projects
/
unres.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
clean fix revert to previous vestion
[unres.git]
/
source
/
wham
/
src-M
/
secondary.f
diff --git
a/source/wham/src-M/secondary.f
b/source/wham/src-M/secondary.f
index
9c9bc7d
..
4088831
100644
(file)
--- a/
source/wham/src-M/secondary.f
+++ b/
source/wham/src-M/secondary.f
@@
-656,13
+656,13
@@
cd write (iout,*)'helix',nhelix,ii1,j1
if (lprint) then
if (lprint) then
- write(iout,*) 'UNRES seq:'
+ write(iout,*) 'UNRES seq:',anatemp
do j=1,nbfrag
write(iout,*) 'beta ',(bfrag(i,j),i=1,4)
enddo
do j=1,nhfrag
do j=1,nbfrag
write(iout,*) 'beta ',(bfrag(i,j),i=1,4)
enddo
do j=1,nhfrag
- write(iout,*) 'helix ',(hfrag(i,j),i=1,2)
+ write(iout,*) 'helix ',(hfrag(i,j),i=1,2),anatemp
enddo
endif
enddo
endif