Thursday 7 Febrary 2013
--------------------------------
*****************************************************************************************************
   
       Ping Du's modification for Guillimin 

*****************************************************************************************************
abal.ftn : remove some old subroutine.
ainmi_pc.ftn: remove some old subroutine.
ainmi_P.ftn: remove some old subroutine.
ainmi_soldiv.ftn: remove some old subroutine.
ainmi_tend0.ftn: remove some old subroutine.
getobstag.ftn: remove multi-'SC'
inmi_P.ftn: remove some old subroutine.
labl.ftn: remove some old subroutine.
mxmaopl.ftn: remove some IBM machine subroutine.
openinc.ftn: modify the format.
ptopo.ftn90: print.
ptotla_1.ftn: write number.
vllacar.ftn: remove IMPLICIT NONE at wrong place
gd2mvoad.ftn: modify rpn_comm_allreduce.
restorecma.ftn: modify rpn_comm_allreduce.
restoreMasks: modify rpn_comm_allreduce.
stat_avhrr.ftn90: remove NVIS NIR defination

Tuesday 16 August 2010
----------------------

**********************************************************************************************************
 
       Luc Fillion's modifications  + Chantal Cote & Nicolas Wagneur (MHS) (see brpacma.ftn, cmaabrp.ftn)
 
**********************************************************************************************************
Update on:    v_11.0.1B
 
1. New features for the REG-LAM3d background error statistics computations and diagnostics.
2. Allows regional analysis to be performed on a rotated Gaussian grid (useful for regional 4dvar)
3. Improve the analysis in 'LU' mode.
4. Start incorporating Implicit Normal Mode Initialization (INMI)
5. Cosmetic changes for some subroutines.
6. Include analysis of Tg for the regional system
7. Include better output at the end of 3dvar (replace varout.ftn in regional lcva_hemis mode and 'LU' mode)
8. Allows Hemispheric Spectral Transforms.
*9. **inserted the EC LICENCE tag in each subroutine.
 


 Modified Subroutines (87)
 -------------------------


apreobs.ftn       : Revision: L. Fillion *ARMA/EC  10 Feb 2010 - Conditionally calls att2phi
bgcheck.ftn       : Revision: L. Fillion ARMA/EC May 2010 - Prepare for different sigmaop.ftn if rotated mode.
brpacma.ftn       :  *       . Luc Fillion & S. Heilliette - ARMA/EC - 9 Aug 2010 - Incorporate Cote & Wagneur's modifs below,
                originally incorporated in v_10_4_0 & v_10_5_0 but forgotten in MPI version v_11_01B:
               . C. Cote *MSC/CMDA Jan 2010
                 - Modifier la conversion de NVCORD pour les plateforme
                   tovs en utilisant seulement l'instrument comme test.
               . N. Wagneur *MSC/CMDA Jul 2010
                 - Modifier la lecture du numero d'instrument pour
                   inclure un test sur la valeur de l'element.
corrlengthla.ftn  : Revision: Luc Fillion - ARMA/EC - 31 May 2010 - Output correlation scales on file for scientific paper.
cse1glb.ftn       : L. Fillion - ARMA/EC - May 2010 - Limit printout to root.
cse1la.ftn        : Revision: Luc Fillion - 21 May 2010 - Clean and standardize steps w.r.t cse1glb.
                    Printout limited to root.L. Fillion - ARMA/EC - May 2010 - Limit printout to root.
denorm.ftn        : Luc Fillion - ARMA/EC 20 May 2010 - Update on MPI version and improve documentation and conditional printing.
ecr_gu.ftn        : Luc Fillion - ARMA/EC - May 2010: Comment output of zonal fields since not needed in advanced VAR anymore.
geterr.ftn        : L. Fillion ARMA/EC - 29 Jan 2010 - Improve coding structure.
                    L. Fillion ARMA/EC - 12 May 2010 - Limit printout to root.
getfldprm.ftn     : L. Fillion - ARMA/EC - 9 FEB 2010 - Cosmetic.
getfldprm2.ftn    : L. Fillion - ARMA/EC - 9 FEB 2010 - Cosmetic.
getfstg2.ftn      : L. Fillion *ARMA/EC 11 Feb  2010 - Include rotated Gaussian grid option via grd_roule parameter.
                    L. Fillion *ARMA/EC 11 Feb  2010 - Introduce isgid,iuugid,ivvgid & Cosmetic changes.
