39!|| fail_gene1_b ../engine/source/materials/fail/gene1/fail_gene1_b.f90
159#include "my_real.inc"
165 .
DIMENSION(:),
POINTER :: values
169 INTEGER NOTABLE, NDIM
171 TYPE(TTABLE_XY),
DIMENSION(:),
POINTER :: X
172 TYPE(TTABLE_XY),
POINTER :: Y
255 INTEGER ,
INTENT(IN) :: NEL
256 INTEGER ,
VALUE ,
INTENT(IN) :: DIMX
257 INTEGER ,
DIMENSION(DIMX,TABLE%NDIM) :: IPOS
258 my_real ,
DIMENSION(DIMX,TABLE%NDIM) :: xx
259 my_real ,
DIMENSION(NEL) :: yy, dydx
265 INTEGER ,
INTENT(IN) :: ISMOOTH
266 INTEGER ,
INTENT(IN) :: NEL
267 INTEGER ,
INTENT(IN) :: DIMX
268 INTEGER ,
DIMENSION(DIMX,TABLE%NDIM) :: IPOS
269 my_real ,
DIMENSION(DIMX,TABLE%NDIM) :: xx
270 my_real ,
DIMENSION(NEL) :: yy, dydx1, dydx2
subroutine fail_gene1_c(nel, nuparam, nuvar, nfunc, ifunc, npf, tf, time, timestep, uparam, ipg, ngl, gbuf_dt, epsp, uvar, off, epsxx, epsyy, epsxy, area, thkn, signxx, signyy, signxy, signyz, signzx, temp, dfmax, aldt, table, tdele, thk0, ipt, foff, thklyl, ntablf, itablf, lf_dammx, niparam, iparam, dt)
subroutine sigeps112(nel, ngl, nuparam, nuvar, time, timestep, uparam, uvar, jthe, off, rho0, rho, pla, dpla, epsd, soundsp, epszz, depsxx, depsyy, depszz, depsxy, depsyz, depszx, sigoxx, sigoyy, sigozz, sigoxy, sigoyz, sigozx, signxx, signyy, signzz, signxy, signyz, signzx, sigy, et, nvartmp, numtabl, vartmp, itable, table)
subroutine sigeps112c(nel, ngl, nuparam, nuvar, nfunc, ifunc, npf, tf, timestep, time, uparam, uvar, jthe, rho, pla, dpla, soundsp, epsd, off, depsxx, depsyy, depsxy, depsyz, depszx, shf, sigoxx, sigoyy, sigoxy, sigoyz, sigozx, sigy, signxx, signyy, signxy, signyz, signzx, et, numtabl, itable, table, nvartmp, vartmp)
subroutine sigeps120_tab_dp(nel, ngl, nuparam, nuvar, time, timestep, uparam, uvar, off, pla, epsd, soundsp, epspxx, epspyy, epspzz, epspxy, epspyz, epspzx, depsxx, depsyy, depszz, depsxy, depsyz, depszx, sigoxx, sigoyy, sigozz, sigoxy, sigoyz, sigozx, signxx, signyy, signzz, signxy, signyz, signzx, numtabl, itable, table, nvartmp, vartmp, temp, inloc, dplanl, dmg, dmg_scale)
subroutine sigeps120_tab_vm(nel, ngl, nuparam, nuvar, time, timestep, uparam, uvar, off, pla, epsd, soundsp, epspxx, epspyy, epspzz, epspxy, epspyz, epspzx, depsxx, depsyy, depszz, depsxy, depsyz, depszx, sigoxx, sigoyy, sigozz, sigoxy, sigoyz, sigozx, signxx, signyy, signzz, signxy, signyz, signzx, numtabl, itable, table, nvartmp, vartmp, temp, inloc, dplanl, dmg, dmg_scale)
subroutine sigeps80c(nel, nuparam, nuvar, mfunc, kfunc, npf, npt0, ipt, iflag, tf, time, timestep, uparam, rho0, area, eint, thkly, epspxx, epspyy, epspxy, epspyz, epspzx, depsxx, depsyy, depsxy, depsyz, depszx, epsxx, epsyy, epsxy, epsyz, epszx, sigoxx, sigoyy, sigoxy, sigoyz, sigozx, signxx, signyy, signxy, signyz, signzx, sigvxx, sigvyy, sigvxy, sigvyz, sigvzx, soundsp, viscmax, thk, pla, uvar, off, ngl, pm, ipm, mat, etse, gs, vol, yld, temp, die, coef, shf, epsp, table, ithk, nvartmp, vartmp, epsthtot, jthe, idt_therm, theaccfact)