Home
last modified time | relevance | path

Searched refs:tcorecp (Results 1 – 4 of 4) sorted by relevance

/phasta/phSolver/incompressible/
H A Dsolfar.f8 & solinc, rerr, tcorecp, argument
106 real*8 tcorecp(2) local
332 tcorecp(1) = tcorecp(1) + telmcp2-telmcp1 ! elem. formation
333 tcorecp(2) = tcorecp(2) + tlescp2-tlescp1 ! linear alg. solution
H A Ditrdrv.f100 real*8 tcorecp(2), tcorecpscal(2) local
269 tcorecp(:) = zero ! used in solfar.f (solflow)
397 & solinc, rerr, tcorecp,
770 write(6,*) '(Elm. form.',tcorecp(1),
771 & ',Lin. alg. sol.',tcorecp(2),')'
778 call print_system_stats(tcorecp, tcorecpscal)
/phasta/phSolver/common/
H A Dnew_interface.h27 void print_system_stats(double *tcorecp, double *tcorecpscal);
H A Dnew_interface.c156 void print_system_stats(double *tcorecp, double *tcorecpscal) { in print_system_stats() argument
162 syst_assembly = tcorecp[0]; in print_system_stats()
163 syst_solve = tcorecp[1]; in print_system_stats()