IffGit has a new shared runner for building Docker images in GitLab CI. Visit https://iffgit.fz-juelich.de/examples/ci-docker-in-docker for more details.

Commit f71adbd4 authored by Uliana Alekseeva's avatar Uliana Alekseeva
Browse files

An output was commented out, because the subroutine orbmom2 is now used in parallel.

parent 65e7bc60
......@@ -105,10 +105,13 @@ CONTAINS
clmom(2) = qmtty
clmom(3) = qmtt
WRITE (6,FMT=8100) itype, (qmtl(l),l=0,3), qmtt
WRITE (6,FMT=8100) itype, (qmtlx(l),l=0,3),qmttx
WRITE (6,FMT=8100) itype, (qmtly(l),l=0,3),qmtty
8100 FORMAT (' -->',i2,2x,4f9.5,2x,f9.5)
! The following output was commented out, because the subroutine is now used in parallel.
! Jan. 2019 U.Alekseeva
!
! WRITE (6,FMT=8100) itype, (qmtl(l),l=0,3), qmtt
! WRITE (6,FMT=8100) itype, (qmtlx(l),l=0,3),qmttx
! WRITE (6,FMT=8100) itype, (qmtly(l),l=0,3),qmtty
!8100 FORMAT (' -->',i2,2x,4f9.5,2x,f9.5)
END SUBROUTINE orbmom2
END MODULE m_orbmom2
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment