Go to the source code of this file.
Functions/Subroutines | |
pure real(8) function | rfmtinp (nr, nri, wr, rfmt1, rfmt2) |
pure real(8) function rfmtinp | ( | integer, intent(in) | nr, |
integer, intent(in) | nri, | ||
real(8), dimension(nr), intent(in) | wr, | ||
real(8), dimension(*), intent(in) | rfmt1, | ||
real(8), dimension(*), intent(in) | rfmt2 | ||
) |
Definition at line 9 of file rfmtinp.f90.