My Project
FVCOMg01
mod_sed_cstms.f90
Go to the documentation of this file.
1
2
3
4
5
6
7
8
9
10
11
12
!/===========================================================================/
13
! Copyright (c) 2007, The University of Massachusetts Dartmouth
14
! Produced at the School of Marine Science & Technology
15
! Marine Ecosystem Dynamics Modeling group
16
! All rights reserved.
17
!
18
! FVCOM has been developed by the joint UMASSD-WHOI research team. For
19
! details of authorship and attribution of credit please see the FVCOM
20
! technical manual or contact the MEDM group.
21
!
22
!
23
! This file is part of FVCOM. For details, see http://fvcom.smast.umassd.edu
24
! The full copyright notice is contained in the file COPYRIGHT located in the
25
! root directory of the FVCOM code. This original header must be maintained
26
! in all distributed versions.
27
!
28
! THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
29
! AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
30
! THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
31
! PURPOSE ARE DISCLAIMED.
32
!
33
!/---------------------------------------------------------------------------/
34
! CVS VERSION INFORMATION
35
! $Id$
36
! $Name$
37
! $Revision$
38
!/===========================================================================/
39
40
!=======================================================================
41
! FVCOM Sediment Module
42
!
43
! Copyright: 2005(c)
44
!
45
! THIS IS A DEMONSTRATION RELEASE. THE AUTHOR(S) MAKE NO REPRESENTATION
46
! ABOUT THE SUITABILITY OF THIS SOFTWARE FOR ANY OTHER PURPOSE. IT IS
47
! PROVIDED "AS IS" WITHOUT EXPRESSED OR IMPLIED WARRANTY.
48
!
49
! THIS ORIGINAL HEADER MUST BE MAINTAINED IN ALL DISTRIBUTED
50
! VERSIONS.
51
!
52
! Contact: G. Cowles
53
! School for Marine Science and Technology, Umass-Dartmouth
54
!
55
! Based on the Community Sediment Transport Model (CSTM) as implemented
56
! in ROMS by J. Warner (USGS)
57
!
58
! Comments: Sediment Dynamics Module
59
!
60
! Current FVCOM dependency
61
!
62
! init_sed.F: - user defined sediment model initial conditions
63
! mod_ncdio.F: - netcdf output includes concentration/bottom/bed fields
64
! fvcom.F: - main calls sediment setup
65
! internal.F: - calls sediment advance
66
!
67
! History
68
! Feb 7, 2008: added initialization of bottom(:,:) to 0 (w/ T. Hamada)
69
! : fixed loop bounds in hot start and archive for conc (w/ T. Hamada)
70
! : added comments describing theoretical bases of dynamics
71
! Feb 14,2008: added non-constant settling velocity for cohesive sediments (w/ T. Hamada)
72
! : updated vertical flux routine to handle non-constant vertical velocity (w/ T. Hamada)
73
! : added a user-defined routine to calculate settling velocity based on concentration (w/ T. Hamada)
74
! : added a user-defined routine to calculate erosion for a general case (w/ T. Hamada)
75
!
76
! PLEASE NOTE!!!!!!!!!!!
77
! Do NOT USE INTEL FORTRAN COMPILER VERSION 11.0 IT HAS KNOWN BUGS WHEN DEALING WITH TYPES WITH ALLOCATABLE
78
! COMPONENTS. YOU WILL SEE WEIRD BEHAVIOR. VERSION 11.1 IS OK.
79
!
80
!
81
! Later
82
! 1.) Modify vertical flux routines to work with general vertical coordinate
83
! 2.) Add divergence term for bedload transport calc
84
! 3.) Add ripple roughness calculation
85
! 4.) Add morphological change (bathymetry + vertical velocity condition)
86
! 5.) Eliminate excess divisions and recalcs
87
!
88
!=======================================================================
89
Module
mod_sed_cstms
90
91
92
End Module
mod_sed_cstms
mod_sed_cstms
Definition:
mod_sed_cstms.f90:89
Generated by
1.8.15