Searched refs:dfdt (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/dm/tutorials/ |
| H A D | ex13f90aux.F90 | 38 …ecursive subroutine forw_euler(t, dt, ib1, ibn, jb1, jbn, kb1, kbn, imax, jmax, kmax, neq, y, dfdt) argument
46 function dfdt(t, dt, ib1, ibn, jb1, jbn, kb1, kbn, imax, jmax, kmax, n, f)
51 PetscReal, dimension(n, imax, jmax, kmax) :: dfdt
52 end function dfdt
56 …y(:, 1:imax, 1:jmax, 1:kmax) = y(:, 1:imax, 1:jmax, 1:kmax) + dt*dfdt(t, dt, ib1, ibn, jb1, jbn, k…
|