2Copyright> Copyright (C) 1986-2025 Altair Engineering Inc.
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.
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.
14Copyright> You should have received a copy of
the GNU Affero General Public License
15Copyright> along with
this program. If not, see <https:
18Copyright> Commercial Alternative: Altair Radioss Software
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:
25 PARAMETER(LIMPL2 = 132)
26 COMMON /IMPL2/ DT_IMP,L_TOL,N_TOL,D_TOL,KZ_TOL,SCAL_DTP,
27 . SCAL_DTN,DT_MIN,DT_MAX,P_MACH,SK_INT,ALEN,
28 . ALEN0,HHT_A,DAMPA_IMP,DAMPB_IMP,DT1_IMP,
29 . NEWM_A,NEWM_B,SCAL_DTQ,LS_TOL,DTIMPF(101),
30 . N_TOLE,N_TOLF,N_TOLU,DLA_RIKS,SCAL_RIKS,
31 . R_N2,RF_MAX,RF_MIN,DT0_IMP,TOL_DIV,PRSTIFMAT_TOL
34 . DT_IMP,L_TOL,N_TOL,D_TOL,KZ_TOL,SCAL_DTP,SCAL_DTN,DT_MIN,
35 . DT_MAX,P_MACH,SK_INT,ALEN,ALEN0,HHT_A,DAMPA_IMP,DAMPB_IMP,
36 . DT1_IMP,NEWM_A,NEWM_B,SCAL_DTQ ,LS_TOL,DTIMPF,
37 . N_TOLE,N_TOLF,N_TOLU,DLA_RIKS,SCAL_RIKS,R_N2,RF_MAX,RF_MIN,
38 . DT0_IMP,TOL_DIV,PRSTIFMAT_TOL
end diagonal values have been computed in the(sparse) matrix id.SOL
1.15.0