\hypertarget{sshift_8f90}{}\section{sshift.\+f90 File Reference}
\label{sshift_8f90}\index{sshift.\+f90@{sshift.\+f90}}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
double precision function \hyperlink{sshift_8f90_a2688fe3d7ac81ecd0fa061c6657bf7e3}{sshift} (data, spct, ldspct, nsi, npt, nft, ideriv, srange, ctol, noneg, tmpdat, tmpclc, wspec, work, sfac)
\end{DoxyCompactItemize}


\subsection{Function/\+Subroutine Documentation}
\hypertarget{sshift_8f90_a2688fe3d7ac81ecd0fa061c6657bf7e3}{}\index{sshift.\+f90@{sshift.\+f90}!sshift@{sshift}}
\index{sshift@{sshift}!sshift.\+f90@{sshift.\+f90}}
\subsubsection[{sshift}]{\setlength{\rightskip}{0pt plus 5cm}double precision function sshift (
\begin{DoxyParamCaption}
\item[{double precision, dimension(npt)}]{data, }
\item[{double precision, dimension(ldspct,nsi)}]{spct, }
\item[{integer}]{ldspct, }
\item[{integer}]{nsi, }
\item[{integer}]{npt, }
\item[{integer}]{nft, }
\item[{integer}]{ideriv, }
\item[{double precision}]{srange, }
\item[{double precision}]{ctol, }
\item[{integer}]{noneg, }
\item[{double precision, dimension(2$\ast$nft)}]{tmpdat, }
\item[{double precision, dimension(2$\ast$nft)}]{tmpclc, }
\item[{double precision, dimension(ldspct,nsi)}]{wspec, }
\item[{double precision, dimension(2$\ast$nft)}]{work, }
\item[{double precision, dimension(nsi)}]{sfac}
\end{DoxyParamCaption}
)}\label{sshift_8f90_a2688fe3d7ac81ecd0fa061c6657bf7e3}


Definition at line 44 of file sshift.\+f90.



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