getfstgla.ftn     : L. Fillion  *ARMA/EC - 17 Jul 2009. Introduce lcva_3db
                    L. Fillion  *ARMA/EC - 20 may 2010. 3 Char vrbl in maxmin call.
hcorla.ftn        : Luc Fillon - ARMA-EC - May 2010 - Ensure all variables and all vertical levels properly set-up.
hcorla_simul0.ftn : Luc Fillon - ARMA-EC - 20 May 2010 - Simplify for P0 and TG.
initgdla.ftn      : L. Fillion  - ARMA/EC - 2 Feb 2010 - Introduce interp_uv_la.ftn
                    L. Fillion  - ARMA/EC - 28 May 2010 - Introduce argument ldfilt.
                                - Remove useless array pwrk3d.
interp_uv_la.ftn  :  L. Fillion  - ARMA/EC - 2 Feb 2010 - Specific sub. adjusting input winds in 'LU' mode.
lpreobs.ftn       :  L. Fillion  - ARMA/EC - 10 Feb 2010 - Conditionally calls ltt2phi
mach2.ftn         :  L. Fillion  - ARMA/EC - May 2010 - More printout in case of problems.
meancvgd.ftn      :  L. Fillion - 27 Jan 2010 - Reduce considerably the amount of arrays needed so as to allow very high res. analysis.
meancvgd_glb1.ftn : Luc Fillion - ARMA/EC - May 2010 - Clean the dode a bit.
minimize.ftn90    :  L. Fillion - 30 Jun 2010 - Avoid call to cprob8to4  and printout hdr. in 1-Obs case.
newbilin.ftn      :  *  Revision: Luc Fillion - ARMA/EC - 7 Oct 2009 - gd2mvogen is more general than gd2mvo in terms of allowed grid.
                               The use of gd2mvo is kept for historical reasons in grd_typ = 'GU' mode
                               Gaussian grid with non-rotated poles. Old gd2mvo_la.ftn is renamed gd2mvogen.ftn
                               and used for GENeral cases.
                    *  Revision: Luc Fillion - ARMA/EC - 11 May 2010 - Limit printout toroot.
newbilinad.ftn    : *  Revision: Luc Fillion - ARMA/EC - 8 Oct 2009 - gd2mvogenad is more general than gd2mvoad in terms of allowed grid.
                                        The use of gd2mvo is kept for historical reasons in grd_typ = 'GU' mode
                                        Gaussian grid with non-rotated poles. Old gd2mvoad_la.ftn is renamed gd2mvogenad.ftn
                    *  Revision: Luc Fillion - ARMA/EC - 11 may 2010 - Limit printout to processor 0.
oda_L.ftn90       : ! Luc Fillion - ARMA/EC - 17 Jul 2009 - Introduce lcva_3db for 3dvar-fgat-TL-INMI.
                    ! Luc Fillion - ARMA/EC - 18 Nov 2009 - Introduce rotated Gaussian grid option and gd2mvogenad...
oda_LT.ftn90      :  Luc Fillion - ARMA/EC - 17 Jul 2009 - Introduce lcva_3db for 3dvar-fgat-TL-INMI.
                    ! Luc Fillion - ARMA/EC - 18 Nov 2009 - Introduce rotated Gaussian grid option and gd2mvogenad...
                    ! Luc Fillion - ARMA/EC - 5 May 2010 - Upgrade regional development to v_11_01_2b:
                    !                         - Change logical parameters and introduce general gd2mvogenad.
oda_sqrtB.ftn90   :  !  L. Fillion ARMA/EC 13 Jul 2009: Introduce cv2spgl for lcva_hemis .true.
oda_sqrtBT.ftn90  :  ! Luc Fillion - ARMA/EC - 13 Jul 2009 - Hemispheric mode implementation.
                     ! Luc Fillion - ARMA/EC - 11 May 2010 - Limit printout to processor 0.
oda_sumJo.ftn     :  ! Luc Fillion - ARMA/EC - 13 Jul 2009 - Hemispheric mode implementation.
                     L. Fillion, ARMA/EC, 11 May 2010. Limit printout to processor 0.
                     L. Fillion, ARMA/EC, 20 May 2010. Relocate call to restore_robdata8
		           and correct bug ROBDATA8(NCMOMI,JDATA)
