[MITgcm-devel] Re: [MITgcm-cvs] MITgcm/model/src CVS Commit

[Jean-Michel Campin]

Hi Dimitris,

All the tested exp fail to compile on edvir, because of a type mismatch 
(missing _d 0, but probably better to declare a _RL variable "one"):
>        cat plumefrac.F | ../../../tools/set64bitConst.sh |  /lib/cpp 
> -P -DALLOW_USE_MPI -DALWAYS_USE_MPI -DTARGET_AIX -DWORDLENGTH=4 -DNML_TERMINATOR 
> -DALLOW_USE_MPI -DALWAYS_USE_MPI -DHAVE_SYSTEM  -I/usr/lpp/ppe.poe/include/thread64
> -I/edvir1/soft/netcdf-3.5.1/64/include > plumefrac.f
>        mpxlf95_r -q64 -qfixed=132 -O3 -qstrict -qarch=pwr4 -qtune=pwr4 
> -qcache=auto -qmaxmem=-1 -c plumefrac.f
> xlf95_r: 1501-245 Warning: Hard ulimit has been reduced to less than RLIM_INFINITY.
> There may not be enough space to complete the compilation.
> "plumefrac.f", line 375.38: 1513-041 (S) Arguments of the wrong type were specified
> for the INTRINSIC procedure "min".
> ** plumefrac   === End of Compilation 1 ===
> 1501-511  Compilation failed for file plumefrac.f.

The other thing is that an #ifdef ALLOW_SALT_PLUME could
be added at the beginning of this S/R , no ?

And still thinking that the whole SaltPlume would be better in
pkg/seaice rather than in the main model (common blocks, initialisation
... etc).

Jean-Michel

On Fri, Sep 21, 2007 at 11:11:03PM -0400, Dimitris Menemenlis wrote:
> Update of /u/gcmpack/MITgcm/model/src
> In directory forge:/tmp/cvs-serv15396/model/src
> 
> Modified Files:
> 	external_forcing.F external_forcing_surf.F ini_forcing.F 
> 	ini_mnc_vars.F 
> Added Files:
> 	plumefrac.F 
> Log Message:
> Committing An Nguyen's modifications to SALT_PLUME code.  This includes
> addition of a saltPlumeFlux array to FFIELDS and of routine plumefrac.F
> 
> _______________________________________________
> MITgcm-cvs mailing list
> MITgcm-cvs at mitgcm.org
> http://mitgcm.org/mailman/listinfo/mitgcm-cvs