Go to the source code of this file.
|
program | prepare_input_cpos |
|
real(r8) function, dimension(1:size(x)) | profile (function_string, x) |
|
subroutine | assign_code_parameters (codeparameters, return_status, |
|
subroutine | parse_external (EXTERNAL, shot, run, user, machine, ual_version) |
|
subroutine | integral (N, X, Y, INTYX) |
|
subroutine | integral_value (N, X, Y, INTY) |
|
subroutine prepare_input_cpos::assign_code_parameters |
( |
type (type_param), intent(in) |
codeparameters, |
|
|
integer(ikind), intent(out) |
return_status |
|
) |
| |
subroutine integral |
( |
integer |
N, |
|
|
real (r8), dimension(n) |
X, |
|
|
real (r8), dimension(n) |
Y, |
|
|
real (r8), dimension(n) |
INTYX |
|
) |
| |
subroutine integral_value |
( |
integer |
N, |
|
|
real (r8), dimension(n) |
X, |
|
|
real (r8), dimension(n) |
Y, |
|
|
real (r8), dimension(n) |
INTY |
|
) |
| |
subroutine prepare_input_cpos::parse_external |
( |
|
EXTERNAL, |
|
|
integer |
shot, |
|
|
integer |
run, |
|
|
character*(*), external |
user, |
|
|
character*(*), external |
machine, |
|
|
character*(*), external |
ual_version |
|
) |
| |
program prepare_input_cpos |
( |
| ) |
|
real(r8) function, dimension(1:size(x)) prepare_input_cpos::profile |
( |
character (len=buflen) |
function_string, |
|
|
real(r8), dimension(:) |
x |
|
) |
| |