--- MITgcm_contrib/darwin2/pkg/darwin/SPECTRAL.h 2012/08/09 21:18:53 1.3 +++ MITgcm_contrib/darwin2/pkg/darwin/SPECTRAL.h 2012/08/23 21:48:24 1.4 @@ -1,4 +1,4 @@ -C $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/darwin2/pkg/darwin/SPECTRAL.h,v 1.3 2012/08/09 21:18:53 jahn Exp $ +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 $Name: $ C SPECTRAL.h @@ -24,10 +24,10 @@ COMMON /SPECTRAL_OUPUT/ #ifdef DAR_DIAG_IRR - & Edave,Esave,Euave,Eutave, + & Edave,Esave,Euave,Estave,Eutave, #endif #ifdef DAR_DIAG_IRR_AMPS - & c1ave,c2ave, + & amp1ave,amp2ave, #endif #ifdef DAR_DIAG_ABSORP & aave, @@ -47,11 +47,12 @@ _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) _RL Euave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy,tlam) + _RL Estave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy,tlam) _RL Eutave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy,tlam) #endif #ifdef DAR_DIAG_IRR_AMPS - _RL c1ave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy,tlam) - _RL c2ave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy,tlam) + _RL amp1ave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy,tlam) + _RL amp2ave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy,tlam) #endif #ifdef DAR_DIAG_ABSORP _RL aave(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy,tlam)