parameterize_index Subroutine

subroutine parameterize_index(dim_num, data_num, p_data, t_data)

************80

! PARAMETERIZE_INDEX parameterizes data by its index.

Discussion:

A parameterization is required for the interpolation.

This routine provides a naive parameterization by vector index.

Licensing:

This code is distributed under the GNU LGPL license.

Modified:

19 May 2007

Author:

John Burkardt

Parameters:

Input, integer ( kind = 4 ) DIM_NUM, the spatial dimension.

Input, integer ( kind = 4 ) DATA_NUM, the number of data points.

Input, real ( kind = 8 ) P_DATA(DIM_NUM,DATA_NUM), the data values.

Output, real ( kind = 8 ) T_DATA(DATA_NUM), parameter values
assigned to the data.

Arguments

Type IntentOptional Attributes Name
integer(kind=4) :: dim_num
integer(kind=4) :: data_num
real(kind=8) :: p_data(dim_num,data_num)
real(kind=8) :: t_data(data_num)