[MITgcm-devel] taf bug 1.8.84

[Patrick Heimbach]

Ralf,

1.8.84 seems to have a bug for resetting variables
to zero in function calls:
       subroutine adhexf_bulkcdn( umps, adumps, adexf_bulkcdn )
which comes from
       function exf_bulkcdn
has following fortran body:
       adumps = adumps+adexf_bulkcdn*exf_scal_bulkcdn*((-(cdrag_1/(umps*
      $umps)))+cdrag_3)
       adexf_bulkcdn = 0._8

instead of ... = 0.d0

Problem does not occur in 1.8.81

Cheers
-Patrick

---
Dr Patrick Heimbach | heimbach at mit.edu | http://www.mit.edu/~heimbach
MIT | EAPS, 54-1518 | 77 Massachusetts Ave | Cambridge, MA 02139, USA
FON: +1-617-253-5259 | FAX: +1-617-253-4464 | SKYPE: patrick.heimbach