update

[unres.git] / source / unres / src_MD-M / shift.F

diff --git a/source/unres/src_MD-M/shift.F b/source/unres/src_MD-M/shift.F
index 6eb9b3f..922036d 100644 (file)
--- a/source/unres/src_MD-M/shift.F
+++ b/source/unres/src_MD-M/shift.F
@@ -37,7 +37,7 @@ c---------------------------------
       open(icsa_seed,file=csa_seed,status="unknown")
        write(icsa_seed,*) "seed"
       close(31)
-#if defined(AIX) || defined(PGI)
+#if defined(AIX) || defined(PGI) || defined(CRAY)
        open(icsa_history,file=csa_history,status="unknown",
      &  position="append")
 #else
@@ -74,7 +74,7 @@ c---------------------------------
       include 'COMMON.CSA'
       include 'COMMON.BANK'
 
-#if defined(AIX) || defined(PGI)
+#if defined(AIX) || defined(PGI) || defined(CRAY)
        open(icsa_history,file=csa_history,position="append")
 #else
        open(icsa_history,file=csa_history,access="append")