[MITgcm-devel] [MITgcm-cvs] MITgcm/pkg/ecco CVS Commit

[Jean-Michel Campin]

Hi Patrick,

Since this was checked-in, all the AD tests that use ecco pkg
(i.e., lab_sea & offline_exf_seaice) are not compiling anymore.
on faulks with g77 (Feb 07 ad testing):
> g77 -Wimplicit -Wunused -mfpmath=sse -msse -msse2  -O0 -malign-double -c ad_taf_output.f
> ad_taf_output.f: In subroutine `adcost_generic':
> ad_taf_output.f:15543:
>            localmask(:,:,:,:,:) = maskc(:,:,:,:,:)
>            1         2
> Null element at (1) for array reference at (2)
and many more errors about localmask.

Could you fix this ?
Thanks,
Jean-Michel

On Fri, Feb 05, 2010 at 09:43:03PM -0500, Patrick Heimbach wrote:
> Update of /u/gcmpack/MITgcm/pkg/ecco
> In directory forge:/tmp/cvs-serv20344
> 
> Modified Files:
> 	cost_averagesfields.F cost_averagesinit.F cost_bp.F 
> 	cost_gencost_all.F cost_generic.F cost_hyd.F 
> 	cost_mean_heatflux.F cost_mean_saltflux.F ecco_ad_diff.list 
> 	ecco_cost.h ecco_cost_final.F ecco_cost_init_barfiles.F 
> 	ecco_cost_init_varia.F ecco_readparms.F 
> Added Files:
> 	cost_gencost_assignperiod.F cost_gencost_customize.F 
> Log Message:
> Preparing usage of generic cost function terms.
> Enable with CPP option 
> #ifdef ALLOW_GENCOST_CONTRIBUTION
> First usage is adding air-sea flux constraints when using bulk controls.
> ---> NOT YET READY FOR PRIME TIME <---
> 
> 
> _______________________________________________
> MITgcm-cvs mailing list
> MITgcm-cvs at mitgcm.org
> http://mitgcm.org/mailman/listinfo/mitgcm-cvs