Searched refs:tpinc (Results 1 – 2 of 2) sorted by relevance
| /dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/ |
| H A D | timepointss.f | 38 real*8 amta(2,*),x,tpmin,tpmax,tpinc local
138 read(textpart(3)(1:20),'(f20.0)',iostat=istat) tpinc
145 nttp=INT((tpmax-tpmin)/tpinc)
154 amta(1,namtot+1+i)=tpmin+(i*tpinc)
|
| H A D | allocation.f | 71 real*8 temperature,tempact,xfreq,tpinc,tpmin,tpmax local
2535 & tpinc
2542 if((tpinc.le.0).or.(tpmin.ge.tpmax)) then
2548 namtot_=namtot_+2+INT((tpmax-tpmin)/tpinc)
|