[MITgcm-devel] gmredi_check.F

[Jean-Michel Campin]

Hi Holly,

I am going to check this (but I remember that there was a 
serious problem related to this piece of code, but
not sure which part is safe to use).

Cheers,
Jean-Michel

On Tue, Feb 08, 2011 at 11:48:42AM -0500, Holly Dail wrote:
> Jean-Michel -
> 
> I've just updated to checkpoint 62R, and my simple forward run now fails because I am using GMREDI and have ALLOW_EDDYPSI set in my CPP_OPTIONS.h.  The following code in gmredi_check.F causes a failure in this configuration; this code is a new checkin from you, and I'm wondering if you could explain why EDDYPSI should not be compatible with GMREDI and/or how I should proceed ... many other places in GMREDI assume the possibility of having EDDYPSI set.  
> 
> 161    #ifdef ALLOW_EDDYPSI 
> 162           WRITE(msgBuf,'(A)') 
> 163         &   ' GMREDI_CHECK: Bug in ALLOW_EDDYPSI + GM-Redi' 
> 164           CALL PRINT_ERROR( msgBuf, myThid ) 
> 165           STOP 'ABNORMAL END: S/R GMREDI_CHECK' 
> 166    #endif
> 
> Thanks for the help!
> Holly
> _______________________________________________
> MITgcm-devel mailing list
> MITgcm-devel at mitgcm.org
> http://mitgcm.org/mailman/listinfo/mitgcm-devel