\hypertarget{namespaceugwpv0__wmsdis__init}{}\doxysubsection{ugwpv0\+\_\+wmsdis\+\_\+init Module Reference}
\label{namespaceugwpv0__wmsdis__init}\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxysubsubsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a6cce6eb48bd521ef6e4d86f496f85d8d_a6cce6eb48bd521ef6e4d86f496f85d8d}{initsolv\+\_\+wmsdis\+\_\+v0}} (me, master, nwaves, nazdir, nstoch, effac, do\+\_\+physb, kxw)
\end{DoxyCompactItemize}
\doxysubsubsection*{Variables}
\begin{DoxyCompactItemize}
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a58506c773d52aa1291668afa13f67295_a58506c773d52aa1291668afa13f67295}{maxdudt}} = 250.e-\/5
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_aa2d1cffae7a55df2ca766c73b6164b5d_aa2d1cffae7a55df2ca766c73b6164b5d}{hpscale}} = 7000.
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a967577b90ac076aa34f9d08a47df1429_a967577b90ac076aa34f9d08a47df1429}{rhp2}} = 0.\+5/\mbox{\hyperlink{namespaceugwpv0__wmsdis__init_aa2d1cffae7a55df2ca766c73b6164b5d_aa2d1cffae7a55df2ca766c73b6164b5d}{hpscale}}
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_aea3771d54b6db80d9fc937bed6ba060b_aea3771d54b6db80d9fc937bed6ba060b}{omega2}} = 2.$\ast$6.\+28/86400
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a947e5f0baf82a2613104822662531360_a947e5f0baf82a2613104822662531360}{gptwo}} =2.\+0
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a65656b49456ca744134371e26a2365df_a65656b49456ca744134371e26a2365df}{dked\+\_\+min}} =0.\+01
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_affe4b3f1bf849669f7023e859baf1633_affe4b3f1bf849669f7023e859baf1633}{gssec}} = (6.\+28/30.)$\ast$$\ast$2
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a93b0f4aa646b43f31e821d94045804d5_a93b0f4aa646b43f31e821d94045804d5}{bv2min}} = (6.\+28/60./120.)$\ast$$\ast$2
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_adce080407c0caef3ecf55788cad9aa99_adce080407c0caef3ecf55788cad9aa99}{minvel}} = 0.\+5
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a610f87e42dbb90e6a3b15937125acbdb_a610f87e42dbb90e6a3b15937125acbdb}{v\+\_\+kxw}} = 6.\+28e-\/3/200.
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a06a9eb79f5c512ecb196a09dfb31380b_a06a9eb79f5c512ecb196a09dfb31380b}{v\+\_\+kxw2}} = \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a610f87e42dbb90e6a3b15937125acbdb_a610f87e42dbb90e6a3b15937125acbdb}{v\+\_\+kxw}}$\ast$\mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a610f87e42dbb90e6a3b15937125acbdb_a610f87e42dbb90e6a3b15937125acbdb}{v\+\_\+kxw}}
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a4c07d0fe0c16fb4ab94e3d30c28b0498_a4c07d0fe0c16fb4ab94e3d30c28b0498}{tamp\+\_\+mpa}} = 30.e-\/3
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_afcced94c66ed7c326b987fdd88e7b7b1_afcced94c66ed7c326b987fdd88e7b7b1}{zfluxglob}} = 3.\+75e-\/3
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a76eaef7a13a56e9ac366c6b93f300213_a76eaef7a13a56e9ac366c6b93f300213}{nslope}} =1
\item 
integer, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_ac1f553ef5191c83d13a0e3e49c33af67_ac1f553ef5191c83d13a0e3e49c33af67}{iazidim}} =4
\item 
integer, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a4d0a122f02fa1de367723761e7cc9acd_a4d0a122f02fa1de367723761e7cc9acd}{incdim}} =25
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_ab74ed42aa6825eb21ab4f9aedf24c189_ab74ed42aa6825eb21ab4f9aedf24c189}{ucrit2}} =0.\+5
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_af1a98be05aebe2108fd11e2f728f23ae_af1a98be05aebe2108fd11e2f728f23ae}{zcimin}} = \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_ab74ed42aa6825eb21ab4f9aedf24c189_ab74ed42aa6825eb21ab4f9aedf24c189}{ucrit2}}
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_afd5fba6c7900a62dabaf4c905e80866d_afd5fba6c7900a62dabaf4c905e80866d}{zcimax}} = 125.\+0
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_af2cfcd4759d1936553a65d8a584e6ee1_af2cfcd4759d1936553a65d8a584e6ee1}{zgam}} = 0.\+25
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a9374b22d0df02549881de4af06786bf8_a9374b22d0df02549881de4af06786bf8}{zms\+\_\+l}} = 2000.\+0
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_af176d189c54fd7fc25eb4d280bab3689_af176d189c54fd7fc25eb4d280bab3689}{zms}} = pi2 / \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a9374b22d0df02549881de4af06786bf8_a9374b22d0df02549881de4af06786bf8}{zms\+\_\+l}}
\item 
real, parameter \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a9ca73e3b03f1d38d3558acb40322b6b2_a9ca73e3b03f1d38d3558acb40322b6b2}{zmsi}} = 1.\+0 / \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_af176d189c54fd7fc25eb4d280bab3689_af176d189c54fd7fc25eb4d280bab3689}{zms}}
\item 
integer \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a2be0a2a857a0241d816838d8e9ea3dbf_a2be0a2a857a0241d816838d8e9ea3dbf}{ilaunch}}
\item 
real \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a44ff2e52a5781a62431435cdc539efcd_a44ff2e52a5781a62431435cdc539efcd}{gw\+\_\+eff}}
\item 
integer \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a50b7c8290f11a613b71e12303cc4bc2f_a50b7c8290f11a613b71e12303cc4bc2f}{nwav}}
\item 
integer \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a86fe36ef1494ddea01aa1a0dfb5c76d8_a86fe36ef1494ddea01aa1a0dfb5c76d8}{nazd}}
\item 
integer \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a84b8dffce2466b1108b72bd16ad14650_a84b8dffce2466b1108b72bd16ad14650}{nst}}
\item 
real \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a3044b09194c1660092e9c9281e3c4f4a_a3044b09194c1660092e9c9281e3c4f4a}{eff}}
\item 
real \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a3e2ee08342faa29d3904bc42156af7b9_a3e2ee08342faa29d3904bc42156af7b9}{zaz\+\_\+fct}}
\item 
real, dimension(\+:), allocatable \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_acd4628e438583e1f1b3f0ce0d9ca469e_acd4628e438583e1f1b3f0ce0d9ca469e}{zci}}
\item 
real, dimension(\+:), allocatable \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a437eb9cb760ebcec498610bbc1202d0f_a437eb9cb760ebcec498610bbc1202d0f}{zci4}}
\item 
real, dimension(\+:), allocatable \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_adf7293fcaa155076fa9365e3a65ebb8e_adf7293fcaa155076fa9365e3a65ebb8e}{zci3}}
\item 
real, dimension(\+:), allocatable \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a592c6cf745b51b7da89adb74f0da1fdd_a592c6cf745b51b7da89adb74f0da1fdd}{zci2}}
\item 
real, dimension(\+:), allocatable \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a75e309bebcbd0e056b5a9978fd3fe8e9_a75e309bebcbd0e056b5a9978fd3fe8e9}{zdci}}
\item 
real, dimension(\+:), allocatable \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a455942992b0c777c2320bca5c8b0e9fa_a455942992b0c777c2320bca5c8b0e9fa}{zcosang}}
\item 
real, dimension(\+:), allocatable \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a16c3172becb433ff2988ae59f182dadf_a16c3172becb433ff2988ae59f182dadf}{zsinang}}
\end{DoxyCompactItemize}


\doxysubsubsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a6cce6eb48bd521ef6e4d86f496f85d8d_a6cce6eb48bd521ef6e4d86f496f85d8d}\label{namespaceugwpv0__wmsdis__init_a6cce6eb48bd521ef6e4d86f496f85d8d_a6cce6eb48bd521ef6e4d86f496f85d8d}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!initsolv\_wmsdis\_v0@{initsolv\_wmsdis\_v0}}
\index{initsolv\_wmsdis\_v0@{initsolv\_wmsdis\_v0}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{initsolv\_wmsdis\_v0()}{initsolv\_wmsdis\_v0()}}
{\footnotesize\ttfamily subroutine ugwpv0\+\_\+wmsdis\+\_\+init\+::initsolv\+\_\+wmsdis\+\_\+v0 (\begin{DoxyParamCaption}\item[{integer}]{me,  }\item[{integer}]{master,  }\item[{integer}]{nwaves,  }\item[{integer}]{nazdir,  }\item[{integer}]{nstoch,  }\item[{real}]{effac,  }\item[{logical}]{do\+\_\+physb,  }\item[{real}]{kxw }\end{DoxyParamCaption})}



\doxysubsubsection{Variable Documentation}
\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a58506c773d52aa1291668afa13f67295_a58506c773d52aa1291668afa13f67295}\label{namespaceugwpv0__wmsdis__init_a58506c773d52aa1291668afa13f67295_a58506c773d52aa1291668afa13f67295}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!maxdudt@{maxdudt}}
\index{maxdudt@{maxdudt}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{maxdudt}{maxdudt}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::maxdudt = 250.e-\/5}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_aa2d1cffae7a55df2ca766c73b6164b5d_aa2d1cffae7a55df2ca766c73b6164b5d}\label{namespaceugwpv0__wmsdis__init_aa2d1cffae7a55df2ca766c73b6164b5d_aa2d1cffae7a55df2ca766c73b6164b5d}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!hpscale@{hpscale}}
\index{hpscale@{hpscale}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{hpscale}{hpscale}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::hpscale = 7000.}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a967577b90ac076aa34f9d08a47df1429_a967577b90ac076aa34f9d08a47df1429}\label{namespaceugwpv0__wmsdis__init_a967577b90ac076aa34f9d08a47df1429_a967577b90ac076aa34f9d08a47df1429}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!rhp2@{rhp2}}
\index{rhp2@{rhp2}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{rhp2}{rhp2}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::rhp2 = 0.\+5/\mbox{\hyperlink{namespaceugwpv0__wmsdis__init_aa2d1cffae7a55df2ca766c73b6164b5d_aa2d1cffae7a55df2ca766c73b6164b5d}{hpscale}}}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_aea3771d54b6db80d9fc937bed6ba060b_aea3771d54b6db80d9fc937bed6ba060b}\label{namespaceugwpv0__wmsdis__init_aea3771d54b6db80d9fc937bed6ba060b_aea3771d54b6db80d9fc937bed6ba060b}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!omega2@{omega2}}
\index{omega2@{omega2}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{omega2}{omega2}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::omega2 = 2.$\ast$6.\+28/86400}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a947e5f0baf82a2613104822662531360_a947e5f0baf82a2613104822662531360}\label{namespaceugwpv0__wmsdis__init_a947e5f0baf82a2613104822662531360_a947e5f0baf82a2613104822662531360}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!gptwo@{gptwo}}
\index{gptwo@{gptwo}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{gptwo}{gptwo}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::gptwo =2.\+0}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a65656b49456ca744134371e26a2365df_a65656b49456ca744134371e26a2365df}\label{namespaceugwpv0__wmsdis__init_a65656b49456ca744134371e26a2365df_a65656b49456ca744134371e26a2365df}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!dked\_min@{dked\_min}}
\index{dked\_min@{dked\_min}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{dked\_min}{dked\_min}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::dked\+\_\+min =0.\+01}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_affe4b3f1bf849669f7023e859baf1633_affe4b3f1bf849669f7023e859baf1633}\label{namespaceugwpv0__wmsdis__init_affe4b3f1bf849669f7023e859baf1633_affe4b3f1bf849669f7023e859baf1633}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!gssec@{gssec}}
\index{gssec@{gssec}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{gssec}{gssec}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::gssec = (6.\+28/30.)$\ast$$\ast$2}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a93b0f4aa646b43f31e821d94045804d5_a93b0f4aa646b43f31e821d94045804d5}\label{namespaceugwpv0__wmsdis__init_a93b0f4aa646b43f31e821d94045804d5_a93b0f4aa646b43f31e821d94045804d5}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!bv2min@{bv2min}}
\index{bv2min@{bv2min}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{bv2min}{bv2min}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::bv2min = (6.\+28/60./120.)$\ast$$\ast$2}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_adce080407c0caef3ecf55788cad9aa99_adce080407c0caef3ecf55788cad9aa99}\label{namespaceugwpv0__wmsdis__init_adce080407c0caef3ecf55788cad9aa99_adce080407c0caef3ecf55788cad9aa99}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!minvel@{minvel}}
\index{minvel@{minvel}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{minvel}{minvel}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::minvel = 0.\+5}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a610f87e42dbb90e6a3b15937125acbdb_a610f87e42dbb90e6a3b15937125acbdb}\label{namespaceugwpv0__wmsdis__init_a610f87e42dbb90e6a3b15937125acbdb_a610f87e42dbb90e6a3b15937125acbdb}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!v\_kxw@{v\_kxw}}
\index{v\_kxw@{v\_kxw}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{v\_kxw}{v\_kxw}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::v\+\_\+kxw = 6.\+28e-\/3/200.}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a06a9eb79f5c512ecb196a09dfb31380b_a06a9eb79f5c512ecb196a09dfb31380b}\label{namespaceugwpv0__wmsdis__init_a06a9eb79f5c512ecb196a09dfb31380b_a06a9eb79f5c512ecb196a09dfb31380b}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!v\_kxw2@{v\_kxw2}}
\index{v\_kxw2@{v\_kxw2}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{v\_kxw2}{v\_kxw2}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::v\+\_\+kxw2 = \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a610f87e42dbb90e6a3b15937125acbdb_a610f87e42dbb90e6a3b15937125acbdb}{v\+\_\+kxw}}$\ast$\mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a610f87e42dbb90e6a3b15937125acbdb_a610f87e42dbb90e6a3b15937125acbdb}{v\+\_\+kxw}}}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a4c07d0fe0c16fb4ab94e3d30c28b0498_a4c07d0fe0c16fb4ab94e3d30c28b0498}\label{namespaceugwpv0__wmsdis__init_a4c07d0fe0c16fb4ab94e3d30c28b0498_a4c07d0fe0c16fb4ab94e3d30c28b0498}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!tamp\_mpa@{tamp\_mpa}}
\index{tamp\_mpa@{tamp\_mpa}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{tamp\_mpa}{tamp\_mpa}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::tamp\+\_\+mpa = 30.e-\/3}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_afcced94c66ed7c326b987fdd88e7b7b1_afcced94c66ed7c326b987fdd88e7b7b1}\label{namespaceugwpv0__wmsdis__init_afcced94c66ed7c326b987fdd88e7b7b1_afcced94c66ed7c326b987fdd88e7b7b1}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zfluxglob@{zfluxglob}}
\index{zfluxglob@{zfluxglob}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zfluxglob}{zfluxglob}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::zfluxglob = 3.\+75e-\/3}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a76eaef7a13a56e9ac366c6b93f300213_a76eaef7a13a56e9ac366c6b93f300213}\label{namespaceugwpv0__wmsdis__init_a76eaef7a13a56e9ac366c6b93f300213_a76eaef7a13a56e9ac366c6b93f300213}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!nslope@{nslope}}
\index{nslope@{nslope}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{nslope}{nslope}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::nslope =1}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_ac1f553ef5191c83d13a0e3e49c33af67_ac1f553ef5191c83d13a0e3e49c33af67}\label{namespaceugwpv0__wmsdis__init_ac1f553ef5191c83d13a0e3e49c33af67_ac1f553ef5191c83d13a0e3e49c33af67}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!iazidim@{iazidim}}
\index{iazidim@{iazidim}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{iazidim}{iazidim}}
{\footnotesize\ttfamily integer, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::iazidim =4}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a4d0a122f02fa1de367723761e7cc9acd_a4d0a122f02fa1de367723761e7cc9acd}\label{namespaceugwpv0__wmsdis__init_a4d0a122f02fa1de367723761e7cc9acd_a4d0a122f02fa1de367723761e7cc9acd}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!incdim@{incdim}}
\index{incdim@{incdim}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{incdim}{incdim}}
{\footnotesize\ttfamily integer, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::incdim =25}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_ab74ed42aa6825eb21ab4f9aedf24c189_ab74ed42aa6825eb21ab4f9aedf24c189}\label{namespaceugwpv0__wmsdis__init_ab74ed42aa6825eb21ab4f9aedf24c189_ab74ed42aa6825eb21ab4f9aedf24c189}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!ucrit2@{ucrit2}}
\index{ucrit2@{ucrit2}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{ucrit2}{ucrit2}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::ucrit2 =0.\+5}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_af1a98be05aebe2108fd11e2f728f23ae_af1a98be05aebe2108fd11e2f728f23ae}\label{namespaceugwpv0__wmsdis__init_af1a98be05aebe2108fd11e2f728f23ae_af1a98be05aebe2108fd11e2f728f23ae}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zcimin@{zcimin}}
\index{zcimin@{zcimin}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zcimin}{zcimin}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::zcimin = \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_ab74ed42aa6825eb21ab4f9aedf24c189_ab74ed42aa6825eb21ab4f9aedf24c189}{ucrit2}}}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_afd5fba6c7900a62dabaf4c905e80866d_afd5fba6c7900a62dabaf4c905e80866d}\label{namespaceugwpv0__wmsdis__init_afd5fba6c7900a62dabaf4c905e80866d_afd5fba6c7900a62dabaf4c905e80866d}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zcimax@{zcimax}}
\index{zcimax@{zcimax}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zcimax}{zcimax}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::zcimax = 125.\+0}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_af2cfcd4759d1936553a65d8a584e6ee1_af2cfcd4759d1936553a65d8a584e6ee1}\label{namespaceugwpv0__wmsdis__init_af2cfcd4759d1936553a65d8a584e6ee1_af2cfcd4759d1936553a65d8a584e6ee1}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zgam@{zgam}}
\index{zgam@{zgam}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zgam}{zgam}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::zgam = 0.\+25}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a9374b22d0df02549881de4af06786bf8_a9374b22d0df02549881de4af06786bf8}\label{namespaceugwpv0__wmsdis__init_a9374b22d0df02549881de4af06786bf8_a9374b22d0df02549881de4af06786bf8}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zms\_l@{zms\_l}}
\index{zms\_l@{zms\_l}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zms\_l}{zms\_l}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::zms\+\_\+l = 2000.\+0}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_af176d189c54fd7fc25eb4d280bab3689_af176d189c54fd7fc25eb4d280bab3689}\label{namespaceugwpv0__wmsdis__init_af176d189c54fd7fc25eb4d280bab3689_af176d189c54fd7fc25eb4d280bab3689}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zms@{zms}}
\index{zms@{zms}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zms}{zms}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::zms = pi2 / \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_a9374b22d0df02549881de4af06786bf8_a9374b22d0df02549881de4af06786bf8}{zms\+\_\+l}}}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a9ca73e3b03f1d38d3558acb40322b6b2_a9ca73e3b03f1d38d3558acb40322b6b2}\label{namespaceugwpv0__wmsdis__init_a9ca73e3b03f1d38d3558acb40322b6b2_a9ca73e3b03f1d38d3558acb40322b6b2}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zmsi@{zmsi}}
\index{zmsi@{zmsi}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zmsi}{zmsi}}
{\footnotesize\ttfamily real, parameter ugwpv0\+\_\+wmsdis\+\_\+init\+::zmsi = 1.\+0 / \mbox{\hyperlink{namespaceugwpv0__wmsdis__init_af176d189c54fd7fc25eb4d280bab3689_af176d189c54fd7fc25eb4d280bab3689}{zms}}}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a2be0a2a857a0241d816838d8e9ea3dbf_a2be0a2a857a0241d816838d8e9ea3dbf}\label{namespaceugwpv0__wmsdis__init_a2be0a2a857a0241d816838d8e9ea3dbf_a2be0a2a857a0241d816838d8e9ea3dbf}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!ilaunch@{ilaunch}}
\index{ilaunch@{ilaunch}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{ilaunch}{ilaunch}}
{\footnotesize\ttfamily integer ugwpv0\+\_\+wmsdis\+\_\+init\+::ilaunch}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a44ff2e52a5781a62431435cdc539efcd_a44ff2e52a5781a62431435cdc539efcd}\label{namespaceugwpv0__wmsdis__init_a44ff2e52a5781a62431435cdc539efcd_a44ff2e52a5781a62431435cdc539efcd}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!gw\_eff@{gw\_eff}}
\index{gw\_eff@{gw\_eff}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{gw\_eff}{gw\_eff}}
{\footnotesize\ttfamily real ugwpv0\+\_\+wmsdis\+\_\+init\+::gw\+\_\+eff}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a50b7c8290f11a613b71e12303cc4bc2f_a50b7c8290f11a613b71e12303cc4bc2f}\label{namespaceugwpv0__wmsdis__init_a50b7c8290f11a613b71e12303cc4bc2f_a50b7c8290f11a613b71e12303cc4bc2f}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!nwav@{nwav}}
\index{nwav@{nwav}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{nwav}{nwav}}
{\footnotesize\ttfamily integer ugwpv0\+\_\+wmsdis\+\_\+init\+::nwav}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a86fe36ef1494ddea01aa1a0dfb5c76d8_a86fe36ef1494ddea01aa1a0dfb5c76d8}\label{namespaceugwpv0__wmsdis__init_a86fe36ef1494ddea01aa1a0dfb5c76d8_a86fe36ef1494ddea01aa1a0dfb5c76d8}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!nazd@{nazd}}
\index{nazd@{nazd}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{nazd}{nazd}}
{\footnotesize\ttfamily integer ugwpv0\+\_\+wmsdis\+\_\+init\+::nazd}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a84b8dffce2466b1108b72bd16ad14650_a84b8dffce2466b1108b72bd16ad14650}\label{namespaceugwpv0__wmsdis__init_a84b8dffce2466b1108b72bd16ad14650_a84b8dffce2466b1108b72bd16ad14650}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!nst@{nst}}
\index{nst@{nst}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{nst}{nst}}
{\footnotesize\ttfamily integer ugwpv0\+\_\+wmsdis\+\_\+init\+::nst}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a3044b09194c1660092e9c9281e3c4f4a_a3044b09194c1660092e9c9281e3c4f4a}\label{namespaceugwpv0__wmsdis__init_a3044b09194c1660092e9c9281e3c4f4a_a3044b09194c1660092e9c9281e3c4f4a}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!eff@{eff}}
\index{eff@{eff}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{eff}{eff}}
{\footnotesize\ttfamily real ugwpv0\+\_\+wmsdis\+\_\+init\+::eff}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a3e2ee08342faa29d3904bc42156af7b9_a3e2ee08342faa29d3904bc42156af7b9}\label{namespaceugwpv0__wmsdis__init_a3e2ee08342faa29d3904bc42156af7b9_a3e2ee08342faa29d3904bc42156af7b9}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zaz\_fct@{zaz\_fct}}
\index{zaz\_fct@{zaz\_fct}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zaz\_fct}{zaz\_fct}}
{\footnotesize\ttfamily real ugwpv0\+\_\+wmsdis\+\_\+init\+::zaz\+\_\+fct}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_acd4628e438583e1f1b3f0ce0d9ca469e_acd4628e438583e1f1b3f0ce0d9ca469e}\label{namespaceugwpv0__wmsdis__init_acd4628e438583e1f1b3f0ce0d9ca469e_acd4628e438583e1f1b3f0ce0d9ca469e}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zci@{zci}}
\index{zci@{zci}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zci}{zci}}
{\footnotesize\ttfamily real, dimension(\+:), allocatable ugwpv0\+\_\+wmsdis\+\_\+init\+::zci}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a437eb9cb760ebcec498610bbc1202d0f_a437eb9cb760ebcec498610bbc1202d0f}\label{namespaceugwpv0__wmsdis__init_a437eb9cb760ebcec498610bbc1202d0f_a437eb9cb760ebcec498610bbc1202d0f}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zci4@{zci4}}
\index{zci4@{zci4}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zci4}{zci4}}
{\footnotesize\ttfamily real, dimension(\+:), allocatable ugwpv0\+\_\+wmsdis\+\_\+init\+::zci4}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_adf7293fcaa155076fa9365e3a65ebb8e_adf7293fcaa155076fa9365e3a65ebb8e}\label{namespaceugwpv0__wmsdis__init_adf7293fcaa155076fa9365e3a65ebb8e_adf7293fcaa155076fa9365e3a65ebb8e}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zci3@{zci3}}
\index{zci3@{zci3}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zci3}{zci3}}
{\footnotesize\ttfamily real, dimension(\+:), allocatable ugwpv0\+\_\+wmsdis\+\_\+init\+::zci3}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a592c6cf745b51b7da89adb74f0da1fdd_a592c6cf745b51b7da89adb74f0da1fdd}\label{namespaceugwpv0__wmsdis__init_a592c6cf745b51b7da89adb74f0da1fdd_a592c6cf745b51b7da89adb74f0da1fdd}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zci2@{zci2}}
\index{zci2@{zci2}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zci2}{zci2}}
{\footnotesize\ttfamily real, dimension(\+:), allocatable ugwpv0\+\_\+wmsdis\+\_\+init\+::zci2}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a75e309bebcbd0e056b5a9978fd3fe8e9_a75e309bebcbd0e056b5a9978fd3fe8e9}\label{namespaceugwpv0__wmsdis__init_a75e309bebcbd0e056b5a9978fd3fe8e9_a75e309bebcbd0e056b5a9978fd3fe8e9}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zdci@{zdci}}
\index{zdci@{zdci}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zdci}{zdci}}
{\footnotesize\ttfamily real, dimension(\+:), allocatable ugwpv0\+\_\+wmsdis\+\_\+init\+::zdci}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a455942992b0c777c2320bca5c8b0e9fa_a455942992b0c777c2320bca5c8b0e9fa}\label{namespaceugwpv0__wmsdis__init_a455942992b0c777c2320bca5c8b0e9fa_a455942992b0c777c2320bca5c8b0e9fa}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zcosang@{zcosang}}
\index{zcosang@{zcosang}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zcosang}{zcosang}}
{\footnotesize\ttfamily real, dimension(\+:), allocatable ugwpv0\+\_\+wmsdis\+\_\+init\+::zcosang}

\mbox{\Hypertarget{namespaceugwpv0__wmsdis__init_a16c3172becb433ff2988ae59f182dadf_a16c3172becb433ff2988ae59f182dadf}\label{namespaceugwpv0__wmsdis__init_a16c3172becb433ff2988ae59f182dadf_a16c3172becb433ff2988ae59f182dadf}} 
\index{ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}!zsinang@{zsinang}}
\index{zsinang@{zsinang}!ugwpv0\_wmsdis\_init@{ugwpv0\_wmsdis\_init}}
\doxyparagraph{\texorpdfstring{zsinang}{zsinang}}
{\footnotesize\ttfamily real, dimension(\+:), allocatable ugwpv0\+\_\+wmsdis\+\_\+init\+::zsinang}

