Go to the source code of this file.
Functions/Subroutines | |
subroutine | v3d4n_neohookeanincompress (numnp, numel, coor, disp, nodes, Rnet, S11ev, S22ev, S33ev, S12ev, S23ev, S13ev, NumElNeigh, ElConn, alpha, Ahat, xmu, xkappa, myid, nprocs, TotNumNdComm, TotNumNeighProcs, NeighProcList, NumNdComm, neigh_lst, MPI_STATUS_SIZE, MPI_COMM_ROCFRAC, MPI_DOUBLE_PRECISION, ReqRcv, ReqSnd, StatRcv, StatSnd) |
subroutine v3d4n_neohookeanincompress | ( | integer | numnp, |
integer | numel, | ||
real*8, dimension(1:3,1:numnp) | coor, | ||
real*8, dimension(1:numnp*3) | disp, | ||
integer, dimension(1:4,1:numel) | nodes, | ||
real*8, dimension(1:numnp*3) | Rnet, | ||
real*8, dimension(1:numel) | S11ev, | ||
real*8, dimension(1:numel) | S22ev, | ||
real*8, dimension(1:numel) | S33ev, | ||
real*8, dimension(1:numel) | S12ev, | ||
real*8, dimension(1:numel) | S23ev, | ||
real*8, dimension(1:numel) | S13ev, | ||
integer, dimension(1:numnp) | NumElNeigh, | ||
integer, dimension(1:numnp,1:40) | ElConn, | ||
real*8, dimension(1:4,1:numel) | alpha, | ||
real*8, dimension(1:numnp) | Ahat, | ||
real*8 | xmu, | ||
real*8 | xkappa, | ||
integer | myid, | ||
integer | nprocs, | ||
integer | TotNumNdComm, | ||
integer | TotNumNeighProcs, | ||
integer, dimension(1:totnumneighprocs) | NeighProcList, | ||
integer, dimension(1:totnumneighprocs) | NumNdComm, | ||
type(send_buf), dimension(1:totnumneighprocs) | neigh_lst, | ||
integer | MPI_STATUS_SIZE, | ||
integer | MPI_COMM_ROCFRAC, | ||
integer | MPI_DOUBLE_PRECISION, | ||
integer, dimension(1:totnumneighprocs) | ReqRcv, | ||
integer, dimension(1:totnumneighprocs) | ReqSnd, | ||
integer, dimension(1:mpi_status_size,1:totnumneighprocs) | StatRcv, | ||
integer, dimension(1:mpi_status_size,1:totnumneighprocs) | StatSnd | ||
) |
Definition at line 53 of file v3d4n_NeoHookeanInCompress.f90.
References Color::alpha(), i, j, k, and StopWatch::stop().