Home
last modified time | relevance | path

Searched refs:nmpc_ (Results 1 – 25 of 46) sorted by relevance

12

/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/
H A Dmpcs.f21 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,lakon,ipkon,kon,nk,nk_, argument
38 & nset,nset_,nalset,nalset_,nmpc,nmpc_,mpcfree,nk,nk_,ikmpc(*), local
104 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
110 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
116 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
122 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
149 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
155 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
160 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
165 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
[all …]
H A Dallocation.f201 nmpc_=nmpc_+ibound
624 nmpc_=nmpc_+3
701 nmpc_=nmpc_+3
752 nmpc_=nmpc_+1
1309 nmpc_=nmpc_+1
1312 nmpc_=nmpc_+3
1529 nmpc_=nmpc_+3
1713 nmpc_=nmpc_+1
1716 nmpc_=nmpc_+3
1839 nmpc_=nmpc_+1
[all …]
H A Dgen3dtruss.f19 subroutine gen3dtruss(ipompc,nodempc,coefmpc,nmpc,nmpc_, argument
36 integer ipompc(*),nodempc(3,*),nmpc,nmpc_,mpcfree,mi(*), local
70 if(nmpc.gt.nmpc_) then
140 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
155 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
164 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
182 & nmpc,nmpc_,mpcfree,inotr,trab,ntrans,
H A Dgen3dboun.f125 & nmpc,nmpc_,mpcfree,inotr,trab,ntrans,
459 & nmpc,nmpc_,mpcfree,inotr,trab,ntrans,
520 if(nmpc.gt.nmpc_) then
924 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
971 if(nmpc.gt.nmpc_) then
1034 if(nmpc.gt.nmpc_) then
1085 if(nmpc.gt.nmpc_) then
1131 if(nmpc.gt.nmpc_) then
1179 if(nmpc.gt.nmpc_) then
1237 if(nmpc.gt.nmpc_) then
[all …]
H A Dtiedcontact.c31 ITG *nmpc_, ITG *mi, ITG *nk,ITG *istep,ITG *ikboun, in tiedcontact() argument
135 RENEW(ipompc,ITG,*nmpc_+neq); in tiedcontact()
136 RENEW(labmpc,char,20*(*nmpc_+neq)+1); in tiedcontact()
137 RENEW(ikmpc,ITG,*nmpc_+neq); in tiedcontact()
138 RENEW(ilmpc,ITG,*nmpc_+neq); in tiedcontact()
139 RENEW(fmpc,double,*nmpc_+neq); in tiedcontact()
181 (*nmpc_)+=nmpctied; in tiedcontact()
H A Dgen3dmpc.f19 subroutine gen3dmpc(ipompc,nodempc,coefmpc,nmpc,nmpc_,mpcfree, argument
33 integer ipompc(*),nodempc(3,*),nmpc,nmpc_,mpcfree,ikmpc(*), local
129 if(nmpc.gt.nmpc_) then
184 if(nmpc.gt.nmpc_) then
229 if(nmpc.gt.nmpc_) then
287 if(nmpc.gt.nmpc_) then
335 if(nmpc.gt.nmpc_) then
H A Dgen3dsurf.f20 & lakon,ne,iponor,knor,ipompc,nodempc,coefmpc,nmpc,nmpc_, argument
39 & iponor(2,*),knor(*),ipompc(*),nodempc(3,*),nmpc,nmpc_, local
90 if(nmpc.gt.nmpc_) then
144 if(nmpc.gt.nmpc_) then
219 if(nmpc.gt.nmpc_) then
264 & nmpc,nmpc_,mpcfree,inotr,trab,ntrans,
H A Dretainednodaldofss.f21 & iamboun,nam,ipompc,nodempc,coefmpc,nmpc,nmpc_, argument
42 & nmpc,nmpc_,mpcfree,inotr(2,*),ikboun(*),ilboun(*),ikmpc(*), local
112 & coefmpc,nmpc,nmpc_,mpcfree,inotr,trab,
147 & coefmpc,nmpc,nmpc_,mpcfree,inotr,trab,
160 & coefmpc,nmpc,nmpc_,mpcfree,inotr,trab,
H A Dgen3dconnect.f21 & nmpc_,mpcfree,ikmpc,ilmpc,labmpc,vold,ikboun,ilboun,nboun, argument
37 & rig(*),iponor(2,*),knor(*),ipompc(*),nodempc(3,*),nmpc,nmpc_, local
114 if(nmpc.gt.nmpc_) then
169 if(nmpc.gt.nmpc_) then
228 if(nmpc.gt.nmpc_) then
281 & nmpc,nmpc_,mpcfree,inotr,trab,ntrans,
H A Dgen3dmembrane.f19 subroutine gen3dmembrane(ipompc,nodempc,coefmpc,nmpc,nmpc_, argument
29 integer ipompc(*),nodempc(3,*),nmpc,nmpc_,mpcfree, local
57 if(nmpc.gt.nmpc_) then
H A Dmpcadd.f20 & coefmpc,nmpc,nmpc_,mpcfree,orab,ikboun,ikmpc,ilmpc,co,labmpc, argument
32 integer nodedep,is,ie,nboun,i,j,ipompc(*),nodempc(3,*),nmpc,nmpc_, local
59 if(nmpc.gt.nmpc_) then
121 if(nmpc.gt.nmpc_) then
H A Dgen3delem.f20 & nmpc,nmpc_,mpcfree,ikmpc,ilmpc,labmpc,ikboun,ilboun,nboun, argument
46 integer ipompc(*),nodempc(3,*),nmpc,nmpc_,mpcfree,ikmpc(*), local
228 & tper,tmin,tmax,ctrl,ipompc,nodempc,coefmpc,nmpc,nmpc_,
279 & nodempc,coefmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,labmpc,
431 & nmpc_,mpcfree,ikmpc,ilmpc,labmpc,vold,ikboun,ilboun,nboun,
442 & lakon,ne,iponor,xnor,knor,ipompc,nodempc,coefmpc,nmpc,nmpc_,
452 & lakon,ne,iponor,knor,ipompc,nodempc,coefmpc,nmpc,nmpc_,
468 call gen3dmpc(ipompc,nodempc,coefmpc,nmpc,nmpc_,mpcfree,
485 & coefmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,labmpc,iponoel,inoel,
H A Ddistributingcouplings.f20 & coefmpc,nmpc,nmpc_,mpcfree,nk,ikmpc,ilmpc, argument
34 integer ipompc(*),nodempc(3,*),nmpc,nmpc_,mpcfree,istep,istat, local
148 if(nmpc.gt.nmpc_) then
240 if(nmpc.gt.nmpc_) then
318 if(nmpc.gt.nmpc_) then
H A Drigidbodys.f21 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,lakon,ipkon,kon,nk,nk_, argument
38 & nset,nset_,nalset,nalset_,nmpc,nmpc_,mpcfree,nk,nk_,ikmpc(*), local
323 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,nk,nk_,
333 & irotnode,labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
366 & irotnode,labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
394 & irotnode,labmpc,nmpc,nmpc_,mpcfree,ikmpc,
H A Dboundaryfs.f21 & iamboun,amname,nam,ipompc,nodempc,coefmpc,nmpc,nmpc_, argument
47 & nmpc,nmpc_,mpcfree,ikboun(*),ilboun(*),ikmpc(*), local
198 & coefmpc,nmpc,nmpc_,mpcfree,trab,
255 & coefmpc,nmpc,nmpc_,mpcfree,trab,
268 & coefmpc,nmpc,nmpc_,mpcfree,trab,
H A Dgenmpc.f20 & ipompc,nodempc,coefmpc,nmpc,nmpc_,labmpc,mpcfree,ikmpc, argument
35 & node,i,j,k,m,ipompc(*),nodempc(3,*),nmpc,nmpc_,mpcfree, local
103 if(nmpc.gt.nmpc_) then
H A Dbeammpc.f20 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,nk,nk_,nodeboun,ndirboun, argument
34 integer ipompc(*),nodempc(3,*),nmpc,nmpc_,mpcfree,nk,nk_,ikmpc(*), local
82 if(nmpc.gt.nmpc_) then
H A Dstraightmpc.f20 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,nk,nk_,nodeboun,ndirboun, argument
34 integer ipompc(*),nodempc(3,*),nmpc,nmpc_,mpcfree,nk,nk_, local
78 if(nmpc.gt.nmpc_) then
H A Dnetworkmpcs.f20 & nmpc,nmpc_,mpcfree,nk,ikmpc,ilmpc, argument
32 integer ipompc(*),nodempc(3,*),nmpc,nmpc_,mpcfree,istep,istat, local
73 if(nmpc.gt.nmpc_) then
H A Dreadnewmesh.c39 ITG **nodempcp,double **coefmpcp,ITG *nmpc,ITG *nmpc_, in readnewmesh() argument
209 *nmpc_+=3*nnodestet; in readnewmesh()
210 RENEW(ipompc,ITG,*nmpc_); in readnewmesh()
211 RENEW(labmpc,char,20**nmpc_+1); in readnewmesh()
212 RENEW(ikmpc,ITG,*nmpc_); in readnewmesh()
213 RENEW(ilmpc,ITG,*nmpc_); in readnewmesh()
245 nodempc,coefmpc,nmpc,nmpc_,labmpc,mpcfree,ikmpc,ilmpc)); in readnewmesh()
312 nodempc,coefmpc,nmpc,nmpc_,labmpc,mpcfree,ikmpc,ilmpc, in readnewmesh()
H A Dgen3dforc.f21 & coefmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,labmpc,iponoel,inoel, argument
42 & nmpc,nmpc_,mpcfree,ikmpc(*),ilmpc(*),iponoel(*),inoel(3,*), local
222 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,nk,nk_,
498 & nmpc,nmpc_,mpcfree,inotr,trab,ntrans,
528 if(nmpc.gt.nmpc_) then
665 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
680 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
689 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,
738 if(nmpc.gt.nmpc_) then
835 if(nmpc.gt.nmpc_) then
[all …]
H A Drigidmpc.f20 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,nk,nk_,nodeboun,ndirboun,
31 integer ipompc(*),nodempc(3,*),nmpc,nmpc_,mpcfree,nk,nk_,
58 if(nmpc.gt.nmpc_) then
H A Dplanempc.f20 & labmpc,nmpc,nmpc_,mpcfree,ikmpc,ilmpc,nk,nk_,nodeboun,ndirboun,
34 integer ipompc(*),nodempc(3,*),nmpc,nmpc_,mpcfree,nk,nk_,
95 if(nmpc.gt.nmpc_) then
H A Dboundarys.f21 & iamboun,amname,nam,ipompc,nodempc,coefmpc,nmpc,nmpc_, argument
43 & nmpc,nmpc_,mpcfree,inotr(2,*),ikboun(*),ilboun(*),ikmpc(*), local
381 & coefmpc,nmpc,nmpc_,mpcfree,inotr,trab,
431 & coefmpc,nmpc,nmpc_,mpcfree,inotr,trab,
460 & coefmpc,nmpc,nmpc_,mpcfree,inotr,trab,
H A Dstatics.f22 & iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc, argument
50 & nmpc,nmpc_,ikmpc(*),ilmpc(*),mpcfree,nset,mcs,ipoinpc(0:*), local
164 & iendset,ialset,ipompc,nodempc,coefmpc,nmpc,nmpc_,ikmpc,

12