postmin.ftn       :   L. Fillion ARMA/EC Oct 2009 - Include global rotated grid option. Rewrite varout.ftn for rotated regional and 'LU' mode
                      L. Fillion ARMA/EC 4&20 May 2010 - Upgrade to v_11_01b. Skip
                      some preliminary obs-space treatment below when in l1obs mode.
                      Improve output of HU field.
prep_fcst_diff.ftn:   L. Fillion - ARMA/EC - 27 Jan 2010 - Clean-up.
                       L. Fillion - ARMA/EC - 4 Feb 2010 - Replace call to su1cse1.ftn by su1cse1la.ftn
prep_fcst_diff_1.ftn :  L. Fillion *ARMA/EC 23 Apr 2009 - Extend to allow interpolation onto target inner-lam4d grid.
                        L. Fillion *ARMA/EC 28 Jan 2010 - Introduce ip2min,ip2max to allow various possibilities of NMC-Lagged fcsts.
prep_helmglb.ftn  :   L. Fillion - ARMA/EC - 11 Mai 2010 - Introduce MPI based on v_11_01b.
prep_helmglb1.ftn :  L. Fillion - ARMA/EC - 11 Mai 2010 - Introduce MPI based on v_11_01b.
preproc.ftn       : *    L. Fillion - ARMA/EC 17 Jul 2009 - Introduce lcva_3d to perform TLNNMI (cf. Fillion et al. 2007 -ECMWF workshop).
                    *    L. Fillion - ARMA/EC 17 Jul 2009 - Upgrade to v_11_01_2b.
ptotla_1.ftn      :  * Luc Fillion - ARAM/EC - 28 May 2010 - Introduce argument ldfilt into initgdla.ftn
readcornsgl.ftn   : Luc Fillion - 7 Jul 2010 - Improve reading conditions of CORNS or CORNSLOC.
readcorns_min.ftn : Luc Fillion - 13 may 2010: Limit printout to processor 0.
readcv_gusdev.ftn : Luc Fillion - 30 Nov 2009 - Use total st-dev present on stats file in mbal_order = 0 mode.
readcv_gusdev_gl.ftn : Luc Fillion - *  L. Fillion  *ARMA/EC - 27 oct 2009 - Include rotated global analysis grid option.
                                                               and scaling for w.r.t ntrunc used.
readcvsdev.ftn    : *Revision: Luc Fillion - ARMA/EC - 13 May 2010 - Adjust magnitude of simulated st-dev in 'LU' mode
                        *                        and simulated context.
readnml.ftn       : *Revision: Luc Fillion - May 2010 - Removal of comgrd2.cdk.
reespe.ftn        :  L. Fillion ARMA/EC 11 May 2010 - Limit printout to processor 0.
reespe_la.ftn     :  * L. Fillion -ARMA/EC - 24 Feb 2010 - Reduce memory requirements.
reespepar.ftn     : L. Fillion ARMA/EC  11 May 2010 - Limit printout to processor 0.
sigmaop.ftn       : Luc Fillion *ARMA/EC - Feb 2010 -
                   . Include Rotated  Gaussian grid option in lcva_hem mode and include Hemispheric case.
simvar.ftn        : Luc Fillion *ARMA/EC - 11 May 2010. Limit writing diagnostics to processor 0.
spcorrla.ftn      : Luc Fillion *ARMA/EC - !   L. Fillion - May 2010 - Improved according to preliminary
                    Helmholtz's precomputation error samples in previous steps of
                    statistics computations. Clean up of the code. Adjusted withe new initgdla.ftn
spcorrglb1.ftn    : Luc Fillion *ARMA/EC - 18 Jun 2010.- Introduce a specific subroutine to perform symmetrization of GD0 about the equator.
spgdapar.ftn      : . L. Fillion ARMA/EC 11 May 2010 - Limit printout to processor 0.
spgdapar.ftn      : *     . L. Fillion ARMA/EC 11 May 2010 - Limit printout to processor 0.
sptruncr.ftn      :! Revision: Luc Fillion - EC/CAN - 26 May 2010. - Simple update at level v_11_01b.
stdev_cv_la.ftn   : !       L. Fillion - May 2010 - Comment call to test subroutine.
stdevout.ftn      : * L. Fillion - ARMA/EC - 19 Mar 2010 - Include Tg.
su0yoma.ftn       : *        L. Fillion ARMA/EC  8 Oct 2009 - Allow sugrdpar to be called when grd_roule = .true.
                       L. Fillion ARMA/EC  4 May 2010 - Remove external sumode
