[MITgcm-devel] unnecessary store

[Matthew Mazloff]

Hi Patrick,

I think the store:
CADJ STORE theta = tapelev_init, key = 1

on line 292 of packages_init_variables.F

is unnecessary.  Or perhaps it is specific to a package I am not  
using, and should be within an #ifdef then.  (I don't find any obvious  
recomputations when I comment it out.)

If you agree, perhaps you can fix this, as it is a large store, and I  
think Ranger occasionally trips over it.

Thanks
-Matt

ps> it was put in:

Revision 1.34 - (view) (download) (as text) (annotate) - [select for  
diffs]
Fri May 21 21:45:35 2004 UTC (7 years, 3 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint53c_post, checkpoint53d_post, checkpoint53d_pre,  
checkpoint53f_post, checkpoint53g_post, checkpoint54,  
checkpoint54a_post, checkpoint54a_pre,checkpoint54b_post,  
checkpoint54c_post, checkpoint54d_post
Changes since 1.33: +11 -1 lines
Diff to previous 1.33
o Adjoint for EBM package (needs further testing)
o bug fix for parallel EBM in ebm_zonalmean.F 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mitgcm.org/pipermail/mitgcm-devel/attachments/20110906/c0dacce7/attachment.htm>