/[MITgcm]/MITgcm_contrib/darwin2/pkg/darwin/SPECTRAL.h
ViewVC logotype

Diff of /MITgcm_contrib/darwin2/pkg/darwin/SPECTRAL.h

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

--- MITgcm_contrib/darwin2/pkg/darwin/SPECTRAL.h	2012/08/23 21:48:24	1.4
+++ MITgcm_contrib/darwin2/pkg/darwin/SPECTRAL.h	2012/10/23 17:55:30	1.5
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/darwin2/pkg/darwin/SPECTRAL.h,v 1.4 2012/08/23 21:48:24 jahn Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/darwin2/pkg/darwin/SPECTRAL.h,v 1.5 2012/10/23 17:55:30 stephd Exp $
 C $Name:  $
 
 C SPECTRAL.h 
@@ -23,6 +23,9 @@
 #endif
 
       COMMON /SPECTRAL_OUPUT/
+#ifdef DAR_DIAG_PARW
+     &      PARwave,
+#endif
 #ifdef DAR_DIAG_IRR
      &      Edave,Esave,Euave,Estave,Eutave,
 #endif
@@ -41,8 +44,16 @@
      &      btpartave,
      &      bbpartave,
 #endif
+#ifdef DAR_DIAG_EK
+     &      Ek_nlave,
+     &      EkoverE_nlave,
+#endif
      &      rmudave
 
+#ifdef DAR_DIAG_PARW
+       _RL  PARwave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy,tlam)
+#endif
+
 #ifdef DAR_DIAG_IRR
        _RL  Edave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy,tlam)
        _RL  Esave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy,tlam)
@@ -66,5 +77,11 @@
        _RL  bbpartave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy,tlam)
        _RL  btpartave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy,tlam)
 #endif
+#ifdef DAR_DIAG_EK
+       _RL  Ek_nlave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy,npmax,
+     &              tlam)
+       _RL  EkoverE_nlave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx, nSy,
+     &                   npmax,tlam)
+#endif
        _RL  rmudave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
 

 

  ViewVC Help
Powered by ViewVC 1.1.22