/[MITgcm]/MITgcm_contrib/gael/pkg/smooth/smooth_ensemble3D.F
ViewVC logotype

Diff of /MITgcm_contrib/gael/pkg/smooth/smooth_ensemble3D.F

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

revision 1.1 by gforget, Tue Jun 19 18:23:18 2007 UTC revision 1.2 by gforget, Fri Oct 16 03:36:34 2009 UTC
# Line 55  C define a perturbation: Line 55  C define a perturbation:
55          ENDDO          ENDDO
56         ENDDO         ENDDO
57        ENDDO        ENDDO
58        _EXCH_XYZ_R8 ( fld_in, myThid )        _EXCH_XYZ_RL ( fld_in, myThid )
59    
60  C the smoothing itself:  C the smoothing itself:
61        call smooth_correl3D(fld_in,1,mythid)        call smooth_correl3D(fld_in,1,mythid)

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

  ViewVC Help
Powered by ViewVC 1.1.22