MODULE Crays_Module
   IMPLICIT NONE
   SAVE
   LOGICAL :: cray=.False. ! This variable is set equal to true for running on cray computers.
END MODULE Crays_Module