[MITgcm-devel] latest mnc changes break mnc pkg with pgf77 on cray xd

Martin Losch mlosch at awi-bremerhaven.de
Fri Mar 10 10:25:44 EST 2006


Hi Ed,

you latest changes to the mnc package break the package on our cray  
xd1 with pgf77 and it is obvious, why:
e.g., in MNC_CW_READWRITE_RL.F, you have
MNC_MAX_PATH=500
and
CHARACTER*(MNC_MAX_PATH) fname
but then you try to write to msgbuf (which has a length of 512 only  
by virtue of MAX_LEN_MBUF=512) e.g,
write(msgbuf,'(3a')) 'sync for file ''', fname ''' in S/R MNC_CW_RL_W'
which immediately exceed the maximum length of msgBuf and the runtime  
system stalls (attempt to write past the end of record).

Please fix this. I don't know how (other than setting MNC_MAX_PATH to  
a smaller number (previously MNC_MAX_CHAR = 100?)

Martin



More information about the MITgcm-devel mailing list