OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
dsgraph_mod.F
Go to the documentation of this file.
1Copyright> OpenRadioss
2Copyright> Copyright (C) 1986-2025 Altair Engineering Inc.
3Copyright>
4Copyright> This program is free software: you can redistribute it and/or modify
5Copyright> it under the terms of the GNU Affero General Public License as published by
6Copyright> the Free Software Foundation, either version 3 of the License, or
7Copyright> (at your option) any later version.
8Copyright>
9Copyright> This program is distributed in the hope that it will be useful,
10Copyright> but WITHOUT ANY WARRANTY; without even the implied warranty of
11Copyright> MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12Copyright> GNU Affero General Public License for more details.
13Copyright>
14Copyright> You should have received a copy of the GNU Affero General Public License
15Copyright> along with this program. If not, see <https://www.gnu.org/licenses/>.
16Copyright>
17Copyright>
18Copyright> Commercial Alternative: Altair Radioss Software
19Copyright>
20Copyright> As an alternative to this open-source version, Altair also offers Altair Radioss
21Copyright> software under a commercial license. Contact Altair to discuss further if the
22Copyright> commercial version may interest you: https://www.altair.com/radioss/.
23!||====================================================================
24!|| dsgraph_mod ../engine/share/modules/dsgraph_mod.F
25!||--- called by ------------------------------------------------------
26!|| dsrrest ../engine/source/output/restart/rdresb.F
27!|| dswrest ../engine/source/output/restart/wrrest.F
28!|| eigcond ../engine/stub/eigcond.F
29!|| imp_buck ../engine/source/implicit/imp_buck.F
30!|| imp_chkm ../engine/source/implicit/imp_solv.F
31!|| imp_dsfext ../engine/source/implicit/imp_dsfext.F
32!|| imp_dsolv ../engine/source/implicit/imp_dsolv.F
33!|| imp_dsolv_iter ../engine/source/implicit/imp_dsolv.F
34!|| imp_lanzp ../engine/source/implicit/imp_lanz.F
35!|| imp_pcgh ../engine/source/implicit/imp_pcg.F
36!|| imp_ppcgh ../engine/source/implicit/imp_pcg.F
37!|| imp_solv ../engine/source/implicit/imp_solv.F
38!|| lin_solv ../engine/source/implicit/lin_solv.F
39!|| lin_solv2 ../engine/source/implicit/lin_solv.F
40!|| lin_solvh0 ../engine/source/implicit/lin_solv.F
41!|| lin_solvh1 ../engine/source/implicit/lin_solv.F
42!|| lin_solvhm ../engine/source/implicit/lin_solv.F
43!|| lin_solvih2 ../engine/source/implicit/lin_solv.F
44!|| lin_solvp2 ../engine/source/implicit/lin_solv.F
45!|| mumpslb ../engine/source/implicit/lin_solv.F
46!|| mumpslb_hp ../engine/source/implicit/lin_solv.F
47!|| nl_solv ../engine/source/implicit/nl_solv.f
48!|| prec_solv ../engine/source/implicit/prec_solv.F
49!|| prec_solvh ../engine/source/implicit/prec_solv.F
50!|| prec_solvp ../engine/source/implicit/prec_solv.F
51!|| radioss2 ../engine/source/engine/radioss2.F
52!|| resol ../engine/source/engine/resol.F
53!|| resol_head ../engine/source/engine/resol_head.F
54!||====================================================================
55 MODULE dsgraph_mod
56C-----------------------------------------------
57C m y _ r e a l
58C-----------------------------------------------
59#include "my_real.inc"
60C-----------------------------------------------
61C D e r i v e d T y p e D e f i n i t i o n s
62C-----------------------------------------------
63 TYPE supel
64 INTEGER :: nddl_i, nddl_f, nsdmax,
65 . nddl_m, nmdyn, krec, mrec, mdrec, kirec,
66 . nddl_i_ini, nddl_f_ini
67 INTEGER, DIMENSION(:), POINTER :: ddls, ddls_ini, child, cmdyn,
68 . ifacm, ifacm_ini
69 INTEGER, DIMENSION(:,:), POINTER :: ifac, ifac_ini
71 . , DIMENSION(:,:), POINTER :: b, ifi, d, dm
72 END TYPE supel
73C
74 TYPE prgraph
75 INTEGER :: nddl, nddl_ini, nsupel, ifile, nslevel, nsdec,
76 . nsvmax, ipri, nddl_glob, nnrp, nncp, nddlc
78 . :: cutfreq
79 INTEGER, DIMENSION(:,:), POINTER :: lsddl, LSDDL_INI,
80 . iprow, ipcol
81 INTEGER, DIMENSION(:), POINTER :: lsddl_glob, lsddl_glob_ini
82 TYPE(supel), DIMENSION(:), POINTER :: dgraph
83 END TYPE prgraph
84C
85 END MODULE dsgraph_mod
86
#define my_real
Definition cppsort.cpp:32
subroutine nl_solv(nddl, iddl, ndof, ikc, d, dr, nnz, iadk, jdik, diag_k, lt_k, f, nddli, iadi, jdii, diag_i, lt_i, itok, iadm, jdim, diag_m, lt_m, r02, dd, ddr, itask0, it, itc, ru0, rold, idiv, inprint, icprec, istop, e02, de0, eimp, inloc, nddl0, ls, u02, gap, itab, fr_elem, iad_elem, w_ddl, a, ar, v, ms, x, ipari, intbuf_tab, num_imp, ns_imp, ne_imp, nsrem, nsl, icont, graphe, fac_k, ipiv_k, nk, nmonv, imonv, monvol, igrsurf, fr_mv, volmon, ibfv, skew, xframe, mumps_par, cddlp, ind_imp, nbintc, intlist, newfront, isendto, irecvfrom, irbe3, lrbe3, ndiv, icont0, isign, fext, dg, dgr, dg0, dgr0, rfext, ls1, nodft, nodlt, irbe2, lrbe2, idiv0, relres, anew_stif)
Definition nl_solv.F:74