[MITgcm-devel] tutorial_global_oce_optim

[Patrick Heimbach]

PS:
It's probably in
code_ad/cost_weights.F
block
        open(gwunit, file='Err_levitus_15layer.bin',
      &               status='old', form='unformatted',
      &     access = 'sequential'   )
        read(gwunit) (wti(k), k=1,nr)
        close(gwunit)

Not sure (but don't think) unformatted sequential I/O is portable
across ia32 and ia64 (size of trailing COS blocks).
Might be worth changing to direct access (as usual).

-p.

On Jun 21, 2008, at 10:21 AM, Patrick Heimbach wrote:

>
> Hi David,
>
> I fixed a few things in this verif.,
> one of which was related to my changes yesterday (TAF -nonew_arg).
> When I try to run it on ross or weddell I am getting a weird crash
>
> apparent state: unit 9 named Err_levitus_15layer.bin
> lately reading sequential unformatted external IO
> Abort
>
> This problem does *not* occur on faulks.
> So looks like some compiler-dependent piece of code.
>
> Cheers
> -Patrick
>
> ---
> 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

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