OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
archloops.inc
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/.
23C ARCHINFO
24C Champ 1 = taille de groupe (NVISIZ)
25C Champ 2 = Machine Scalaire ou vectorielle (IVECTOR)
26
27 DO I=1,128
28 ARCHINFO(I,1)=0
29 ARCHINFO(I,2)=0
30 ENDDO
31C Machine generique - passe partout
32 ARCHINFO(1,1)=32
33 ARCHINFO(1,2)=0
34 ARCHN(1)='Generic'
35C Aciennes machines CRAY (ymp, ymp_spmd, CPP_c90, t90, t90_i3e
36 ARCHINFO(2,1)=512
37 ARCHINFO(2,2)=1
38 ARCHN(2)='CRAY SV1'
39C SGI65
40 ARCHINFO(3,1)=128
41 ARCHINFO(3,2)=0
42 ARCHN(3)='SGI 65'
43C HP11 - PA
44 ARCHINFO(4,1)=64
45 ARCHINFO(4,2)=0
46 ARCHN(4)='PA-RISC HP11'
47C Power4
48 ARCHINFO(5,1)=32
49 ARCHINFO(5,2)=0
50 ARCHN(5)='aix64'
51C deca
52 ARCHINFO(6,1)=32
53 ARCHINFO(6,2)=0
54 ARCHN(6)='DEC ALPHA'
55C VPP5000
56 ARCHINFO(7,1)=1024
57 ARCHINFO(7,2)=1
58 ARCHN(7)='FUJITSU VPP5000'
59C SX6
60 ARCHINFO(8,1)=4095
61 ARCHINFO(8,2)=1
62 ARCHN(8)='NEC SX6'
63C Pentium4
64 ARCHINFO(9,1)=32
65 ARCHINFO(9,2)=0
66 ARCHN(9)='linux32 pgi'
67C LINUX IA64
68 ARCHINFO(10,1)=256
69 ARCHINFO(10,2)=0
70 ARCHN(10)='linuxia64'
71C HP IA64
72 ARCHINFO(11,1)=256
73 ARCHINFO(11,2)=0
74 ARCHN(11)='IA64 HPUX11'
75C Opteron
76 ARCHINFO(12,1)=128
77 ARCHINFO(12,2)=0
78 ARCHN(12)='pgi_linux64'
79C Primepower
80 ARCHINFO(13,1)=64
81 ARCHINFO(13,2)=0
82 ARCHN(13)='FUJITSU PRIMEPOWER'
83C CX1
84 ARCHINFO(14,1)=511
85 ARCHINFO(14,2)=1
86 ARCHN(14)='CRAY X1'
87C SUN
88 ARCHINFO(15,1)=32
89 ARCHINFO(15,2)=0
90 ARCHN(15)='SUN SPARC'
91C WNT
92 ARCHINFO(16,1)=32
93 ARCHINFO(16,2)=0
94 ARCHN(16)='WNT'
95C alinux
96 ARCHINFO(17,1)=32
97 ARCHINFO(17,2)=0
98 ARCHN(17)='ALPHA LINUX'
99C p4linux964_spmd
100 ARCHINFO(18,1)=128
101 ARCHINFO(18,2)=0
102 ARCHN(18)='linux64'
103C wmr
104 ARCHINFO(19,1)=32
105 ARCHINFO(19,2)=0
106 ARCHN(19)='MY RADIOSS WINDOWS'
107C lmr
108 ARCHINFO(20,1)=32
109 ARCHINFO(20,2)=0
110 ARCHN(20)='MY RADIOSS LINUX'
111C win64_spmd
112 ARCHINFO(21,1)=128
113 ARCHINFO(21,2)=0
114 ARCHN(21)='win64'
115C p4win64_spmd
116 ARCHINFO(22,1)=128
117 ARCHINFO(22,2)=0
118 ARCHN(22)='win64'
119C p4win32
120 ARCHINFO(23,1)=64
121 ARCHINFO(23,2)=0
122 ARCHN(23)='win32'
123C Sol10 X86-64
124 ARCHINFO(24,1)=128
125 ARCHINFO(24,2)=0
126 ARCHN(24)='solarisx64'
127C p4linux32
128 ARCHINFO(25,1)=64
129 ARCHINFO(25,2)=0
130 ARCHN(25)='linux32'
131C macosx64
132 ARCHINFO(26,1)=128
133 ARCHINFO(26,2)=0
134 ARCHN(26)='macosx64'
135
136
end diagonal values have been computed in the(sparse) matrix id.SOL