[Mitgcm-support] 'models/MITgcmUV/model/inc' CVS Commit

[mitgcm-support at dev.mitgcm.org]

Update of /u/gcmpack/models/MITgcmUV/model/inc
In directory bronte.lcs.mit.edu:/tmp/cvs-serv3972/model/inc

Added Files:
      Tag: pre38
	SOLVE_FOR_PRESSURE.h 
Log Message:

Changes to restore/introduce true shared memory (i.e. pure SMP model) support
for lat-lon, cartesian and cube.

 o Threads support restored for global_sum, global_max.
   Needed COMMON blocks in place of stack variables
   for work space.

 o COMMON added for temps that are exchanged
   shap_filt, solve_for_pressure

 o exch...template edits to allow multithreaded calling
   of cube exchanges. Cube exchanges are done single threaded,
   sequential at the moment and are hard coded for six-tile,
   one tile per face configuration.

 o Threading support only tested on Sun SMP (6500) system.

 o Default is SYSTEM() exists (check_threads.F), and barrier and memsync
   are used for threaded exchanges (ini_communications_patterns).

 o Killed K-level plot (ini_masks_etc.F). Overlaps not set in
   multi-threads (local array), so fails in plot_field().

 o Fixed t-ave of phihyd ( DYNAMICS() ). Can only do it for
   first tile.

 o Added commented out nTx settings to hs94.cs-32x32x5 eedata.
   #nTx=2
   #nTx=3
   #nTx=6
   Need to activate for setenv PARALLEL

 o Multi-threaded pickup is 100% validated.

Testing notes

 o Code passes "testscript" tests.

 o To get "hs94.cs-32x32x5" to run OK need to patch
   dynamics.F. Patch is in hs94.cs-32x32x5/code/dynamics.patch.

 o Multithreading only tested on Sun 6500 SMP for hs94.cs and
   hs94.128. hs94.128 was OK at c37 but has a problem under multi-threading
   at pre38 at the moment.

 o Under Solaris need one of
   setenv PARALLEL 2
   setenv PARALLEL 3
   setenv PARALLEL 6
   setenv PARALLEL 8  ( hs94.128 only )
    - and -
   setenv STACKSIZE 16384


 o Under Solaris f77 need to remove -u from Makefile FOPTS for compiling
   fftpack.o. Need to declare everything in fftpack or have
   custom compile options for fftpack.F to fix this.