su0yomb.ftn       :   L. Fillion ARMA/EC  19 Oct 2009 - Call to sugrdgauss.ftn for Rotated Gaussian analysis grid.
                    L. Fillion ARMA/EC  12 Nov 2009 - Include INMI option.
                    L. Fillion ARMA/EC  4 May 2010 - Upgrade to v_11_01_2b.
su1cse1glb.ftn    :   L. Fillion ARMA/EC - May 2010 - Printout of lhemis and lnorth.
su1cse1la.ftn     :   L. Fillion ARMA/EC - 28 Jun 2010 - Better check on mflt_trunc w.r.t ntrunc.
su1obs.ftn        : L. Fillion - ARMA/EC - 17 Jul 2009.  - Introduce lcva_3db.
su1obsbg.ftn      : * Luc Fillion - ARMA/EC - 13 Oct 2009 - Include rotated Gaussian global grid option.
                    Luc Fillion - ARMA/EC - 10 Feb 2010 - Write utg,ttg profile.
suallo.ftn        : *     L. Fillion   ARMA/EC - 12 Oct 2009 - Generalise according to grd_roule rather than grd_typ .eq. 'LU'
                   L. Fillion   ARMA/EC - 4 May 2010 - Upgrade on v_11_01_2b.
                   L. Fillion   ARMA/EC - 13 May 2010 - Introduce Hemispheric spectral transforms.
sualobs.ftn       : L. Fillion ARMA/EC - 09 Oct 2009 - Allocate obs arrays for fast rotations now based on grd_roule parameter.
                    L. Fillion ARMA/EC - 4 May 2010 - Upgrade on v_11_01_2b.
subasic_gd.ftn    : !Revision: L. Fillion - ARMA/EC - May 2010 - Improve printout. Improve check on content of 
                            moisture field before leaving the subroutine to ensure it is OK.
sucov.ftn         : L. Fillion ARMA/EC  - Initializes the analysis Background term for the specific analysis configuration used.
                    (from v_11_01B sucov.ftn. Refer to it for historic of upgrades).
sucovla.ftn       : Luc Fillion - ARMA/EC May 2010 - Transfer cal to simulated stdev to sustatsla.ftn
sucva.ftn         :  L. Fillion - ARMA/EC -  9 Oct 2009 - Introduce rotated Gaussian grid in grd_typ='GU' mode.
                    - Validate 1obs option on v_10.3.3
                    L. Fillion - ARMA/EC -  13 Oct 2009 - Remove call to readptot_simul.ftn
                    L. Fillion - ARMA/EC -  12 Nov 2009 - Add option for INMI.
                    L. Fillion - ARMA/EC - 4 May 2010 - Relocate 1obs code to adapt to MPI version (Obs).
sudim.ftn         : . L.Fillion - ARMA/EC - 26 Oct 2009 - Initialize nila,njla also when grd_roule = .true.
                   . L.Fillion - ARMA/EC - 12 Nov 2009 - Introduce lcva_3db to perform 3dvar fgat using TL-INMI.
                   . L.Fillion - ARMA/EC - 19 Nov 2009 - Enforce grd_roule = .false. for nconf.ne.141 until further development of bgcheck.
                   . L.Fillion - ARMA/EC - 30 Nov 2009 - Read NAMGRD to get grd_dx, grd_dy to set max. nb. of bi-fourier bands.
                                            also: use ntrunc to define the spectral dimensions used.
                   . L.Fillion - ARMA/EC - 4 May 2010 - Upgrade on v_11_01_2b. 
                   . L.Fillion - ARMA/EC - 13 May 2010 - Introduce Hemispheric spectral transform.
                   . L.Fillion - ARMA/EC - 20 May 2010 - Correct weakness no mni_mach,mnj_mach specification. Lower bounds now ensured.
