Searched refs:fieldtp (Results 1 – 3 of 3) sorted by relevance
| /dports/math/R-cran-sf/sf/src/ |
| H A D | gdal_read.cpp | 162 Rcpp::CharacterVector fieldtp(1); // #nocov start ; though tested in #334 in CPL_get_layers() local
163 fieldtp(0) = NA_STRING; in CPL_get_layers()
164 geomtype(iLayer) = fieldtp; // #nocov end in CPL_get_layers()
166 Rcpp::CharacterVector fieldtp(nGeomFieldCount); in CPL_get_layers() local
170 fieldtp(iGeom) = OGRGeometryTypeToName(poGFldDefn->GetType()); in CPL_get_layers()
173 fieldtp(0) = OGRGeometryTypeToName(poLayer->GetGeomType()); in CPL_get_layers()
174 geomtype(iLayer) = fieldtp; in CPL_get_layers()
|
| /dports/science/tinker/tinker/source/ |
| H A D | induce.f | 1825 fieldtp(j,ii) = fieldtp(j,ii) + fid(j)*pscale(k)
1826 fieldtp(j,kk) = fieldtp(j,kk) + fkd(j)*pscale(k)
2094 fieldtp(j,ii) = fieldtp(j,ii) + fip(j)
2095 fieldtp(j,kk) = fieldtp(j,kk) + fkp(j)
3584 fieldtp(j,ii) = fieldtp(j,ii) + fip(j)
3585 fieldtp(j,kk) = fieldtp(j,kk) + fkp(j)
4410 fieldtp(j,i) = fieldtp(j,i) + fip(j)
4411 fieldtp(j,k) = fieldtp(j,k) + fkp(j)
5171 fieldtp(j,ii) = fieldtp(j,ii) + fid(j)*pscale(k)
5655 fieldtp(j,ii) = fieldtp(j,ii) + fip(j)
[all …]
|
| /dports/science/tinker/tinker/other/ |
| H A D | induce.no-tarray | 2279 real*8, allocatable :: fieldtp(:,:)
2289 allocate (fieldtp(3,npole))
2322 fieldtp(j,i) = 0.0d0
2487 fieldtp(j,i) = fieldtp(j,i) + fimp(j)
2488 fieldtp(j,k) = fieldtp(j,k) + fkmp(j)
2560 deallocate (fieldtp)
3073 allocate (fieldtp(3,npole))
3104 fieldtp(j,i) = 0.0d0
3205 fieldtp(j,i) = fieldtp(j,i) + fimp(j)
3206 fieldtp(j,k) = fieldtp(j,k) + fkmp(j)
[all …]
|