/[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.7 by heimbach, Thu Jul 28 19:51:58 2005 UTC revision 1.8 by heimbach, Fri Jul 29 05:19:40 2005 UTC
# Line 324  c                  function contribution Line 324  c                  function contribution
324       &                objf_swflux,       &                objf_swflux,
325       &                objf_uwind,       &                objf_uwind,
326       &                objf_vwind,       &                objf_vwind,
327         &                objf_atempm,
328         &                objf_aqhm,
329         &                objf_precipm,
330         &                objf_swfluxm,
331         &                objf_uwindm,
332         &                objf_vwindm,
333       &                objf_obcsn,       &                objf_obcsn,
334       &                objf_obcss,       &                objf_obcss,
335       &                objf_obcsw,       &                objf_obcsw,
# Line 377  c                  function contribution Line 383  c                  function contribution
383        _RL  objf_swflux(nsx,nsy)        _RL  objf_swflux(nsx,nsy)
384        _RL  objf_uwind(nsx,nsy)        _RL  objf_uwind(nsx,nsy)
385        _RL  objf_vwind(nsx,nsy)        _RL  objf_vwind(nsx,nsy)
386          _RL  objf_atempm(nsx,nsy)
387          _RL  objf_aqhm  (nsx,nsy)
388          _RL  objf_precipm(nsx,nsy)
389          _RL  objf_swfluxm(nsx,nsy)
390          _RL  objf_uwindm(nsx,nsy)
391          _RL  objf_vwindm(nsx,nsy)
392        _RL  objf_obcsn(nsx,nsy)        _RL  objf_obcsn(nsx,nsy)
393        _RL  objf_obcss(nsx,nsy)        _RL  objf_obcss(nsx,nsy)
394        _RL  objf_obcsw(nsx,nsy)        _RL  objf_obcsw(nsx,nsy)
# Line 432  c                  function contribution Line 444  c                  function contribution
444       &                num_swflux,       &                num_swflux,
445       &                num_uwind,       &                num_uwind,
446       &                num_vwind,       &                num_vwind,
447         &                num_atempm,
448         &                num_aqhm,
449         &                num_precipm,
450         &                num_swfluxm,
451         &                num_uwindm,
452         &                num_vwindm,
453       &                num_obcsn,       &                num_obcsn,
454       &                num_obcss,       &                num_obcss,
455       &                num_obcsw,       &                num_obcsw,
# Line 485  c                  function contribution Line 503  c                  function contribution
503        _RL  num_swflux(nsx,nsy)        _RL  num_swflux(nsx,nsy)
504        _RL  num_uwind(nsx,nsy)        _RL  num_uwind(nsx,nsy)
505        _RL  num_vwind(nsx,nsy)        _RL  num_vwind(nsx,nsy)
506          _RL  num_atempm(nsx,nsy)
507          _RL  num_aqhm  (nsx,nsy)
508          _RL  num_precipm(nsx,nsy)
509          _RL  num_swfluxm(nsx,nsy)
510          _RL  num_uwindm(nsx,nsy)
511          _RL  num_vwindm(nsx,nsy)
512        _RL  num_obcsn(nsx,nsy)        _RL  num_obcsn(nsx,nsy)
513        _RL  num_obcss(nsx,nsy)        _RL  num_obcss(nsx,nsy)
514        _RL  num_obcsw(nsx,nsy)        _RL  num_obcsw(nsx,nsy)
# Line 778  c     wvdrift    - weight for mean merid Line 802  c     wvdrift    - weight for mean merid
802        _RL wprecip0        _RL wprecip0
803        _RL wswflux0        _RL wswflux0
804        _RL wwind0        _RL wwind0
805    
806          common /ecco_cost_weights_mean_r/
807         &        wmean_hflux, wmean_sflux, wmean_tau,
808         &        wmean_atemp, wmean_aqh,
809         &        wmean_precip, wmean_swflux, wmean_wind
810          _RL wmean_hflux
811          _RL wmean_sflux
812          _RL wmean_tau
813          _RL wmean_atemp
814          _RL wmean_aqh
815          _RL wmean_precip
816          _RL wmean_swflux
817          _RL wmean_wind
818                                                                                                    
819        common /ecco_cost_weights_2_r/        common /ecco_cost_weights_2_r/
820       &                      whflux2,wsflux2,wtauu2,wtauv2       &                      whflux2,wsflux2,wtauu2,wtauv2
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22