sudxdy_lu.ftn     : L. Fillion - ARMA/EC - 27 Jan 2010 - Comment printout.
sufftla.ftn       : L. Fillion - ARMA/EC - 
sugem.ftn         :  *     .  L. Fillion - ARMA/EC - 28 Jan 2010 - Improve printout.
sugemla.ftn       : *: Luc Fillion - ARMA/EC CAN - 27 Jan 2010. Remove call to sudxdy_lu. Done previously in sugrdlam.ftn
sugrd_param.ftn   : L. Fillion ARMA/EC 8 Oct 2009: Initializes rotation parameter of Global grid or LAM grid etc.
sugrdlam.ftn      : *     L. Fillion ARMA/EC 2 Nov 2009 - Correct documentation on reference to cxgaig.ftn
sugrdlam2.ftn     : L. Fillion ARMA/EC May 2010 - Flag if grids 1 and 2 are identical so as to avoid interpolations etc.
sugrdpar.ftn      : L. Fillion ARMA/EC 8 Oct 2009 (Yes really 8 Oct !): Set rotation matrix in Global option too.
sugrdpar2.ftn     : L. Fillion ARMA/EC - May 2010 - Slight improvement in printout.
suimp.ftn         : L. Fillion ARMA/EC - 21 Jun 2010 - Limit printout to root.
sumode.ftn        : L. Fillion *ARMA/EC  27 Apr 2007 & May 2010 (implementation into v_11_01b). Initialize NL and TL timesteps for INMI.
suobs_sim.ftn     : Luc Fillion - ARMA/EC - Oct 2009 - Introduce rotated global analysis grid option.
                    Luc Fillion - ARMA/EC - 19 May 2010 - Introduce mbin1obs.
suobsgid.ftn      : L. Fillion ARMA/EC 4 May 2010: Upgrade on v_11_01_2b.
supost.ftn        : L. Fillion ARMA/EC 4 Nov 2009: mdimppcvar(nppcnvar) contains the nb. vert. levels output for each cppcvar(jvar)...
                    L. Fillion ARMA/EC 31 May 2010: Improve output of LQ and HU.
suprep.ftn        : L. Fillion *ARMA/EC- 7 Oct 2009 - Include Rotated global Gaussian grid option.
                    L. Fillion *ARMA/EC- 4 May 2010 - Update on v_11_01_2B.
sustatsgl.ftn     : L. Fillion ARMA/EC 24 Mar 2010 - Call to sutg.ftn to initialize tg st-dev.
                       Only Grd_typ = 'GU' option supported for the moment.
                       Include  CALL READNML('NAMPSTAT',IERR)
sustatsla.ftn     : L. Fillion ARMA/MSC 31 May 2010: Writing corrlength for root processor only.
suwvnb_rpn.ftn    : Initializes RPN 2D DFT spectral components counters and wavenumbers
varout.ftn        :  L. Fillion - ARMA/EC - 7 Jun 2010 - Restric output of GZ to
                     lowest level for Topography. Let the model build its GZ from analysis TT,q
vhfstfld.ftn      :  L. Fillion, ARMA/EC, May 2010 - Slight improvement in printout
writecornsglb.ftn : L. Fillion *ARMA/EC 7 Aug 09 - Write ASCI file of desired corr block for publication.


 Modified comdecks (12)
 -----------------

com1obs.cdk      : L. Fillion - ARMA/EC - 19 May 2010 - Introduce mbin1obs.
comcva.cdk       : L. Fillion - ARMA/EC May 2010 - Add lcva_3db, lcva_hsp
comgemla.cdk     : Luc Fillion - ARMA/EC 2 Nov 2009 - Include grd_u_x_8, grd_v_y_8.
comgemla2.cdk    : Luc Fillion - ARMA/EC Improve naming of dimensions.
comgrd2.cdk      : Luc Fillion - ARMA/EC May 2010 - Introduce lsame_grid12.
comgrd_param.cdk : Luc Fillion - ARMA/EC May 2010 - Introduce Grid 2 parameters associated to NAMGRD2.
compost.cdk      : L. Fillion ARMA/EC 4 Nov 2009: mdimppcvar(nppcnvar) contains the nb. vert. levels output for each cppcvar(jvar).
nam1obs.cdk      : L. Fillion ARMA/EC May 2010 - Introduce mbin1obs.
namcva.cdk       : *     . L. Fillion  *ARMA/EC 17 Jul 2009
                     - lcva_3db   : .TRUE. Perform 3D-Var FGAT agremented by a TL-INMI balance approach.
                 . L. Fillion  *ARMA/EC 17 May 2010
                    - lcva_hsp   : .TRUE. Hemispheric spectral transform
