/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/ |
H A D | mpcs.f | 23 & co,xboun,ctrl,typeboun,istep,istat,n,iline,ipol,inl,ipoinp, argument 30 character*1 typeboun(*),inpc(*) local 107 & typeboun) 113 & typeboun) 119 & typeboun) 125 & typeboun,iperturb,node,idirref,xboun) 152 & typeboun) 157 & nboun,nboun_,xboun,inode,node,co,typeboun) 162 & nboun,nboun_,inode,node,co,typeboun) 168 & typeboun,iperturb,node,idirref,xboun) [all …]
|
H A D | spcmatch.f | 21 & nreorder,mi,typeboun) 28 character*1 typeboun(*) 67 if(typeboun(i).eq.'F') cycle 78 if(typeboun(i).eq.'F') cycle
|
H A D | writeboun.f | 19 subroutine writeboun(nodeboun,ndirboun,xboun,typeboun,nboun) argument 25 character*1 typeboun(*) local 33 & ndirboun(i),xboun(i),typeboun(i)
|
H A D | gen3dtruss.f | 21 & ikboun,ilboun,nboun,nboun_,typeboun,xboun,xta,jact,co, argument 33 character*1 type,typeboun(*) local 143 & typeboun,iperturb,i,idirref,xboun) 158 & typeboun,iperturb,i,idirref,xboun) 167 & typeboun,iperturb,i,idirref,xboun) 184 & type,typeboun,nmethod,iperturb,fixed,vold,
|
H A D | basemotions.f | 20 & xboun,ndirboun,iamboun,typeboun,nboun,istep,istat,n,iline,ipol, argument 27 character*1 typeboun(*),type,inpc(*) local 130 typeboun(i)=type 143 typeboun(i)=type
|
H A D | retainednodaldofss.f | 23 & co,labmpc,typeboun,istat,n,iline,ipol, argument 33 character*1 typeboun(*),type,inpc(*) local 114 & type,typeboun,nmethod,iperturb,fixed,vold,ktrue,mi, 149 & type,typeboun,nmethod,iperturb,fixed,vold,ktrue, 162 & labmpc,type,typeboun,nmethod,iperturb,fixed,
|
H A D | bounadd.f | 23 & typeboun,nmethod,iperturb,fixed,vold,nodetrue,mi,label) argument 31 character*1 type,typeboun(*) local 132 if(typeboun(j).ne.type) cycle loop 151 typeboun(nboun)=type 201 if(typeboun(j).ne.type) cycle 325 typeboun(nboun)=type
|
H A D | boundarys.f | 23 & co,labmpc,boun_flag,typeboun,istat,n,iline,ipol, argument 33 character*1 typeboun(*),type,inpc(*) local 158 if(typeboun(j).ne.'B') then 163 typeboun(nbounnew)=typeboun(j) 383 & type,typeboun,nmethod,iperturb,fixed,vold,ktrue, 433 & type,typeboun,nmethod,iperturb,fixed,vold,ktrue, 462 & labmpc,type,typeboun,nmethod,iperturb,fixed,
|
H A D | bounaddf.f | 23 & typeboun,nmethod,iperturb,vold,mi, argument 34 character*1 type,typeboun(*) local 114 if(typeboun(j).ne.type) cycle loop 134 typeboun(nboun)=type 231 if(typeboun(j).ne.type) cycle 335 typeboun(nboun)=type
|
H A D | rigidbodys.f | 23 & ctrl,typeboun,istep,istat,n,iline,ipol,inl,ipoinp,inp,co, argument 30 character*1 typeboun(*),inpc(*) local 325 & typeboun,co,jmin,jmax) 335 & nboun_,node,typeboun,co,jmin,jmax) 368 & nboun_,node,typeboun,co,jmin,jmax) 396 & nboun,nboun_,node,typeboun,co,jmin,jmax)
|
H A D | gen3dboun.f | 20 & xboun,iamboun,typeboun,iponoel,inoel,iponoelmax,kon,ipkon, argument 32 character*1 type,typeboun(*) local 127 & type,typeboun,nmethod,iperturb,fixed,vold, 461 & type,typeboun,nmethod,iperturb,fixed,vold, 718 & typeboun,iperturb,node,idirref,xboun) 727 & typeboun,iperturb,node,idirref,xboun) 849 & typeboun,iperturb,node,idirref,xboun) 858 & typeboun,iperturb,node,idirref,xboun) 912 & typeboun,iperturb,node,idirref,xboun) 927 & typeboun,iperturb,node,idirref,xboun) [all …]
|
H A D | boundaryfs.f | 23 & co,labmpc,typeboun,istat,n,iline,ipol, argument 36 character*1 typeboun(*),type,inpc(*) local 200 & type,typeboun,nmethod,iperturb,vold,mi, 257 & type,typeboun,nmethod,iperturb,vold,mi, 270 & labmpc,type,typeboun,nmethod,iperturb,
|
H A D | gen3delem.f | 26 & iperturb,tinc,tper,tmin,tmax,ctrl,typeboun,nmethod,nset,set, argument 39 character*1 typeboun(*) local 230 & nodeboun,ndirboun,xboun,iamboun,typeboun,nam,ntrans,inotr, 278 & nboun_,nodeboun,ndirboun,xboun,iamboun,typeboun,ipompc, 432 & nboun_,nodeboun,ndirboun,xboun,iamboun,typeboun,ithermal, 441 & xboun,iamboun,typeboun,iponoel,inoel,iponoelmax,kon,ipkon, 456 & iamboun,typeboun,mi,vold) 488 & iamboun,typeboun,xboun,nmethod,iperturb,istep,vold,mi,
|
H A D | beammpc.f | 21 & ikboun,ilboun,nboun,nboun_,inode,node,co,typeboun) argument 31 character*1 typeboun(*) local 129 typeboun(nboun)='U'
|
H A D | straightmpc.f | 21 & ikboun,ilboun,nboun,nboun_,xboun,inode,node,co,typeboun) argument 31 character*1 typeboun(*) local 125 typeboun(nboun)='U'
|
H A D | applyboun.f | 20 & nboun,typeboun,nelemload,nload,sideload,isolidsurf,nsolidsurf, argument 31 character*1 typeboun(*) local 69 if(typeboun(iboun).ne.'F') cycle
|
H A D | rigidmpc.f | 21 & ikboun,ilboun,nboun,nboun_,node,typeboun,co,jmin,jmax) 28 character*1 typeboun(*) 120 typeboun(nboun)='R'
|
H A D | planempc.f | 21 & ikboun,ilboun,nboun,nboun_,xboun,inode,node,co,typeboun) 31 character*1 typeboun(*) 160 typeboun(nboun)='U'
|
H A D | remastruct.c | 35 char *typeboun,double **cvp,double **cvinip,ITG *iit, in remastruct() argument 103 ikboun,ilboun,iperturb,mi,mortar,typeboun,labmpc, in remastruct() 115 ikboun,ilboun,iperturb,mi,mortar,typeboun,labmpc, in remastruct()
|
H A D | gen3dsurf.f | 24 & typeboun,mi,vold) argument 33 character*1 type,typeboun(*) local 266 & labmpc,type,typeboun,nmethod,iperturb,
|
H A D | remastructar.c | 33 ITG *mcs,ITG *mortar,char *typeboun,ITG *iit, in remastructar() argument 76 ikboun,ilboun,iperturb,mi,mortar,typeboun,labmpc, in remastructar()
|
H A D | gen3dconnect.f | 22 & nboun_,nodeboun,ndirboun,xboun,iamboun,typeboun,ithermal, argument 32 character*1 type,typeboun(*) local 283 & labmpc,type,typeboun,nmethod,iperturb,
|
H A D | CalculiXstep.c | 415 NNEW(typeboun,char,nboun_+1); in CalculiXstep() 649 RENEW(typeboun,char,nboun_+1); in CalculiXstep() 917 if(strcmp1(&typeboun[i],"F")==0) continue; in CalculiXstep() 1102 mi,typeboun)); in CalculiXstep() 1136 RENEW(typeboun,char,*nboun+1); in CalculiXstep() 1308 ikboun,ilboun,iperturb,mi,&mortar,typeboun,labmpc, in CalculiXstep() 1376 ielprop,prop,typeboun,&mortar,mpcinfo,tietol,ics, in CalculiXstep() 1511 orname,typeboun,t0g,t1g); in CalculiXstep() 1614 typeboun,t0g,t1g); in CalculiXstep() 1671 ielprop,prop,typeboun,&mortar,mpcinfo,tietol,ics, in CalculiXstep() [all …]
|
H A D | ccx_2.18.c | 262 NNEW(typeboun,char,nboun_+1); in main() 497 RENEW(typeboun,char,nboun_+1); in main() 746 if(strcmp1(&typeboun[i],"F")==0) continue; in main() 928 mi,typeboun)); in main() 962 RENEW(typeboun,char,nboun+1); in main() 1145 ikboun,ilboun,iperturb,mi,&mortar,typeboun,labmpc, in main() 1215 ielprop,prop,typeboun,&mortar,mpcinfo,tietol,ics, in main() 1350 orname,typeboun,t0g,t1g); in main() 1453 typeboun,t0g,t1g); in main() 1510 ielprop,prop,typeboun,&mortar,mpcinfo,tietol,ics, in main() [all …]
|
H A D | gen3dforc.f | 24 & iamboun,typeboun,xboun,nmethod,iperturb,istep,vold,mi, argument 35 character*1 type,typeboun(*) local 224 & idepnodes,typeboun,co,xboun,istep,k,ndepnodes, 500 & type,typeboun,nmethod,iperturb,fixed,vold, 668 & typeboun,iperturb,node,idirref,xboun) 683 & typeboun,iperturb,node,idirref,xboun) 692 & typeboun,iperturb,node,idirref,xboun)
|