/[MITgcm]/MITgcm/pkg/ecco/ecco_cost.h
ViewVC logotype

Diff of /MITgcm/pkg/ecco/ecco_cost.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.30 by jmc, Tue Oct 9 00:02:51 2007 UTC revision 1.31 by gforget, Sat Feb 2 02:34:14 2008 UTC
# Line 308  c     objf_scatym - time-mean meridional Line 308  c     objf_scatym - time-mean meridional
308  c     objf_scatx  - zonal SCAT  contribution  c     objf_scatx  - zonal SCAT  contribution
309  c     objf_scaty  - meridional SCAT  contribution  c     objf_scaty  - meridional SCAT  contribution
310  c     objf_kapgm  - kappa GM contribution  c     objf_kapgm  - kappa GM contribution
311    c     objf_kapredi  - kappa REDI contribution
312  c     objf_diffkr - diffusion contribution  c     objf_diffkr - diffusion contribution
313  c     objf_theta_ini_fin - final vs. initial theta misfit  c     objf_theta_ini_fin - final vs. initial theta misfit
314  c     objf_salt_ini_fin  - final vs. initial salt misfit  c     objf_salt_ini_fin  - final vs. initial salt misfit
# Line 410  c                  function contribution Line 411  c                  function contribution
411       &                objf_curmtr,       &                objf_curmtr,
412       &                objf_ageos,       &                objf_ageos,
413       &                objf_kapgm,       &                objf_kapgm,
414         &                objf_kapredi,
415       &                objf_diffkr,       &                objf_diffkr,
416       &                objf_theta_ini_fin,       &                objf_theta_ini_fin,
417       &                objf_salt_ini_fin,       &                objf_salt_ini_fin,
# Line 508  c                  function contribution Line 510  c                  function contribution
510        _RL  objf_curmtr(nsx,nsy)        _RL  objf_curmtr(nsx,nsy)
511        _RL  objf_ageos(nsx,nsy)        _RL  objf_ageos(nsx,nsy)
512        _RL  objf_kapgm(nsx,nsy)        _RL  objf_kapgm(nsx,nsy)
513          _RL  objf_kapredi(nsx,nsy)
514        _RL  objf_diffkr(nsx,nsy)        _RL  objf_diffkr(nsx,nsy)
515        _RL  objf_theta_ini_fin(nsx,nsy)        _RL  objf_theta_ini_fin(nsx,nsy)
516        _RL  objf_salt_ini_fin(nsx,nsy)        _RL  objf_salt_ini_fin(nsx,nsy)
# Line 589  c                  function contribution Line 592  c                  function contribution
592       &                num_curmtr,       &                num_curmtr,
593       &                num_ageos,       &                num_ageos,
594       &                num_kapgm,       &                num_kapgm,
595         &                num_kapredi,
596       &                num_diffkr,       &                num_diffkr,
597       &                num_theta_ini_fin,       &                num_theta_ini_fin,
598       &                num_salt_ini_fin,       &                num_salt_ini_fin,
# Line 669  c                  function contribution Line 673  c                  function contribution
673        _RL  num_curmtr(nsx,nsy)        _RL  num_curmtr(nsx,nsy)
674        _RL  num_ageos(nsx,nsy)        _RL  num_ageos(nsx,nsy)
675        _RL  num_kapgm(nsx,nsy)        _RL  num_kapgm(nsx,nsy)
676          _RL  num_kapredi(nsx,nsy)
677        _RL  num_diffkr(nsx,nsy)        _RL  num_diffkr(nsx,nsy)
678        _RL  num_theta_ini_fin(nsx,nsy)        _RL  num_theta_ini_fin(nsx,nsy)
679        _RL  num_salt_ini_fin(nsx,nsy)        _RL  num_salt_ini_fin(nsx,nsy)
# Line 731  c                  function contribution Line 736  c                  function contribution
736       &                    mult_curmtr,       &                    mult_curmtr,
737       &                    mult_ageos,       &                    mult_ageos,
738       &                    mult_kapgm,       &                    mult_kapgm,
739         &                    mult_kapredi,
740       &                    mult_diffkr,       &                    mult_diffkr,
741       &                    mult_ini_fin,       &                    mult_ini_fin,
742       &                    mult_edtau,       &                    mult_edtau,
# Line 792  c                  function contribution Line 798  c                  function contribution
798        _RL  mult_curmtr        _RL  mult_curmtr
799        _RL  mult_ageos        _RL  mult_ageos
800        _RL  mult_kapgm        _RL  mult_kapgm
801          _RL  mult_kapredi
802        _RL  mult_diffkr        _RL  mult_diffkr
803        _RL  mult_ini_fin        _RL  mult_ini_fin
804        _RL  mult_edtau        _RL  mult_edtau
# Line 887  c     velerrfile            - representa Line 894  c     velerrfile            - representa
894       &                runoff_errfile,       &                runoff_errfile,
895       &                edtau_errfile,       &                edtau_errfile,
896       &                kapgm_errfile,       &                kapgm_errfile,
897         &                kapredi_errfile,
898       &                diffkr_errfile,       &                diffkr_errfile,
899       &                bottomdrag_errfile,       &                bottomdrag_errfile,
900       &                gencost_errfile,       &                gencost_errfile,
# Line 933  c     velerrfile            - representa Line 941  c     velerrfile            - representa
941        character*(MAX_LEN_FNAM) runoff_errfile        character*(MAX_LEN_FNAM) runoff_errfile
942        character*(MAX_LEN_FNAM) edtau_errfile        character*(MAX_LEN_FNAM) edtau_errfile
943        character*(MAX_LEN_FNAM) kapgm_errfile        character*(MAX_LEN_FNAM) kapgm_errfile
944          character*(MAX_LEN_FNAM) kapredi_errfile
945        character*(MAX_LEN_FNAM) diffkr_errfile        character*(MAX_LEN_FNAM) diffkr_errfile
946        character*(MAX_LEN_FNAM) bottomdrag_errfile        character*(MAX_LEN_FNAM) bottomdrag_errfile
947        character*(MAX_LEN_FNAM) gencost_errfile(NGENCOST)        character*(MAX_LEN_FNAM) gencost_errfile(NGENCOST)
# Line 978  c     wvdrift    - weight for mean merid Line 987  c     wvdrift    - weight for mean merid
987       &                      wsalt,wsalt2,wsaltLev,       &                      wsalt,wsalt2,wsaltLev,
988       &                      wdiffkr,wdiffkr2,wdiffkrFld,       &                      wdiffkr,wdiffkr2,wdiffkrFld,
989       &                      wkapgm,wkapgm2,wkapgmFld,       &                      wkapgm,wkapgm2,wkapgmFld,
990         &                      wkapredi,wkapredi2,wkaprediFld,
991       &                      wedtaux,wedtaux2,wedtauxFld,       &                      wedtaux,wedtaux2,wedtauxFld,
992       &                      wedtauy,wedtauy2,wedtauyFld,       &                      wedtauy,wedtauy2,wedtauyFld,
993       &                      wsst,wsss,wbp,       &                      wsst,wsss,wbp,
# Line 1044  c     wvdrift    - weight for mean merid Line 1054  c     wvdrift    - weight for mean merid
1054        _RL wkapgm (                            nr,nsx,nsy)        _RL wkapgm (                            nr,nsx,nsy)
1055        _RL wkapgm2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)        _RL wkapgm2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
1056        _RL wkapgmFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)        _RL wkapgmFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
1057          _RL wkapredi (                            nr,nsx,nsy)
1058          _RL wkapredi2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
1059          _RL wkaprediFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
1060        _RL wedtaux (                            nr,nsx,nsy)        _RL wedtaux (                            nr,nsx,nsy)
1061        _RL wedtaux2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)        _RL wedtaux2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
1062        _RL wedtauxFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)        _RL wedtauxFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
# Line 1055  c     wvdrift    - weight for mean merid Line 1068  c     wvdrift    - weight for mean merid
1068       &        whflux0, wsflux0, wtau0,       &        whflux0, wsflux0, wtau0,
1069       &        watemp0, waqh0, wprecip0, wsnowprecip0, wwind0,       &        watemp0, waqh0, wprecip0, wsnowprecip0, wwind0,
1070       &        wswflux0, wswdown0, wlwflux0, wlwdown0,       &        wswflux0, wswdown0, wlwflux0, wlwdown0,
1071       &        wevap0, wapressure0, wrunoff0,       &        wevap0, wapressure0, wrunoff0, wkapredi0,
1072       &        wbottomdrag0,wdiffkr0, wkapgm0, wedtau0       &        wbottomdrag0,wdiffkr0, wkapgm0, wedtau0
1073        _RL whflux0        _RL whflux0
1074        _RL wsflux0        _RL wsflux0
# Line 1075  c     wvdrift    - weight for mean merid Line 1088  c     wvdrift    - weight for mean merid
1088        _RL wwind0        _RL wwind0
1089        _RL wdiffkr0        _RL wdiffkr0
1090        _RL wkapgm0        _RL wkapgm0
1091          _RL wkapredi0
1092        _RL wedtau0        _RL wedtau0
1093    
1094        common /ecco_cost_weights_mean_r/        common /ecco_cost_weights_mean_r/
Legend:
Removed from v.1.30  
changed lines
  Added in v.1.31
  ViewVC Help
Powered by ViewVC 1.1.22