namdim.cdk       : L. Fillion  *ARMA/EC May 2010 - Include grd_roule in the list.
namgrd.cdk       : L. Fillion  *ARMA/EC May 2010 - Include parameters of namgrd2 
namodel.cdk      : L. Fillion  *ARMA/EC 



 --------------------
 New subroutines (56)
 --------------------

aUV2zdg_c.ftn   : Adjoint of UV2zdg_c.ftn. Used by INMI approach.
abal0.ftn       : Adjoint of lbal0. Used by INMI approach.
abalgl.ftn      : Adjoint of lablgl. Used by INMI approach.
acv2gdgl.ftn    : Adjoint of cv2gdgl.ftn
acv2spgl.ftn    : Adjoint of cv2spgl.ftn
ainmi_Chi.ftn   : Adjoint of inmi_Chi.ftn
ainmi_P.ftn     : Adjoint of inmi_P.ftn
ainmi_pc.ftn    : Adjoint of inmi_P.ftn
ainmi_ptend.ftn : Adjoint of inmi_ptend.ftn
ainmi_soldiv.ftn: Adjoint of inmi_soldiv.ftn
ainmi_tend0.ftn : Adjoint of inmi_tend0.ftn
avtapgd.ftn     : Adjoint of vtapgd.ftn
bilin_sigmab.ftn: Horizontal bilinear interpolation of "sigmab" in grid-point space to observation points.
bld_zd.ftn      : Shell controlling the passage from uv to zd.
cv2spgl.ftn     : Luc Fillion - ARMA/EC - To be used instead of spa2sp.ftn when Hemispheric spectral transform is validated.
cv2gdgl.ftn     : Luc Fillion - ARMA/EC - To be used instead of spa2sp.ftn when Hemispheric spectral transform is validated.
gd2mvo_1obs.ftn : Luc Fillion - ARMA/EC - 
gd2mvoad_1obs.ftn : Luc Fillion - ARMA/EC - 
gd2mvogen.ftn   : Luc Fillion - ARMA/EC - Unified gd2mvo for all grd_typ.
gd2mvogenad.ftn : Luc Fillion - ARMA/EC - Unified gd2mvoad for all grd_typ.
gdsppar_hem.ftn : Luc Fillion - ARMA/EC -  Hemispheric spectral transform of the model state 
initpc.ftn      : Luc Fillion - ARMA/EC - Shell controlling computation of pc from zd
inmi_Chi.ftn    : Luc Fillion - ARMA/EC - Compute the balanced increment of chi field.
inmi_P.ftn      : Luc Fillion - ARMA/EC - Compute the balanced increment of P field.
inmi_pc.ftn     : Luc Fillion - ARMA/EC - Controls the computation of initialized (psi,chi) analysis increments.
inmi_ptend.ftn  : Luc Fillion - ARMA/EC - From input time-tendencies of (Vort,Div,TT,lnps),
                                          computes vertically projected time-tendencies required by INMI scheme.
                                          i.e.: d(Vort,Div,P)/dt (on vertical normal modes).
                                          ref: Temperton, C., M. Roch, 1991: Implicit Normal Mode Initialization
                                          for an Operational Regional Model, MWR 119, 667-677.
                                          See p. 670. eqn. (3.1).
inmi_soldiv.ftn : Luc Fillion - ARMA/EC - Solves for del(div) corrections in vertical normal mode space.
                                          Ref.: Temperton & Roch (1991).MWR 116, 667-677.
                                          Input pp,pvort are in vertical mode space.
inmi_tend0.ftn : Luc Fillion - ARMA/EC -  Computes time-tendencies required by INMI scheme.
                                          i.e.: d(Vort,Div,T,lnps)/dt
                                          ref: Temperton, C., M. Roch, 1991: Implicit Normal Mode Initialization
                                          for an Operational Regional Model, MWR 119, 667-677.
                                          See p. 670. before eqn. (3.1).
