** Warning **

Issuing rollback() due to DESTROY without explicit disconnect() of DBD::mysql::db handle dbname=MITgcm at /usr/local/share/lxr/lib/LXR/Common.pm line 1224.

	MITgcm MITgcm/​pkg/​salt_plume/​salt_plume_init_fixed.F	Source navigation Diff markup Identifier search General search
	Version: master Revert   Change

File indexing completed on 2018-03-02 18:43:11 UTC

e4775240e5 Dimi* #include "SALT_PLUME_OPTIONS.h"
                 
                 CBOP 0
762bde3a3e Dimi* C     !ROUTINE: SALT_PLUME_INIT_FIXED
                 C     !INTERFACE:
e4775240e5 Dimi*       SUBROUTINE SALT_PLUME_INIT_FIXED( myThid )
                 
                 C     !DESCRIPTION:
                 C     Initialize SALT_PLUME variables that are kept fixed during the run.
                 
                 C     !USES:
                       IMPLICIT NONE
                 #include "EEPARAMS.h"
                 #include "SIZE.h"
                 #include "PARAMS.h"
                 
                 C     !INPUT/OUTPUT PARAMETERS:
                 C     myThid ::  my Thread Id number
                       INTEGER myThid
                 CEOP
                 
762bde3a3e Dimi* #ifdef ALLOW_SALT_PLUME
e4775240e5 Dimi* 
                 #ifdef ALLOW_MNC
                       IF (useMNC) THEN
                         CALL SALT_PLUME_MNC_INIT( myThid )
                       ENDIF
                 #endif /* ALLOW_MNC */
                 
                 #ifdef ALLOW_DIAGNOSTICS
                       IF ( useDiagnostics ) THEN
                         CALL SALT_PLUME_DIAGNOSTICS_INIT( myThid )
                       ENDIF
                 #endif /* ALLOW_DIAGNOSTICS */
                 
762bde3a3e Dimi* #endif /* ALLOW_SALT_PLUME */
                 
e4775240e5 Dimi*       RETURN
                       END

This page was automatically generated from https://github.com/MITgcm/MITgcm by the 2.2.1-MITgcm-0.1 LXR engine. The LXR team