\hypertarget{structmom__set__visc_1_1set__visc__cs}{}\section{mom\+\_\+set\+\_\+visc\+:\+:set\+\_\+visc\+\_\+cs Type Reference} \label{structmom__set__visc_1_1set__visc__cs}\index{mom\+\_\+set\+\_\+visc\+::set\+\_\+visc\+\_\+cs@{mom\+\_\+set\+\_\+visc\+::set\+\_\+visc\+\_\+cs}} \subsection{Detailed Description} Control structure for M\+O\+M\+\_\+set\+\_\+visc. Definition at line 45 of file M\+O\+M\+\_\+set\+\_\+viscosity.\+F90. Collaboration diagram for mom\+\_\+set\+\_\+visc\+:\+:set\+\_\+visc\+\_\+cs\+: \nopagebreak \begin{figure}[H] \begin{center} \leavevmode \includegraphics[width=350pt]{structmom__set__visc_1_1set__visc__cs__coll__graph} \end{center} \end{figure} \subsection*{Public variables and constants} \begin{DoxyCompactItemize} \item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a20768c8872b3eab25e59dfe7c5ff62a0}\label{structmom__set__visc_1_1set__visc__cs_a20768c8872b3eab25e59dfe7c5ff62a0}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_a20768c8872b3eab25e59dfe7c5ff62a0}{hbbl} \begin{DoxyCompactList}\small\item\em The static bottom boundary layer thickness \mbox{[}H $\sim$$>$ m or kg m-\/2\mbox{]}. Runtime parameter {\ttfamily H\+B\+BL}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_aed9fb01bc4608a92a4c3817e8b82026b}\label{structmom__set__visc_1_1set__visc__cs_aed9fb01bc4608a92a4c3817e8b82026b}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_aed9fb01bc4608a92a4c3817e8b82026b}{cdrag} \begin{DoxyCompactList}\small\item\em The quadratic drag coefficient. Runtime parameter {\ttfamily C\+D\+R\+AG}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a7468380ee0a6c98c833d9829cc0a4bd1}\label{structmom__set__visc_1_1set__visc__cs_a7468380ee0a6c98c833d9829cc0a4bd1}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_a7468380ee0a6c98c833d9829cc0a4bd1}{c\+\_\+smag} \begin{DoxyCompactList}\small\item\em The Laplacian Smagorinsky coefficient for calculating the drag in channels. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a8e5f72291c7e5c5e602c9b4765d63ae0}\label{structmom__set__visc_1_1set__visc__cs_a8e5f72291c7e5c5e602c9b4765d63ae0}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_a8e5f72291c7e5c5e602c9b4765d63ae0}{drag\+\_\+bg\+\_\+vel} \begin{DoxyCompactList}\small\item\em An assumed unresolved background velocity for calculating the bottom drag \mbox{[}L T-\/1 $\sim$$>$ m s-\/1\mbox{]}. Runtime parameter {\ttfamily D\+R\+A\+G\+\_\+\+B\+G\+\_\+\+V\+EL}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_af5bba32c1f02f863a814ae84adf1c485}\label{structmom__set__visc_1_1set__visc__cs_af5bba32c1f02f863a814ae84adf1c485}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_af5bba32c1f02f863a814ae84adf1c485}{bbl\+\_\+thick\+\_\+min} \begin{DoxyCompactList}\small\item\em The minimum bottom boundary layer thickness \mbox{[}H $\sim$$>$ m or kg m-\/2\mbox{]}. This might be Kv / (cdrag $\ast$ drag\+\_\+bg\+\_\+vel) to give Kv as the minimum near-\/bottom viscosity. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a83756effef0ede459573d1f87f1edb43}\label{structmom__set__visc_1_1set__visc__cs_a83756effef0ede459573d1f87f1edb43}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_a83756effef0ede459573d1f87f1edb43}{htbl\+\_\+shelf} \begin{DoxyCompactList}\small\item\em A nominal thickness of the surface boundary layer for use in calculating the near-\/surface velocity \mbox{[}H $\sim$$>$ m or kg m-\/2\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a0cbe060677c6ad30e8fa72d470aac1ba}\label{structmom__set__visc_1_1set__visc__cs_a0cbe060677c6ad30e8fa72d470aac1ba}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_a0cbe060677c6ad30e8fa72d470aac1ba}{htbl\+\_\+shelf\+\_\+min} \begin{DoxyCompactList}\small\item\em The minimum surface boundary layer thickness \mbox{[}H $\sim$$>$ m or kg m-\/2\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a79892e0504f50a57127ac0578c29d13f}\label{structmom__set__visc_1_1set__visc__cs_a79892e0504f50a57127ac0578c29d13f}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_a79892e0504f50a57127ac0578c29d13f}{kv\+\_\+bbl\+\_\+min} \begin{DoxyCompactList}\small\item\em The minimum viscosity in the bottom boundary layer \mbox{[}Z2 T-\/1 $\sim$$>$ m2 s-\/1\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_ac40635b4c0f7d100ca5125f8d4ba3a3c}\label{structmom__set__visc_1_1set__visc__cs_ac40635b4c0f7d100ca5125f8d4ba3a3c}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_ac40635b4c0f7d100ca5125f8d4ba3a3c}{kv\+\_\+tbl\+\_\+min} \begin{DoxyCompactList}\small\item\em The minimum viscosity in the top boundary layer \mbox{[}Z2 T-\/1 $\sim$$>$ m2 s-\/1\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_aca87adb9636e724f7ccb78e7c640f399}\label{structmom__set__visc_1_1set__visc__cs_aca87adb9636e724f7ccb78e7c640f399}} logical \hyperlink{structmom__set__visc_1_1set__visc__cs_aca87adb9636e724f7ccb78e7c640f399}{bottomdraglaw} \begin{DoxyCompactList}\small\item\em If true, the bottom stress is calculated with a drag law c\+\_\+drag$\ast$$\vert$u$\vert$$\ast$u. The velocity magnitude may be an assumed value or it may be based on the actual velocity in the bottommost {\ttfamily H\+B\+BL}, depending on whether linear\+\_\+drag is true. Runtime parameter {\ttfamily B\+O\+T\+T\+O\+M\+D\+R\+A\+G\+L\+AW}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a89d0fc1b461da7b92a13d88a775f467a}\label{structmom__set__visc_1_1set__visc__cs_a89d0fc1b461da7b92a13d88a775f467a}} logical \hyperlink{structmom__set__visc_1_1set__visc__cs_a89d0fc1b461da7b92a13d88a775f467a}{bbl\+\_\+use\+\_\+eos} \begin{DoxyCompactList}\small\item\em If true, use the equation of state in determining the properties of the bottom boundary layer. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a081031895fa84caef378bf4507095fd1}\label{structmom__set__visc_1_1set__visc__cs_a081031895fa84caef378bf4507095fd1}} logical \hyperlink{structmom__set__visc_1_1set__visc__cs_a081031895fa84caef378bf4507095fd1}{linear\+\_\+drag} \begin{DoxyCompactList}\small\item\em If true, the drag law is cdrag$\ast${\ttfamily D\+R\+A\+G\+\_\+\+B\+G\+\_\+\+V\+EL}$\ast$u. Runtime parameter {\ttfamily L\+I\+N\+E\+A\+R\+\_\+\+D\+R\+AG}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a447192ef2c7724a34f3bb18cab38a1e9}\label{structmom__set__visc_1_1set__visc__cs_a447192ef2c7724a34f3bb18cab38a1e9}} logical \hyperlink{structmom__set__visc_1_1set__visc__cs_a447192ef2c7724a34f3bb18cab38a1e9}{channel\+\_\+drag} \begin{DoxyCompactList}\small\item\em If true, the drag is exerted directly on each layer according to what fraction of the bottom they overlie. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_aff0c2827fb211ae69bf1dfd512c26142}\label{structmom__set__visc_1_1set__visc__cs_aff0c2827fb211ae69bf1dfd512c26142}} logical \hyperlink{structmom__set__visc_1_1set__visc__cs_aff0c2827fb211ae69bf1dfd512c26142}{correct\+\_\+bbl\+\_\+bounds} \begin{DoxyCompactList}\small\item\em If true, uses the correct bounds on the B\+BL thickness and viscosity so that the bottom layer feels the intended drag. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_abf6d0c52b4c7697848e11790fed715dc}\label{structmom__set__visc_1_1set__visc__cs_abf6d0c52b4c7697848e11790fed715dc}} logical \hyperlink{structmom__set__visc_1_1set__visc__cs_abf6d0c52b4c7697848e11790fed715dc}{rino\+\_\+mix} \begin{DoxyCompactList}\small\item\em If true, use Richardson number dependent mixing. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_afadcc6cf5b628725b08e0f12a826df5f}\label{structmom__set__visc_1_1set__visc__cs_afadcc6cf5b628725b08e0f12a826df5f}} logical \hyperlink{structmom__set__visc_1_1set__visc__cs_afadcc6cf5b628725b08e0f12a826df5f}{dynamic\+\_\+viscous\+\_\+ml} \begin{DoxyCompactList}\small\item\em If true, use a bulk Richardson number criterion to determine the mixed layer thickness for viscosity. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a983bdeff4065da03fc3f5efd8ecbce98}\label{structmom__set__visc_1_1set__visc__cs_a983bdeff4065da03fc3f5efd8ecbce98}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_a983bdeff4065da03fc3f5efd8ecbce98}{bulk\+\_\+ri\+\_\+ml} \begin{DoxyCompactList}\small\item\em The bulk mixed layer used to determine the thickness of the viscous mixed layer. Nondim. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a7b5ed06a0e4ffbaf7c3f9ab964934cf1}\label{structmom__set__visc_1_1set__visc__cs_a7b5ed06a0e4ffbaf7c3f9ab964934cf1}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_a7b5ed06a0e4ffbaf7c3f9ab964934cf1}{omega} \begin{DoxyCompactList}\small\item\em The Earth\textquotesingle{}s rotation rate \mbox{[}T-\/1 $\sim$$>$ s-\/1\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a1dbc170cb7413c77db64f950deb14f39}\label{structmom__set__visc_1_1set__visc__cs_a1dbc170cb7413c77db64f950deb14f39}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_a1dbc170cb7413c77db64f950deb14f39}{ustar\+\_\+min} \begin{DoxyCompactList}\small\item\em A minimum value of ustar to avoid numerical problems \mbox{[}Z T-\/1 $\sim$$>$ m s-\/1\mbox{]}. If the value is small enough, this should not affect the solution. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a05122220f8714fdb12cd5323e95fadb1}\label{structmom__set__visc_1_1set__visc__cs_a05122220f8714fdb12cd5323e95fadb1}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_a05122220f8714fdb12cd5323e95fadb1}{tke\+\_\+decay} \begin{DoxyCompactList}\small\item\em The ratio of the natural Ekman depth to the T\+KE decay scale, nondimensional. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a949d04b33b44503dc3bf8b9f583e3932}\label{structmom__set__visc_1_1set__visc__cs_a949d04b33b44503dc3bf8b9f583e3932}} real \hyperlink{structmom__set__visc_1_1set__visc__cs_a949d04b33b44503dc3bf8b9f583e3932}{omega\+\_\+frac} \begin{DoxyCompactList}\small\item\em When setting the decay scale for turbulence, use this fraction of the absolute rotation rate blended with the local value of f, as sqrt((1-\/of)$\ast$f$^\wedge$2 + of$\ast$4$\ast$omega$^\wedge$2). \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a5e73277d3715a71844b1b7718cef2c47}\label{structmom__set__visc_1_1set__visc__cs_a5e73277d3715a71844b1b7718cef2c47}} logical \hyperlink{structmom__set__visc_1_1set__visc__cs_a5e73277d3715a71844b1b7718cef2c47}{answers\+\_\+2018} \begin{DoxyCompactList}\small\item\em If true, use the order of arithmetic and expressions that recover the answers from the end of 2018. Otherwise, use updated and more robust forms of the same expressions. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a0d83d33f4bb2e93b3f26fd76c07c05e0}\label{structmom__set__visc_1_1set__visc__cs_a0d83d33f4bb2e93b3f26fd76c07c05e0}} logical \hyperlink{structmom__set__visc_1_1set__visc__cs_a0d83d33f4bb2e93b3f26fd76c07c05e0}{debug} \begin{DoxyCompactList}\small\item\em If true, write verbose checksums for debugging purposes. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a1564bb5965c9ddbef7503f54f09f3b69}\label{structmom__set__visc_1_1set__visc__cs_a1564bb5965c9ddbef7503f54f09f3b69}} logical \hyperlink{structmom__set__visc_1_1set__visc__cs_a1564bb5965c9ddbef7503f54f09f3b69}{bbl\+\_\+use\+\_\+tidal\+\_\+bg} \begin{DoxyCompactList}\small\item\em If true, use a tidal background amplitude for the bottom velocity when computing the bottom stress. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a88a89f5b6e98277a1df6cbc2c719f407}\label{structmom__set__visc_1_1set__visc__cs_a88a89f5b6e98277a1df6cbc2c719f407}} character(len=200) \hyperlink{structmom__set__visc_1_1set__visc__cs_a88a89f5b6e98277a1df6cbc2c719f407}{inputdir} \begin{DoxyCompactList}\small\item\em The directory for input files. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a4960c26d7d7ee67335496fd4011aa9d4}\label{structmom__set__visc_1_1set__visc__cs_a4960c26d7d7ee67335496fd4011aa9d4}} type(ocean\+\_\+obc\+\_\+type), pointer \hyperlink{structmom__set__visc_1_1set__visc__cs_a4960c26d7d7ee67335496fd4011aa9d4}{obc} =$>$ N\+U\+LL() \begin{DoxyCompactList}\small\item\em Open boundaries control structure. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a430b6c639231fdc457a0a883a1286f71}\label{structmom__set__visc_1_1set__visc__cs_a430b6c639231fdc457a0a883a1286f71}} type(diag\+\_\+ctrl), pointer \hyperlink{structmom__set__visc_1_1set__visc__cs_a430b6c639231fdc457a0a883a1286f71}{diag} =$>$ N\+U\+LL() \begin{DoxyCompactList}\small\item\em A structure that is used to regulate the timing of diagnostic output. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a765c0eec288ee86e83afc501b757a821}\label{structmom__set__visc_1_1set__visc__cs_a765c0eec288ee86e83afc501b757a821}} real, dimension(\+:,\+:), allocatable \hyperlink{structmom__set__visc_1_1set__visc__cs_a765c0eec288ee86e83afc501b757a821}{tideamp} \begin{DoxyCompactList}\small\item\em R\+MS tidal amplitude at h points \mbox{[}Z T-\/1 $\sim$$>$ m s-\/1\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_afba35cd5715288e2e8e897e7f2fa1ccb}\label{structmom__set__visc_1_1set__visc__cs_afba35cd5715288e2e8e897e7f2fa1ccb}} real, dimension(\+:,\+:), allocatable \hyperlink{structmom__set__visc_1_1set__visc__cs_afba35cd5715288e2e8e897e7f2fa1ccb}{bbl\+\_\+u} \begin{DoxyCompactList}\small\item\em B\+BL mean U current \mbox{[}L T-\/1 $\sim$$>$ m s-\/1\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a29bc1720b14b784b49b21581b8985022}\label{structmom__set__visc_1_1set__visc__cs_a29bc1720b14b784b49b21581b8985022}} real, dimension(\+:,\+:), allocatable \hyperlink{structmom__set__visc_1_1set__visc__cs_a29bc1720b14b784b49b21581b8985022}{bbl\+\_\+v} \begin{DoxyCompactList}\small\item\em B\+BL mean V current \mbox{[}L T-\/1 $\sim$$>$ m s-\/1\mbox{]}. \end{DoxyCompactList}\end{DoxyCompactItemize} \textbf{ }\par \begin{DoxyCompactItemize} \item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a470ab66c77dedf6b43fbc550c374c4c8}\label{structmom__set__visc_1_1set__visc__cs_a470ab66c77dedf6b43fbc550c374c4c8}} integer \hyperlink{structmom__set__visc_1_1set__visc__cs_a470ab66c77dedf6b43fbc550c374c4c8}{id\+\_\+bbl\+\_\+thick\+\_\+u} = -\/1 \begin{DoxyCompactList}\small\item\em Diagnostics handles. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a903460d4226f41115777a23fb73726e7}\label{structmom__set__visc_1_1set__visc__cs_a903460d4226f41115777a23fb73726e7}} integer \hyperlink{structmom__set__visc_1_1set__visc__cs_a903460d4226f41115777a23fb73726e7}{id\+\_\+kv\+\_\+bbl\+\_\+u} = -\/1 \begin{DoxyCompactList}\small\item\em Diagnostics handles. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a0371d9bd070ba2e6cbe81bca566a00df}\label{structmom__set__visc_1_1set__visc__cs_a0371d9bd070ba2e6cbe81bca566a00df}} integer \hyperlink{structmom__set__visc_1_1set__visc__cs_a0371d9bd070ba2e6cbe81bca566a00df}{id\+\_\+bbl\+\_\+u} = -\/1 \begin{DoxyCompactList}\small\item\em Diagnostics handles. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_aa466dcd52f1cc0ee3157fc0130e3c483}\label{structmom__set__visc_1_1set__visc__cs_aa466dcd52f1cc0ee3157fc0130e3c483}} integer \hyperlink{structmom__set__visc_1_1set__visc__cs_aa466dcd52f1cc0ee3157fc0130e3c483}{id\+\_\+bbl\+\_\+thick\+\_\+v} = -\/1 \begin{DoxyCompactList}\small\item\em Diagnostics handles. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a0f2c1c1693cdb1c001a86fdf5c6641ab}\label{structmom__set__visc_1_1set__visc__cs_a0f2c1c1693cdb1c001a86fdf5c6641ab}} integer \hyperlink{structmom__set__visc_1_1set__visc__cs_a0f2c1c1693cdb1c001a86fdf5c6641ab}{id\+\_\+kv\+\_\+bbl\+\_\+v} = -\/1 \begin{DoxyCompactList}\small\item\em Diagnostics handles. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_aeb003715d8b60b161463c5f63333f6fe}\label{structmom__set__visc_1_1set__visc__cs_aeb003715d8b60b161463c5f63333f6fe}} integer \hyperlink{structmom__set__visc_1_1set__visc__cs_aeb003715d8b60b161463c5f63333f6fe}{id\+\_\+bbl\+\_\+v} = -\/1 \begin{DoxyCompactList}\small\item\em Diagnostics handles. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a175d85ae9bbaf132d6839021fb439145}\label{structmom__set__visc_1_1set__visc__cs_a175d85ae9bbaf132d6839021fb439145}} integer \hyperlink{structmom__set__visc_1_1set__visc__cs_a175d85ae9bbaf132d6839021fb439145}{id\+\_\+ray\+\_\+u} = -\/1 \begin{DoxyCompactList}\small\item\em Diagnostics handles. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_ab545a747b1f07fdc4070e5da3afcff4a}\label{structmom__set__visc_1_1set__visc__cs_ab545a747b1f07fdc4070e5da3afcff4a}} integer \hyperlink{structmom__set__visc_1_1set__visc__cs_ab545a747b1f07fdc4070e5da3afcff4a}{id\+\_\+ray\+\_\+v} = -\/1 \begin{DoxyCompactList}\small\item\em Diagnostics handles. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_ac43002c38cff6a7ffa20f81b5d021dfb}\label{structmom__set__visc_1_1set__visc__cs_ac43002c38cff6a7ffa20f81b5d021dfb}} integer \hyperlink{structmom__set__visc_1_1set__visc__cs_ac43002c38cff6a7ffa20f81b5d021dfb}{id\+\_\+nkml\+\_\+visc\+\_\+u} = -\/1 \begin{DoxyCompactList}\small\item\em Diagnostics handles. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__set__visc_1_1set__visc__cs_a44d9ea0c00e2c8e110bc014ff310f12a}\label{structmom__set__visc_1_1set__visc__cs_a44d9ea0c00e2c8e110bc014ff310f12a}} integer \hyperlink{structmom__set__visc_1_1set__visc__cs_a44d9ea0c00e2c8e110bc014ff310f12a}{id\+\_\+nkml\+\_\+visc\+\_\+v} = -\/1 \begin{DoxyCompactList}\small\item\em Diagnostics handles. \end{DoxyCompactList}\end{DoxyCompactItemize} \subsection{Detailed Description} Control structure for M\+O\+M\+\_\+set\+\_\+visc. Definition at line 45 of file M\+O\+M\+\_\+set\+\_\+viscosity.\+F90. The documentation for this type was generated from the following file\+:\begin{DoxyCompactItemize} \item /home/cermak/src/\+M\+O\+M6.\+devrob/src/parameterizations/vertical/M\+O\+M\+\_\+set\+\_\+viscosity.\+F90\end{DoxyCompactItemize}