Home
last modified time | relevance | path

Searched refs:npmat_ (Results 1 – 25 of 101) sorted by relevance

12345

/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/
H A Dmaterialdata_sp.f19 & 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 Dplastics.f19 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 Dplmix.f19 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 Dcyclichardenings.f20 & 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 Dmaterialdata_me.f21 & 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 Dplcopy.f19 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 Dchangeplastics.f19 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 Dresultsmech_u.f24 & 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 De_damp.f24 & 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 De_c3d_u.f24 & 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 Dcalcspringforc.f20 & 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 Ddashdamp.f21 & 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 Dgapconductances.f20 & 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 Dregularization_gn_c.f39 & 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 Drestartshort.f20 & 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 Dplinterpol.f18 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 Dspringstiff_f2f_th.f21 & 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 Dspringforc_f2f_th.f21 & 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 Dskip.f21 & 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 Ddashpots.f19 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 De_c3d_us45.f25 & 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 De_c3d_us3.f24 & 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 Dsurfacebehaviors.f21 & 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 Dspringstiff_n2f_th.f21 & 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 Dspringforc_n2f_th.f21 & 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_)

12345