\hypertarget{sscale_8f90}{}\section{sscale.\+f90 File Reference}
\label{sscale_8f90}\index{sscale.\+f90@{sscale.\+f90}}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine \hyperlink{sscale_8f90_a39da067b8870667b582ba329d60d0e04}{sscale} (data, spct, wspct, ldspct, work, nsite, npt, ctol, noneg, iscal, sfac, resid)
\end{DoxyCompactItemize}


\subsection{Function/\+Subroutine Documentation}
\hypertarget{sscale_8f90_a39da067b8870667b582ba329d60d0e04}{}\index{sscale.\+f90@{sscale.\+f90}!sscale@{sscale}}
\index{sscale@{sscale}!sscale.\+f90@{sscale.\+f90}}
\subsubsection[{sscale}]{\setlength{\rightskip}{0pt plus 5cm}subroutine sscale (
\begin{DoxyParamCaption}
\item[{double precision, dimension(npt)}]{data, }
\item[{double precision, dimension(ldspct,nsite)}]{spct, }
\item[{double precision, dimension(ldspct,nsite)}]{wspct, }
\item[{integer}]{ldspct, }
\item[{double precision, dimension(npt)}]{work, }
\item[{integer}]{nsite, }
\item[{integer}]{npt, }
\item[{double precision}]{ctol, }
\item[{integer}]{noneg, }
\item[{integer, dimension(nsite)}]{iscal, }
\item[{double precision, dimension(nsite)}]{sfac, }
\item[{double precision, dimension(npt)}]{resid}
\end{DoxyParamCaption}
)}\label{sscale_8f90_a39da067b8870667b582ba329d60d0e04}


Definition at line 45 of file sscale.\+f90.



Here is the call graph for this function\+:\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=279pt]{sscale_8f90_a39da067b8870667b582ba329d60d0e04_cgraph}
\end{center}
\end{figure}




Here is the caller graph for this function\+:\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{sscale_8f90_a39da067b8870667b582ba329d60d0e04_icgraph}
\end{center}
\end{figure}


