/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/ |
H A D | materialdata_sp.f | 19 & elconloc,kode,plicon,nplicon,npmat_,plconloc,ncmat_) argument 26 & itemp,ncmat_,id,nplicon(0:ntmat_,*),npmat_ local 29 & plicon(0:2*npmat_,ntmat_,*),plconloc(802) 43 if(npmat_.eq.0) then 61 & 2*npmat_+1,id) 74 call plcopy(plicon,nplicon,plconloc,npmat_,ntmat_, 80 call plmix(plicon,nplicon,plconloc,npmat_,ntmat_,
|
H A D | plastics.f | 19 subroutine plastics(inpc,textpart,nelcon,nmat,ntmat_,npmat_, argument 34 integer nelcon(2,*),nmat,ntmat_,ntmat,npmat_,npmat,istep, 40 real*8 plicon(0:2*npmat_,ntmat_,*),plkcon(0:2*npmat_,ntmat_,*), 168 if(npmat.gt.npmat_) then 226 if(npmat.gt.npmat_) then 281 & 2*npmat_+1,id) 294 call plcopy(plicon,nplicon,plconloc,npmat_,ntmat_, 300 call plmix(plicon,nplicon,plconloc,npmat_,ntmat_, 347 & 2*npmat_+1,id) 360 call plcopy(plkcon,nplkcon,plconloc,npmat_,ntmat_, [all …]
|
H A D | plmix.f | 19 subroutine plmix(plcon,nplcon,plconloc,npmat_,ntmat_, argument 38 integer imat,ndata,ntmat_,npmat_,nplcon(0:ntmat_,*),nelem, 41 real*8 eplmin,eplmax,depl,epla,plcon(0:2*npmat_,ntmat_,*), 120 call plinterpol(plcon,nplcon,j,s2,dummy,npmat_,ntmat_, 141 call plinterpol(plcon,nplcon,j-1,s1,dummy,npmat_,ntmat_, 178 & dummy,npmat_,ntmat_,imat,nelem,epla) 181 & dummy,npmat_,ntmat_,imat,nelem,epla) 195 & dummy,npmat_,ntmat_,imat,nelem,epla) 198 & dummy,npmat_,ntmat_,imat,nelem,epla)
|
H A D | cyclichardenings.f | 20 & npmat_,plicon,nplicon,ncmat_,elcon,matname, argument 32 integer nelcon(2,*),nmat,ntmat_,ntmat,npmat_,npmat,istep,ier, local 36 real*8 plicon(0:2*npmat_,ntmat_,*),temperature, 130 if(npmat.gt.npmat_) then 165 & 2*npmat_+1,id) 178 call plcopy(plicon,nplicon,plconloc,npmat_,ntmat_, 184 call plmix(plicon,nplicon,plconloc,npmat_,ntmat_,
|
H A D | materialdata_me.f | 21 & nplicon,plkcon,nplkcon,npmat_,plconloc,mi,dtime,iint, argument 38 & nplicon(0:ntmat_,*),nplkcon(0:ntmat_,*),npmat_ local 44 & plicon(0:2*npmat_,ntmat_,*),plkcon(0:2*npmat_,ntmat_,*), 201 call plcopy(plicon,nplicon,plconloc,npmat_,ntmat_, 309 if(npmat_.eq.0) then 327 & nplicon(0,imat),2*npmat_+1,id) 340 call plcopy(plicon,nplicon,plconloc,npmat_, 346 call plmix(plicon,nplicon,plconloc,npmat_, 359 & nplkcon(0,imat),2*npmat_+1,id) 372 call plcopy(plkcon,nplkcon,plconloc,npmat_, [all …]
|
H A D | plcopy.f | 19 subroutine plcopy(plcon,nplcon,plconloc,npmat_,ntmat_, argument 32 integer imat,ndata,ntmat_,npmat_,nplcon(0:ntmat_,*),nelem, 35 real*8 eplmin,eplmax,depl,epla,plcon(0:2*npmat_,ntmat_,*), 64 & plconloc(2*k),dummy,npmat_,ntmat_,imat,nelem,epla) 75 & plconloc(400+2*k),dummy,npmat_,ntmat_,imat,nelem,epla)
|
H A D | changeplastics.f | 19 subroutine changeplastics(inpc,textpart,imat,ntmat_,npmat_, argument 32 integer imat,ntmat_,ntmat,npmat_,npmat,istep,nelcon(2,*), local 36 real*8 plicon(0:2*npmat_,ntmat_,*),plkcon(0:2*npmat_,ntmat_,*), 142 if(npmat.gt.npmat_) then 207 if(npmat.gt.npmat_) then
|
H A D | resultsmech_u.f | 24 & xstateini,xstiff,xstate,npmat_,matname,mi,ielas,icmd, argument 43 & nplicon(0:ntmat_,*),nplkcon(0:ntmat_,*),npmat_,calcul_fn, local 54 & plicon(0:2*npmat_,ntmat_,*),plkcon(0:2*npmat_,ntmat_,*), 68 & xstateini,xstiff,xstate,npmat_,matname,mi,ielas,icmd, 81 & xstateini,xstiff,xstate,npmat_,matname,mi,ielas,icmd, 95 & xstateini,xstiff,xstate,npmat_,matname,mi,ielas,icmd,
|
H A D | e_damp.f | 24 & nplicon,plkcon,nplkcon,xstiff,npmat_,dtime, argument 43 & npmat_ local 53 real*8 plicon(0:2*npmat_,ntmat_,*),plkcon(0:2*npmat_,ntmat_,*), 103 & nplicon,npmat_,iperturb,time,nmethod)
|
H A D | e_c3d_u.f | 24 & nplicon,plkcon,nplkcon,xstiff,npmat_,dtime, argument 64 & nplkcon(0:ntmat_,*),npmat_ local 73 & plicon(0:2*npmat_,ntmat_,*),plkcon(0:2*npmat_,ntmat_,*), 83 & nplicon,plkcon,nplkcon,xstiff,npmat_,dtime, 96 & nplicon,plkcon,nplkcon,xstiff,npmat_,dtime, 109 & nplicon,plkcon,nplkcon,xstiff,npmat_,dtime,
|
H A D | calcspringforc.f | 20 & kode,plicon,nplicon,npmat_,senergy,nener,fk,val) argument 27 & npmat_,nelcon(2,*),nener local 30 & xk,fk,val,xiso(200),yiso(200),plicon(0:2*npmat_,ntmat_,*), 38 & elconloc,kode,plicon,nplicon,npmat_,plconloc,ncmat_)
|
H A D | dashdamp.f | 21 & nplicon,npmat_,iperturb,time,nmethod) argument 30 & kode,npmat_,nelcon(2,*),nplicon(0:ntmat_,*),nmethod,id local 34 & plicon(0:2*npmat_,ntmat_,*),plconloc(802),pl(3,9),time, 63 & elconloc,kode,plicon,nplicon,npmat_,plconloc,ncmat_)
|
H A D | gapconductances.f | 20 & npmat_,plkcon,nplkcon,iperturb,irstrt,istep,istat,n,iline, argument 30 integer nelcon(2,*),nmat,ntmat_,ntmat,npmat_,npmat,istep, local 34 real*8 plkcon(0:2*npmat_,ntmat_,*), 137 if(npmat.gt.npmat_) then
|
H A D | regularization_gn_c.f | 39 & plicon,nplicon,npmat_,ncmat_,tietol,scal) 46 integer divmode,regmode,i,ndata,kode,npmat_,ncmat_, 52 & elcon(0:ncmat_,ntmat_,*),plicon(0:2*npmat_,ntmat_,*), 79 & elconloc,kode,plicon,nplicon,npmat_,plconloc,ncmat_)
|
H A D | restartshort.f | 20 & nmpc,nalset,nmat,ntmat_,npmat_,norien,nam,nprint,mi, 36 & nmat,ntmat_,npmat_,norien,nam,nprint,mi(*),ntrans,ncs_, 130 read(15)npmat_ 189 & mi,nmpc,mpcend,nmat,ntmat_,npmat_,ncmat_,norien, 269 read(15)npmat_ 329 & nkon,mi,nmpc,mpcend,nmat,ntmat_,npmat_,ncmat_,norien,
|
H A D | plinterpol.f | 18 subroutine plinterpol(plcon,nplcon,itemp,f,df,npmat_,ntmat_, argument 30 integer npmat_,ntmat_,nplcon(0:ntmat_,*),itemp,ndata,imat,j, 33 real*8 plcon(0:2*npmat_,ntmat_,*),f,df,epl
|
H A D | springstiff_f2f_th.f | 21 & nplicon,npmat_,springarea,nmethod,mi, argument 34 & kode,niso,id,nplicon(0:ntmat_,*),npmat_,nelcon(2,*), local 42 & xk,temp(2),xiso(20),yiso(20),plicon(0:2*npmat_,ntmat_,*),d(2), 46 & plkcon(0:2*npmat_,ntmat_,*),pressure,dtemp,flowm(2), 189 & elconloc,kode,plicon,nplicon,npmat_,plconloc,ncmat_) 217 & elconloc,kode,plkcon,nplkcon,npmat_,plconloc,ncmat_)
|
H A D | springforc_f2f_th.f | 21 & plicon,nplicon,npmat_,mi, argument 35 & kode,niso,id,nplicon(0:ntmat_,*),npmat_,nelcon(2,*), local 43 & plicon(0:2*npmat_,ntmat_,*),coords(3), 48 & constant,dtemp,flowm(2),predef(2),plkcon(0:2*npmat_,ntmat_,*) 199 & elconloc,kode,plicon,nplicon,npmat_,plconloc,ncmat_) 227 & elconloc,kode,plkcon,nplkcon,npmat_,plconloc,ncmat_)
|
H A D | skip.f | 21 & mi,nmpc,mpcend,nmat,ntmat_,npmat_,ncmat_,norien,ntrans,nam, 29 & nmpc,mpcend,nmat,ntmat_,npmat_,ncmat_,norien,ntrans,nam, 159 if(npmat_.ne.0)then 160 read(15)(r8,i=1,(2*npmat_+1)*ntmat_*nmat) 162 read(15)(r8,i=1,(2*npmat_+1)*ntmat_*nmat)
|
H A D | dashpots.f | 19 subroutine dashpots(inpc,textpart,nelcon,nmat,ntmat_,npmat_, argument 36 integer nelcon(2,*),nmat,ntmat_,ntmat,npmat_,npmat,istep,mi(*), local 42 real*8 plicon(0:2*npmat_,ntmat_,*),xfreq,temperature, 189 if(npmat.gt.npmat_) then
|
H A D | e_c3d_us45.f | 25 & nplicon,plkcon,nplkcon,xstiff,npmat_,dtime, 222 & nplkcon(0:ntmat_,*),npmat_,jjj 231 & plicon(0:2*npmat_,ntmat_,*),plkcon(0:2*npmat_,ntmat_,*), 246 & nplicon,plkcon,nplkcon,xstiff,npmat_,dtime, 385 & nplicon,plkcon,nplkcon,npmat_,
|
H A D | e_c3d_us3.f | 24 & nplicon,plkcon,nplkcon,xstiff,npmat_,dtime, argument 232 & nplkcon(0:ntmat_,*),npmat_,jjj,id,ig local 241 & plicon(0:2*npmat_,ntmat_,*),plkcon(0:2*npmat_,ntmat_,*), 346 & nplicon,plkcon,nplkcon,npmat_,
|
H A D | surfacebehaviors.f | 21 & inp,ipoinpc,npmat_,plicon,nplicon,nstate_, argument 41 & ntmat,npmat,npmat_,nplicon(0:ntmat_,*),nstate_,ier, local 44 real*8 elcon(0:ncmat_,ntmat_,*),plicon(0:2*npmat_,ntmat_,*), 341 if(npmat.gt.npmat_) then
|
H A D | springstiff_n2f_th.f | 21 & nplkcon,npmat_,iperturb,springarea,mi,timeend,matname, 31 & kode,niso,id,nplkcon(0:ntmat_,*),npmat_,nelcon(2,*), 38 & xiso(200),yiso(200),plkcon(0:2*npmat_,ntmat_,*), 159 & elconloc,kode,plkcon,nplkcon,npmat_,plconloc,ncmat_)
|
H A D | springforc_n2f_th.f | 21 & plkcon,nplkcon,npmat_,mi,springarea,timeend,matname, argument 31 & kode,niso,id,nplkcon(0:ntmat_,*),npmat_,nelcon(2,*), local 39 & xiso(200),yiso(200),plkcon(0:2*npmat_,ntmat_,*),temp(2), 155 & elconloc,kode,plkcon,nplkcon,npmat_,plconloc,ncmat_)
|