invlapscal.ftn  : Luc Fillion - ARMA/EC - Inverse Laplacian of 3d field.
lap_euclid.ftn  : Luc Fillion - ARMA/EC - Laplacian assuming small enough grid extension to neglect sphericity.
lapscal.ftn     : Luc Fillion - ARMA/EC - Controls lap_euclid.ftn application.
lbal0.ftn       : Luc Fillion - ARMA/EC - Balance fields. In: (Psi,Chiu,Tu,q,psu); Out: (Psi,Chi,T,q,ps)
lbalgl.ftn      : Luc Fillion - ARMA/EC - Balance fields for regional hemispheric spectral approach.
legdir3_hem.ftn : Luc Fillion - ARMA/EC - 
leginv3_hem.ftn : Luc Fillion - ARMA/EC - 
reespe_hem.ftn  : L. Fillion - ARMA/EC - 13 May 2010. Hemispheric Spectral Transform for a number of scalar fields
reespepar_hem.ftn : - L. Fillion - ARMA/EC - 13 May 2010. Hemispheric Spectral Transform for a number of scalar
sigmaopgl.ftn   : Author  : Luc Fillion - Grdtyp = 'GU', lcva_hemis = .true. : For Regional system.
                          N.B.: Amplification factor totally discarded here.
sim_cv_gusdev_gl.ftn : Author  : Luc Fillion - 9 Feb 2010. Simulated background st-dev in 'GU', lcva_hemis mode.
sim_cv_gusdev_la.ftn : Author  : L. Fillion  *ARMA/EC - 2 Mar 2010.
                                 Simulated background st-dev in 'LU'.
				 Scale according to Helmholtz or not.
speree_hem.ftn  : Luc Fillion *ARMA/EC - 13 May 2010. Hemispheric inverse spectral transform for a number of scalar fields
spereepar_hem.ftn : Luc Fillion *ARMA/EC - 13 May 2010. -Hemispheric version of spereepar.ftn
spgda_uv.ftn    : Luc Fillion *ARMA/EC - 
spgdapar_hem.ftn : Luc Fillion *ARMA/EC - 
sppar_hem.ftn   : L. Fillion - ARMA/EC - 14 May 2010. Hemispheric Inverse spectral transform(PARALLEL LOOP)
sqrtcgl.ftn     : For grd_typ = 'GU, lcva_hemis = .true.: Sqrt(C) * increment(control variable)
subg_glb.ftn    : Luc Fillion - ARMA/EC - 6 Aug 2010 - Initializes the Global analysis Background term.
subg_lam.ftn  : Luc Fillion - ARMA/EC - 6 Aug 2010 - initialize the LAM (Regional or Local) analysis Background term.
sugrdgauss.ftn  : L. Fillion ARMA/EC 19 Oct 2009 - Defines RPN positional parameters (>>,^^) of a Rotated Gaussian computational grid.
suobsgid_1obs.ftn : L. Fillion *ARMA/EC  19 May 2010 - initialize observation Y grid handle.
sutg_cor.ftn    : L. Fillion *ARMA/EC  
sutg_sdev.ftn   : L. Fillion *ARMA/EC  
sym_hemis.ftn   : L. Fillion *ARMA/EC  18 Jun 2010. - Symmetrize GD w.r.t equator. Keep NH info.
tsp_hemis.ftn   : Test Hemispheric global spectral transform.
varouthigh.ftn :  Luc Fillion - ARMA/EC - sept 2009 Output analysis increments and analysis fields at high (trial) resolution
                      onto RPN standard file.
	   	 !Revision: Luc Fillion - ARMA/EC - 31 May 2010 - Extend to allow grd_typ= 'LU' mode.
varoutlow.ftn   :  Luc Fillion - ARMA/EC - sept 2009 Output analysis increments at analysis resolution onto RPN standard file.
                  Luc Fillion - ARMA/EC - 31 May 2010 - Extend to allow grd_typ= 'LU' mode.
write_fld.ftn  :  L. Fillion - ARMA/EC - 24 Apr 2007 (and implemented onto v_11_01b , Jul 2010).
                  Revision: L. Fillion - ARMA/EC - 5 May 2008 - Introduce file flexibility through kfile,kip3, arguments.
                  N.B.: It is assumed the RPN std file kfile has previously been declarted and opened.


 -----------------
 New comdecks (1)
 -----------------

namodel.cdk       : L. Fillion  *ARMA/EC - Feb 2002 but Included in v_11_01b in May 2010.