[MITgcm-devel] latest changes in mom_vi_hdissip.F

[Patrick Heimbach]

Hi Jean-Michel,

should be fixed.
I failed to recognize one level of CPP ifdef's which
cuts through a Fortran IF ... ELSE block.

-p.



On Jun 9, 2007, at 1:22 PM, Patrick Heimbach wrote:

>
> Hi Jean-Michel,
>
> oops, you are right.
> I actually tested it yesterday before checkin, see on faulks
> /scratch/heimbach/MITgcm/verification/tr_faulks_20070608_5/
>
> but had missed that the viscA4 test failed.
> Will look into it.
>
> -p.
>
>
>
> On Jun 9, 2007, at 11:50 AM, Jean-Michel Campin wrote:
>
>> Hi,
>>
>> Looks like we have a problem here: all global_ocean.cs32x15.viscA4
>> test are failing:
>>
>> faulks{tr_run.viscA4}% mitgcmuv > std_outp
>> SOLUTION IS HEADING OUT OF BOUNDS: tMin,tMax=  -2.710E+06   4.069E+06
>> MON_SOLUTION: STOPPING CALCULATION
>> STOP MON_SOLUTION: STOPPED DUE TO EXTREME VALUES OF SOLUTION  
>> statement executed
>>
>> And I checked that with previous version of mom_vi_hdissip.F
>> it was fine.
>>
>> Jean-Michel
>>
>> On Fri, Jun 08, 2007 at 12:08:18PM -0400, Patrick Heimbach wrote:
>>> Update of /u/gcmpack/MITgcm/pkg/mom_vecinv
>>> In directory forge:/tmp/cvs-serv3669
>>>
>>> Modified Files:
>>> 	mom_vi_hdissip.F
>>> Log Message:
>>> Clean up some AD-related issue.
>>>
>>> _______________________________________________
>>> MITgcm-cvs mailing list
>>> MITgcm-cvs at mitgcm.org
>>> http://mitgcm.org/mailman/listinfo/mitgcm-cvs
>> _______________________________________________
>> MITgcm-devel mailing list
>> MITgcm-devel at mitgcm.org
>> http://mitgcm.org/mailman/listinfo/mitgcm-devel
>
> ---
> 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
>
>
> _______________________________________________
> MITgcm-devel mailing list
> MITgcm-devel at mitgcm.org
> http://mitgcm.org/mailman/listinfo/mitgcm-devel

---
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