Functions/Subroutines | |
subroutine | solve_ode (y1, y2, mat, mat_expnu, mat_dexpnu, P_1, dt, P, lam, flg_eig) |
subroutine | solve_implicite (nli, y1, y2, mat, P_1, dt) |
subroutine | print_solve_ode (ialt, i_tube, iloop, dt, TU, pos, y0, ylcp, y1, P, a, l, ysol, yn, stab_p, stab_a) |
subroutine print_solve_ode | ( | integer | ialt, |
integer | i_tube, | ||
integer | iloop, | ||
real*8 | dt, | ||
real*8 | TU, | ||
type(coordonnees), dimension(:,:) | pos, | ||
real*8, dimension(:) | y0, | ||
real*8, dimension(:) | ylcp, | ||
real*8, dimension(:) | y1, | ||
real*8, dimension(:) | P, | ||
real*8, dimension(:,:) | a, | ||
complex*16, dimension(:) | l, | ||
real*8, dimension(:) | ysol, | ||
real*8, dimension(:) | yn, | ||
real*8, dimension(:), optional | stab_p, | ||
real*8, dimension(:), optional | stab_a | ||
) |
subroutine solve_implicite | ( | integer | nli, |
real*8, dimension(nli) | y1, | ||
real*8, dimension(nli) | y2, | ||
real*8, dimension(nli,nli) | mat, | ||
real*8, dimension(nli,nli) | P_1, | ||
real*8 | dt | ||
) |
subroutine solve_ode | ( | real*8, dimension(:) | y1, |
real*8, dimension(:) | y2, | ||
real*8, dimension(:,:) | mat, | ||
real*8, dimension(:,:) | mat_expnu, | ||
real*8, dimension(:,:) | mat_dexpnu, | ||
real*8, dimension(:,:) | P_1, | ||
real*8 | dt, | ||
real*8, dimension(:,:) | P, | ||
complex*16, dimension(0:) | lam, | ||
logical, optional | flg_eig | ||
) |