[MITgcm-devel] bling adjoint example

[Matthew Mazloff]

Hello

I checked in a bling adjoint example. 
http://mitgcm.org/viewvc/MITgcm/MITgcm_contrib/verification_other/global_oce_biogeo_bling/code_ad/ <http://mitgcm.org/viewvc/MITgcm/MITgcm_contrib/verification_other/global_oce_biogeo_bling/code_ad/>

Note two files in code_ad that I would rather not have there:
addummy_in_stepping.F
external_forcing_surf.F

In addummy_in_stepping.F
I had to comment out:
152	cmm         CALL ADEXCH_UV_XY_RS( adFu, adFv, .TRUE., myThid )
153	cmm         CALL ADEXCH_XY_RS( adQnet, myThid )
154	cmm         CALL ADEXCH_XY_RS( adEmPmR, myThid )
is this a bug?

In external_forcing_surf.F
I had to add 
161	CMM(
162	CADJ STORE EmPmR = comlev1, key = ikey_dynamics,  kind = isbyte
163	CMM)
Can/should this be added to main code (perhaps with an ifdef ALLOW_BLING around it. Though I am surprised DIC doesn’t need this too.)

Thanks!
Matt


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mitgcm.org/pipermail/mitgcm-devel/attachments/20160914/671e9bb8/attachment.htm>