Home
last modified time | relevance | path

Searched refs:rwork1 (Results 1 – 16 of 16) sorted by relevance

/dports/math/scilab/scilab-6.1.1/scilab/modules/interpolation/sci_gateway/cpp/
H A Dsci_splin.cpp46 double* rwork1 = NULL; in sci_splin() local
216 rwork1 = new double[iSize]; in sci_splin()
219 rwork4 = rwork1; in sci_splin()
232 …C2F(splinecub)(pDblX->get(), pDblY->get(), pDblOut->get(), &iSize, &iType, rwork1, rwork2, rwork3,… in sci_splin()
234 delete[] rwork1; in sci_splin()
/dports/math/scilab/scilab-6.1.1/scilab/modules/scicos_blocks/src/c/
H A Dmatz_vps.c47 double *rwork1; member
129 if ((ptr->rwork1 = (double*) scicos_malloc(sizeof(double) * 2 * lwork1)) == NULL) in matz_vps()
147 if ((ptr->rwork1) != NULL) in matz_vps()
153 scicos_free(ptr->rwork1); in matz_vps()
204 … ptr->LA, &nu, ptr->LX, ptr->dwork1, &nu, ptr->LVR, &nu, ptr->dwork1, &lwork1, ptr->rwork1, &info); in matz_vps()
H A Dmatz_vpv.c49 double *rwork1; member
135 if ((ptr->rwork1 = (double*) scicos_malloc(sizeof(double) * 2 * lwork1)) == NULL) in matz_vpv()
153 if ((ptr->rwork1) != NULL) in matz_vpv()
159 scicos_free(ptr->rwork1); in matz_vpv()
221 … ptr->LA, &nu, ptr->LX, ptr->dwork1, &nu, ptr->LVR, &nu, ptr->dwork1, &lwork1, ptr->rwork1, &info); in matz_vpv()
/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/
H A Ddgmresmain.c29 *rwork1; variable
73 rwork1=rwork;iwork1=iwork;nestart1=nestart; in dgmresmain()
112 ligw1,&rwork1[nestart1[*i]],iwork1)); in dgmres1mt()
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/nwpwlib/D1dB/
H A DDne.fh32 integer rwork1(2),rwork2(2),bcolwork(2),bwork2(2)
40 > rwork1,rwork2,bcolwork,bwork2,
H A DDne.F197 > 'rwork1',rwork1(2),rwork1(1))
365 value = value.and.BA_free_heap(rwork1(2))
962 > dbl_mb(rwork1(1)),dbl_mb(rwork2(1)))
1004 > dbl_mb(rwork1(1)),dbl_mb(rwork2(1)))
7836 > dbl_mb(rwork1(1)),dbl_mb(rwork2(1)))
7858 > dbl_mb(rwork1(1)),dbl_mb(rwork2(1)))
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/nwpwlib/D1dB/
H A DDne.fh32 integer rwork1(2),rwork2(2),bcolwork(2),bwork2(2)
40 > rwork1,rwork2,bcolwork,bwork2,
H A DDne.F197 > 'rwork1',rwork1(2),rwork1(1))
365 value = value.and.BA_free_heap(rwork1(2))
962 > dbl_mb(rwork1(1)),dbl_mb(rwork2(1)))
1004 > dbl_mb(rwork1(1)),dbl_mb(rwork2(1)))
7726 > dbl_mb(rwork1(1)),dbl_mb(rwork2(1)))
7748 > dbl_mb(rwork1(1)),dbl_mb(rwork2(1)))
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/nwpwlib/Pneb/
H A DPneb.fh35 integer rwork1(2),rwork2(2),bcolwork(2),bwork2(2)
44 > rwork1,rwork2,bcolwork,bwork2,
H A DPneb.F344 > 'rwork1',rwork1(2),rwork1(1))
503 value = value.and.BA_free_heap(rwork1(2))
/dports/science/quantum-espresso/q-e-qe-6.7.0/PP/src/
H A Dprojwfc.f90380 REAL (DP), ALLOCATABLE :: rwork1(:) local
387 ALLOCATE(rwork1 (nbnd) )
412 rwork1(:) = rproj0 (nwfc1 + 1,:)
414 rwork1(:) = 0.d0
416 rwork1(:)=rwork1(:)+d1(m1,m,isym)*rproj0(nwfc1+m1,:)
419 rwork1(:) = 0.d0
421 rwork1(:)=rwork1(:)+d2(m1,m,isym)*rproj0(nwfc1+m1,:)
424 rwork1(:) = 0.d0
426 rwork1(:)=rwork1(:)+d3(m1,m,isym)*rproj0(nwfc1+m1,:)
431 rwork1(ibnd) * rwork1(ibnd) / nsym
[all …]
/dports/science/py-avogadrolibs/avogadrolibs-1.94.0/avogadro/qtplugins/qtaim/
H A Dqtaimlsodaintegrator.h96 int iwork9, double rwork1, double rwork5, double rwork6,
H A Dqtaimlsodaintegrator.cpp85 double rwork1, rwork5, rwork6, rwork7; in integrate() local
106 rwork1 = rwork5 = rwork6 = rwork7 = 0.0; in integrate()
148 iwork2, iwork5, iwork6, iwork7, iwork8, iwork9, rwork1, rwork5, in integrate()
832 double rwork1, double rwork5, double rwork6, in lsoda() argument
1154 tcrit = rwork1; in lsoda()
1311 tcrit = rwork1; in lsoda()
1341 tcrit = rwork1; in lsoda()
/dports/science/avogadrolibs/avogadrolibs-1.94.0/avogadro/qtplugins/qtaim/
H A Dqtaimlsodaintegrator.h96 int iwork9, double rwork1, double rwork5, double rwork6,
H A Dqtaimlsodaintegrator.cpp85 double rwork1, rwork5, rwork6, rwork7; in integrate() local
106 rwork1 = rwork5 = rwork6 = rwork7 = 0.0; in integrate()
148 iwork2, iwork5, iwork6, iwork7, iwork8, iwork9, rwork1, rwork5, in integrate()
832 double rwork1, double rwork5, double rwork6, in lsoda() argument
1154 tcrit = rwork1; in lsoda()
1311 tcrit = rwork1; in lsoda()
1341 tcrit = rwork1; in lsoda()
/dports/emulators/hercules/hercules-3.13/
H A Desame.c4025 U32 rwork1[16], rwork2[16]; /* Intermediate work areas */ in DEF_INST() local
4031 ARCH_DEP(vfetchc) (rwork1, (n * 4) - 1, effective_addr2, b2, regs); in DEF_INST()
4037 regs->GR_H((r1 + i) & 0xF) = fetch_fw(&rwork1[i]); in DEF_INST()