/dports/science/madness/madness-ebb3fd7/src/examples/ |
H A D | tdse1d.cc | 264 psi = expV(world, tstep*lambda, -xi*tstep*tstep*tstep)*psi0; psi.truncate(); in sympgrad4() 267 current_time += 0.5*tstep; in sympgrad4() 269 psi = expV(world, tstep*(1.0-2.0*lambda), -chi*tstep*tstep*tstep)*psi; psi.truncate(); in sympgrad4() 271 current_time += 0.5*tstep; in sympgrad4() 274 psi = expV(world, tstep*lambda, -xi*tstep*tstep*tstep)*psi; psi.truncate(); in sympgrad4() 301 current_time += rho*tstep; in sympgrad6() 302 psi = expV(world, tstep*nu, -mu*tstep*tstep*tstep)*psi; psi.truncate(); in sympgrad6() 308 psi = expV(world, tstep*(1.0-2.0*(lambda+nu)), -chi*tstep*tstep*tstep)*psi; psi.truncate(); in sympgrad6() 314 psi = expV(world, tstep*nu, -mu*tstep*tstep*tstep)*psi; psi.truncate(); in sympgrad6() 484 double tstep = 0.0; in main() local [all …]
|
/dports/math/deal.ii/dealii-803d21ff957e349b3799cd3ef2c840bc78734305/examples/step-25/doc/ |
H A D | animate.sh | 22 tstep=0 35 while [ $tstep -lt $numtsteps ] 37 if [ $tstep -lt 10 ]; then 38 ztstep="0000"$tstep 39 elif [ $tstep -lt 100 ]; then 40 ztstep="000"$tstep 41 elif [ $tstep -lt 1000 ]; then 42 ztstep="00"$tstep 44 ztstep="0"$tstep 46 ztstep=$tstep [all …]
|
/dports/graphics/plotutils/plotutils-2.6/ode/ |
H A D | ama.c | 21 #define NEARSTOP (tstep > 0 ? \ 22 t+0.9375*tstep > tstop && t+0.0625*tstep < tstop : \ 23 t+0.9375*tstep < tstop && t+0.0625*tstep > tstop) 59 if (tstep * (t+tstep-tstop) > 0) in ama() 60 tstep = tstop - t; in ama() 95 symtab->sy_value = t + tstep; in ama() 134 tstep *= HALF; in ama() 143 tstep *= 2.0; in ama() 158 if (tstep*(t+tstep-tstop) > 0) in ama() 196 tstep *= HALF; in ama() [all …]
|
H A D | stperr.c | 54 if (t + tstep == t) in hierror() 103 if (tstep > 0) in intpr() 104 if (!PASTSTOP(tstep)) in intpr() 106 if (tstep < 0) in intpr() 107 if (!BEFORESTOP(tstep)) in intpr() 109 if (tstep > 0) in intpr() 110 while (PASTSTOP(tstep)) in intpr() 111 tstep = HALF * tstep; in intpr() 112 if (tstep < 0) in intpr() 113 while (BEFORESTOP(tstep)) in intpr() [all …]
|
H A D | rka.c | 41 if (tstep * (t+tstep-tstop) > 0) in rka() 42 tstep = tstop - t; in rka() 45 fsp->sy_k[0] = tstep * fsp->sy_prime; in rka() 49 symtab->sy_value = t + C2t * tstep; in rka() 53 fsp->sy_k[1] = tstep * fsp->sy_prime; in rka() 62 fsp->sy_k[2] = tstep * fsp->sy_prime; in rka() 72 fsp->sy_k[3] = tstep * fsp->sy_prime; in rka() 79 symtab->sy_value = t + tstep; in rka() 94 fsp->sy_k[5] = tstep * fsp->sy_prime; in rka() 118 tstep *= HALF; in rka() [all …]
|
H A D | misc.c | 151 if (tstart>tstop && tstep>0) in defalt() 152 tstep = -tstep; in defalt() 154 tstep = -tstep; in defalt() 187 #define LASTVAL (tstep>0 ? t>=tstop-0.0625*tstep : t<=tstop-0.0625*tstep) 428 if (tstep > hmax) in startstep() 429 tstep = hmax; in startstep() 430 if (tstep < hmin) in startstep() 431 tstep = hmin; in startstep() 432 while (tstep >= HMAX) in startstep() 433 tstep *= HALF; in startstep() [all …]
|
/dports/games/quakeforge/quakeforge-0.7.2/libs/video/renderer/sw32/ |
H A D | d_scan.c | 446 t += tstep; in sw32_D_DrawSpans() 449 t += tstep; in sw32_D_DrawSpans() 452 t += tstep; in sw32_D_DrawSpans() 455 t += tstep; in sw32_D_DrawSpans() 458 t += tstep; in sw32_D_DrawSpans() 461 t += tstep; in sw32_D_DrawSpans() 587 t += tstep; in sw32_D_DrawSpans() 590 t += tstep; in sw32_D_DrawSpans() 593 t += tstep; in sw32_D_DrawSpans() 596 t += tstep; in sw32_D_DrawSpans() [all …]
|
H A D | d_sky.c | 81 tstep = 0; // ditto in sw32_D_DrawSkyScans() 109 tstep = (tnext - t) >> SKY_SPAN_SHIFT; in sw32_D_DrawSkyScans() 120 tstep = (tnext - t) / spancountminus1; in sw32_D_DrawSkyScans() 128 t += tstep; in sw32_D_DrawSkyScans() 148 tstep = 0; // ditto in sw32_D_DrawSkyScans() 176 tstep = (tnext - t) >> SKY_SPAN_SHIFT; in sw32_D_DrawSkyScans() 187 tstep = (tnext - t) / spancountminus1; in sw32_D_DrawSkyScans() 195 t += tstep; in sw32_D_DrawSkyScans() 215 tstep = 0; // ditto in sw32_D_DrawSkyScans() 243 tstep = (tnext - t) >> SKY_SPAN_SHIFT; in sw32_D_DrawSkyScans() [all …]
|
/dports/science/frontistr/FrontISTR-c66bdc397de319ca59a0565b3f3b1a3b33f0c50c/fistr1/src/analysis/heat/ |
H A D | heat_io.f90 | 10 subroutine heat_input_restart(fstrHEAT, hecMESH, istep, tstep, tt) argument 18 integer(kind=kint) :: i, istep, tstep local 30 tstep = restart_step(1) + 1 47 integer(kind=kint) :: i, in, inod, tstep, nmax, nmin local 56 write(ILOG,'(a,i6)') ' ISTEP =', tstep 96 integer(kind=kint) :: i, tstep local 107 call hecmw_result_init(hecMESH, tstep, header, comment) 126 integer(kind=kint) :: i, tstep local 149 call hecmw_visualize( hecMESH, fstrRESULT, tstep ) 165 integer(kind=kint) :: istep, tstep local [all …]
|
/dports/math/sisl/SISL-SISL-4.6.0-44-g9114631/src/ |
H A D | s1311.c | 105 double tstep; /* Preliminary value for step length */ local 123 tstep = MIN(fabs(talfa*arad),fabs(arad/(double)2.0)); 128 tstep = (double)100.0*aepsge; 134 tstep = amax; 137 if ( amax > DZERO && amax < tstep ) 138 tstep = MAX(amax,aepsge); 140 tstep = MAX(tstep,aepsge); 158 return(tstep);
|
/dports/science/cdo/cdo-2.0.0/libcdi/src/ |
H A D | tsteps.c | 8 void tstepsInitEntry(tsteps_t *tstep) in tstepsInitEntry() argument 10 tstep->curRecID = CDI_UNDEFID; in tstepsInitEntry() 11 tstep->position = 0; in tstepsInitEntry() 12 tstep->records = NULL; in tstepsInitEntry() 13 tstep->recordSize = 0; in tstepsInitEntry() 14 tstep->nallrecs = 0; in tstepsInitEntry() 15 tstep->recIDs = NULL; in tstepsInitEntry() 16 tstep->nrecs = 0; in tstepsInitEntry() 17 tstep->next = 0; in tstepsInitEntry() 19 ptaxisInit(&(tstep->taxis)); in tstepsInitEntry()
|
/dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/examples/arkode/C_serial/ |
H A D | plot_heat1D_adapt.py | 44 for tstep in range(nt): 45 mx = data[tstep].max() 48 mn = data[tstep].min() 62 for tstep in range(nt): 65 pname = 'heat1d.' + repr(tstep).zfill(3) + '.png' 66 tstr = repr(tstep) 67 nxstr = repr(len(data[tstep])) 71 plt.plot(mesh[tstep],data[tstep],'-o')
|
/dports/math/sundials/sundials-5.7.0/examples/arkode/C_serial/ |
H A D | plot_heat1D_adapt.py | 44 for tstep in range(nt): 45 mx = data[tstep].max() 48 mn = data[tstep].min() 62 for tstep in range(nt): 65 pname = 'heat1d.' + repr(tstep).zfill(3) + '.png' 66 tstr = repr(tstep) 67 nxstr = repr(len(data[tstep])) 71 plt.plot(mesh[tstep],data[tstep],'-o')
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-serial/ |
H A D | inte_leapf.f | 5 SUBROUTINE inte_leapf(tstep,ekin) argument 15 real*8 ekin,tmpvx,tmpvy,tmpvz,tstep local 27 vvv(i,1)=vvv(i,1)+fff(i,1)*tstep/typmass(iatm) 28 vvv(i,2)=vvv(i,2)+fff(i,2)*tstep/typmass(iatm) 29 vvv(i,3)=vvv(i,3)+fff(i,3)*tstep/typmass(iatm) 37 ccc(i,1)=ccc(i,1)+tstep*vvv(i,1) 38 ccc(i,2)=ccc(i,2)+tstep*vvv(i,2) 39 ccc(i,3)=ccc(i,3)+tstep*vvv(i,3)
|
H A D | smd_leapf.F | 2 subroutine smd_leapf(natms,tstep,ekin,mass,fff,vvv,ccc) argument 7 double precision tstep local 25 vvv(i,1)=vvv(i,1)+fff(i,1)*tstep/mass(i) 26 vvv(i,2)=vvv(i,2)+fff(i,2)*tstep/mass(i) 27 vvv(i,3)=vvv(i,3)+fff(i,3)*tstep/mass(i) 35 ccc(i,1)=ccc(i,1)+tstep*vvv(i,1) 36 ccc(i,2)=ccc(i,2)+tstep*vvv(i,2) 37 ccc(i,3)=ccc(i,3)+tstep*vvv(i,3)
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-original/ |
H A D | inte_leapf.f | 1 SUBROUTINE inte_leapf(tstep,ekin) argument 11 real*8 ekin,tmpvx,tmpvy,tmpvz,tstep local 23 vvv(i,1)=vvv(i,1)+fff(i,1)*tstep/typmass(iatm) 24 vvv(i,2)=vvv(i,2)+fff(i,2)*tstep/typmass(iatm) 25 vvv(i,3)=vvv(i,3)+fff(i,3)*tstep/typmass(iatm) 33 ccc(i,1)=ccc(i,1)+tstep*vvv(i,1) 34 ccc(i,2)=ccc(i,2)+tstep*vvv(i,2) 35 ccc(i,3)=ccc(i,3)+tstep*vvv(i,3)
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-9-10-08/ |
H A D | inte_leapf.f | 5 SUBROUTINE inte_leapf(tstep,ekin) argument 15 real*8 ekin,tmpvx,tmpvy,tmpvz,tstep local 27 vvv(i,1)=vvv(i,1)+fff(i,1)*tstep/typmass(iatm) 28 vvv(i,2)=vvv(i,2)+fff(i,2)*tstep/typmass(iatm) 29 vvv(i,3)=vvv(i,3)+fff(i,3)*tstep/typmass(iatm) 37 ccc(i,1)=ccc(i,1)+tstep*vvv(i,1) 38 ccc(i,2)=ccc(i,2)+tstep*vvv(i,2) 39 ccc(i,3)=ccc(i,3)+tstep*vvv(i,3)
|
H A D | smd_leapf.F | 2 subroutine smd_leapf(natms,tstep,ekin,mass,fff,vvv,ccc) argument 7 double precision tstep local 25 vvv(i,1)=vvv(i,1)+fff(i,1)*tstep/mass(i) 26 vvv(i,2)=vvv(i,2)+fff(i,2)*tstep/mass(i) 27 vvv(i,3)=vvv(i,3)+fff(i,3)*tstep/mass(i) 35 ccc(i,1)=ccc(i,1)+tstep*vvv(i,1) 36 ccc(i,2)=ccc(i,2)+tstep*vvv(i,2) 37 ccc(i,3)=ccc(i,3)+tstep*vvv(i,3)
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/graveyard/smd-subgroups/ |
H A D | inte_leapf.f | 5 SUBROUTINE inte_leapf(tstep,ekin) argument 15 real*8 ekin,tmpvx,tmpvy,tmpvz,tstep local 27 vvv(i,1)=vvv(i,1)+fff(i,1)*tstep/typmass(iatm) 28 vvv(i,2)=vvv(i,2)+fff(i,2)*tstep/typmass(iatm) 29 vvv(i,3)=vvv(i,3)+fff(i,3)*tstep/typmass(iatm) 37 ccc(i,1)=ccc(i,1)+tstep*vvv(i,1) 38 ccc(i,2)=ccc(i,2)+tstep*vvv(i,2) 39 ccc(i,3)=ccc(i,3)+tstep*vvv(i,3)
|
H A D | smd_leapf.F | 2 subroutine smd_leapf(natms,tstep,ekin,mass,fff,vvv,ccc) argument 7 double precision tstep local 25 vvv(i,1)=vvv(i,1)+fff(i,1)*tstep/mass(i) 26 vvv(i,2)=vvv(i,2)+fff(i,2)*tstep/mass(i) 27 vvv(i,3)=vvv(i,3)+fff(i,3)*tstep/mass(i) 35 ccc(i,1)=ccc(i,1)+tstep*vvv(i,1) 36 ccc(i,2)=ccc(i,2)+tstep*vvv(i,2) 37 ccc(i,3)=ccc(i,3)+tstep*vvv(i,3)
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/graveyard/smd-subgroups/ |
H A D | inte_leapf.f | 5 SUBROUTINE inte_leapf(tstep,ekin) argument 15 real*8 ekin,tmpvx,tmpvy,tmpvz,tstep local 27 vvv(i,1)=vvv(i,1)+fff(i,1)*tstep/typmass(iatm) 28 vvv(i,2)=vvv(i,2)+fff(i,2)*tstep/typmass(iatm) 29 vvv(i,3)=vvv(i,3)+fff(i,3)*tstep/typmass(iatm) 37 ccc(i,1)=ccc(i,1)+tstep*vvv(i,1) 38 ccc(i,2)=ccc(i,2)+tstep*vvv(i,2) 39 ccc(i,3)=ccc(i,3)+tstep*vvv(i,3)
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/graveyard/smd-serial/ |
H A D | inte_leapf.f | 5 SUBROUTINE inte_leapf(tstep,ekin) argument 15 real*8 ekin,tmpvx,tmpvy,tmpvz,tstep local 27 vvv(i,1)=vvv(i,1)+fff(i,1)*tstep/typmass(iatm) 28 vvv(i,2)=vvv(i,2)+fff(i,2)*tstep/typmass(iatm) 29 vvv(i,3)=vvv(i,3)+fff(i,3)*tstep/typmass(iatm) 37 ccc(i,1)=ccc(i,1)+tstep*vvv(i,1) 38 ccc(i,2)=ccc(i,2)+tstep*vvv(i,2) 39 ccc(i,3)=ccc(i,3)+tstep*vvv(i,3)
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/graveyard/smd-9-10-08/ |
H A D | inte_leapf.f | 5 SUBROUTINE inte_leapf(tstep,ekin) argument 15 real*8 ekin,tmpvx,tmpvy,tmpvz,tstep local 27 vvv(i,1)=vvv(i,1)+fff(i,1)*tstep/typmass(iatm) 28 vvv(i,2)=vvv(i,2)+fff(i,2)*tstep/typmass(iatm) 29 vvv(i,3)=vvv(i,3)+fff(i,3)*tstep/typmass(iatm) 37 ccc(i,1)=ccc(i,1)+tstep*vvv(i,1) 38 ccc(i,2)=ccc(i,2)+tstep*vvv(i,2) 39 ccc(i,3)=ccc(i,3)+tstep*vvv(i,3)
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/smd/graveyard/smd-original/ |
H A D | inte_leapf.f | 1 SUBROUTINE inte_leapf(tstep,ekin) argument 11 real*8 ekin,tmpvx,tmpvy,tmpvz,tstep local 23 vvv(i,1)=vvv(i,1)+fff(i,1)*tstep/typmass(iatm) 24 vvv(i,2)=vvv(i,2)+fff(i,2)*tstep/typmass(iatm) 25 vvv(i,3)=vvv(i,3)+fff(i,3)*tstep/typmass(iatm) 33 ccc(i,1)=ccc(i,1)+tstep*vvv(i,1) 34 ccc(i,2)=ccc(i,2)+tstep*vvv(i,2) 35 ccc(i,3)=ccc(i,3)+tstep*vvv(i,3)
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/smd/smdlib/ |
H A D | smd_leapf.F | 2 subroutine smd_leapf(natms,tstep,ekin,mass,fff,vvv,ccc) argument 7 double precision tstep local 25 vvv(1,i)=vvv(1,i)+fff(1,i)*tstep/mass(i) 26 vvv(2,i)=vvv(2,i)+fff(2,i)*tstep/mass(i) 27 vvv(3,i)=vvv(3,i)+fff(3,i)*tstep/mass(i) 35 ccc(1,i)=ccc(1,i)+tstep*vvv(1,i) 36 ccc(2,i)=ccc(2,i)+tstep*vvv(2,i) 37 ccc(3,i)=ccc(3,i)+tstep*vvv(3,i)
|