CG
Version 25
|
Go to the source code of this file.
Functions | |
c ************************************************************************c Visco Plastic etc for | !Dx (2 *nu *u.x)+Dy(nu *u.y) getCoeffForDxADxPlusDyBDy(au |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for | !Dy (nu *v.x) getCoeffForDyADx(bu |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz | Dx (nu *v.x)+Dy(2 *nu *v.y) getCoeffForDxADxPlusDyBDy(av |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz | Dx (nu *u.y) getCoeffForDxADy(bv |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz | if (computeMatrix.eq.1) then t1 |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear GRIDTYPE | residual (i1, i2, i3, tc) |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear GRIDTYPE etc for nuzpz Get coefficients etc for nuzpz | residual (i1, i2, i3, uc) |
Variables | |
c ************************************************************************c Visco Plastic | Model |
c ************************************************************************c Visco Plastic | c |
c ************************************************************************c Visco Plastic | a11mh |
c ************************************************************************c Visco Plastic | a22ph |
c ************************************************************************c Visco Plastic etc for * | nuzmz |
c ************************************************************************c Visco Plastic etc for * | numzz |
c ************************************************************************c Visco Plastic etc for * | nuzzz |
c ************************************************************************c Visco Plastic etc for * | nupzz |
c ************************************************************************c Visco Plastic etc for * | nuzpz |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients | b11ph |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients | b11mh |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear | adc4 |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear GRIDTYPE etc for !Dx | ( | 2 *nu *u. | x | ) |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear GRIDTYPE etc for nuzpz Get coefficients etc for !Dy | ( | nu *v. | x | ) |
c************************************************************************ c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz Dx | ( | nu *v. | x | ) |
c************************************************************************ c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz * nuzpz Dx | ( | nu *u. | y | ) |
c************************************************************************ c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz * nuzpz nuzpz if | ( | computeMatrix.eq. | 1 | ) |
c************************************************************************ c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz * nuzpz nuzpz curvilinear GRIDTYPE residual | ( | i1 | , |
i2 | , | ||
i3 | , | ||
tc | |||
) |
c************************************************************************ c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz * nuzpz nuzpz curvilinear GRIDTYPE etc for nuzpz Get coefficients etc for nuzpz residual | ( | i1 | , |
i2 | , | ||
i3 | , | ||
uc | |||
) |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear GRIDTYPE a11mh |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear GRIDTYPE a22ph |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear GRIDTYPE etc for nuzpz Get coefficients etc for nuzpz adc4 |
Referenced by Cgins::addForcing().
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear GRIDTYPE etc for nuzpz Get coefficients b11mh |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear GRIDTYPE etc for nuzpz Get coefficients b11ph |
c************************************************************************ c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz * nuzpz nuzpz curvilinear c |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear GRIDTYPE etc for nuzpz Get coefficients etc for numzz |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear GRIDTYPE etc for nuzpz Get coefficients etc for nupzz |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear GRIDTYPE etc for nuzpz Get coefficients etc for nuzmz |
c ************************************************************************c Visco Plastic etc for nuzpz Get coefficients etc for nuzpz *nuzpz nuzpz curvilinear GRIDTYPE etc for * nuzpz |