X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2Fbank.F;h=906d355c69257a6a34c9b539af40012a43ee7f59;hb=34d3ad3987785642be58fb2f26557d3314215577;hp=5636ba0936060192348ea6f72b842fe490b1c2b0;hpb=f690e8b70bab14132839afebf080d4a28363b226;p=unres.git

diff --git a/source/unres/src_MD-M/bank.F b/source/unres/src_MD-M/bank.F
index 5636ba0..906d355 100644
--- a/source/unres/src_MD-M/bank.F
+++ b/source/unres/src_MD-M/bank.F
@@ -612,7 +612,7 @@ c---------------------------------------
       include 'COMMON.CHAIN'
       include 'COMMON.GEO'
 
-#if defined(AIX) || defined(PGI)
+#if defined(AIX) || defined(PGI) || defined(CRAY)
       open(icsa_bank1,file=csa_bank1,position="append")
 #else
       open(icsa_bank1,file=csa_bank1,access="append")