/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/NWints/ecp/ |
H A D | test_drive.F | 8 & iz_bas,ic_bas,iz_ecp,ic_ecp,jz_bas,jc_bas,n_bas,nprim,ncont, 46 read (LUIn,*) n_bas 47 n_bas_C(i_C) = n_bas 48 do n = 1,n_bas 175 n_bas = n_bas_C(j) 176 if (j .eq. i) n_bas = k 177 do m = 1,n_bas 240 n_bas = n_bas_C(j) 241 if (j .eq. i) n_bas = k 242 do m = 1,n_bas
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/NWints/ecp/ |
H A D | test_drive.F | 8 & iz_bas,ic_bas,iz_ecp,ic_ecp,jz_bas,jc_bas,n_bas,nprim,ncont, 46 read (LUIn,*) n_bas 47 n_bas_C(i_C) = n_bas 48 do n = 1,n_bas 175 n_bas = n_bas_C(j) 176 if (j .eq. i) n_bas = k 177 do m = 1,n_bas 240 n_bas = n_bas_C(j) 241 if (j .eq. i) n_bas = k 242 do m = 1,n_bas
|
/dports/math/alberta/alberta3-920315ae1bbfd1b1fb6672d916619ac37a411e95/alberta/src/Common/ |
H A D | eval.c | 577 DOF dofs[n_bas]; in interpol_el_single() 578 int indices[n_bas]; in interpol_el_single() 584 for (i = 0; i < n_bas; i++) { in interpol_el_single() 592 if (n_indices == n_bas) { in interpol_el_single() 757 DOF dofs[n_bas]; in interpol_el_single_d() 758 int indices[n_bas]; in interpol_el_single_d() 764 for (i = 0; i < n_bas; i++) { in interpol_el_single_d() 772 if (n_indices == n_bas) { in interpol_el_single_d() 798 DOF dofs[n_bas]; in interpol_el_single_dow() 799 int indices[n_bas]; in interpol_el_single_dow() [all …]
|
H A D | parametric_intern.h | 576 for (i = 0; i < n_bas; i++) in PN() 608 int n_bas, in PN() 654 int n_bas, in PN() 677 for (i = 0; i < n_bas; i++) { in PN() 707 for (i = 0; i < n_bas; i++) { in PN() 721 for (i = 0; i < n_bas; i++) { in PN() 1012 int i, n_bas; in PN() local 1030 int n_bas, in PN() 1207 int i, n_bas; in PN() local 1327 int n_bas, int wall, [all …]
|
/dports/math/alberta/alberta3-920315ae1bbfd1b1fb6672d916619ac37a411e95/add_ons/libalbas/src/ |
H A D | bulk_trace_bubble.c | 397 int w, dim, n_bas; in btb_init_element() local 450 for (n_bas = w = 0; w < N_WALLS(dim); w++) { in btb_init_element() 456 data->cur_wall[n_bas] = -1; in btb_init_element() 459 data->cur_trace_el[n_bas] = tr_el; in btb_init_element() 460 data->cur_wall[n_bas] = w; in btb_init_element() 464 data->phi[n_bas] = btb_phi[dim][w]; in btb_init_element() 466 data->D2_phi[n_bas] = btb_D2_phi[dim][w]; in btb_init_element() 467 data->phi_d[n_bas] = btb_phi_d[n_bas]; in btb_init_element() 472 data->trace_dof_map[w] = n_bas; in btb_init_element() 474 ++n_bas; in btb_init_element() [all …]
|
H A D | bulk_trace_tensor_bubbles.c | 878 int w, dim, n_bas, n_walls, t, o; in bttb_init_element() local 931 for (n_bas = n_walls = w = 0; w < N_WALLS(dim); w++) { in bttb_init_element() 951 for (i = 0; i < data->n_wall_bfcts; i++, n_bas++) { in bttb_init_element() 953 data->phi[n_bas] = bttb_phi[dim][b]; in bttb_init_element() 954 data->grd_phi[n_bas] = bttb_grd_phi[dim][b]; in bttb_init_element() 955 data->D2_phi[n_bas] = bttb_D2_phi[dim][b]; in bttb_init_element() 956 data->phi_d[n_bas] = bttb_phi_d[dim][b]; in bttb_init_element() 961 data->trace_dof_map[w][i] = n_bas; in bttb_init_element() 972 if (n_bas == 0) { in bttb_init_element() 987 ((BAS_FCTS *)self->unchained)->n_bas_fcts = n_bas; in bttb_init_element()
|
/dports/math/alberta/alberta3-920315ae1bbfd1b1fb6672d916619ac37a411e95/alberta/src/1d/ |
H A D | parametric_1d.c | 414 const REAL DD[], int n_bas, int wall, in wall_normal_iq_1d() argument 421 for (i = 0; i < n_bas; i++) { in wall_normal_iq_1d() 445 int iq, i1, n_bas, i; in wall_normalY_1d() local 494 n_bas = bas_fcts->n_bas_fcts; in wall_normalY_1d() 503 for (i = 0; i < n_bas; i++) { in wall_normalY_1d() 508 dets[iq] = wall_normal_iq_1d(coords, DD, n_bas, wall, in wall_normalY_1d()
|
/dports/math/alberta/alberta3-920315ae1bbfd1b1fb6672d916619ac37a411e95/alberta/src/2d/ |
H A D | parametric_2d.c | 406 int n_bas, int wall, in wall_normal_iq_2d() argument 414 detg = Dt_and_DtD_2d(coords, DD, n_bas, e, g); in wall_normal_iq_2d() 447 dDt_and_dDtD_2d(coords, dDD, e, n_bas, De, Dg); in wall_normal_iq_2d() 492 ddDt_and_ddDtD_2d(coords, ddDD, e, De, Dg, n_bas, D2e, D2g); in wall_normal_iq_2d()
|
/dports/math/alberta/alberta3-920315ae1bbfd1b1fb6672d916619ac37a411e95/add_ons/geomview/ |
H A D | geomview-graphics.c | 1437 const DOF *dof, int n_bas, 1466 fprintf(file, "OFF\n%d %d -1\n", n_bas, n_faces); 1469 for (i = 0; i < n_bas; i++) { 1473 for (i = 0; i < n_bas; i++) {
|
/dports/math/alberta/alberta3-920315ae1bbfd1b1fb6672d916619ac37a411e95/add_ons/reparam_cm/src/Common/ |
H A D | geomview-graphics.c | 1412 const DOF *dof, int n_bas, 1441 fprintf(file, "OFF\n%d %d -1\n", n_bas, n_faces); 1444 for (i = 0; i < n_bas; i++) { 1448 for (i = 0; i < n_bas; i++) {
|
/dports/math/alberta/alberta3-920315ae1bbfd1b1fb6672d916619ac37a411e95/demo/src/Common/ |
H A D | geomview-graphics.c | 1436 const DOF *dof, int n_bas, 1465 fprintf(file, "OFF\n%d %d -1\n", n_bas, n_faces); 1468 for (i = 0; i < n_bas; i++) { 1472 for (i = 0; i < n_bas; i++) {
|
/dports/math/alberta/alberta3-920315ae1bbfd1b1fb6672d916619ac37a411e95/alberta/src/3d/ |
H A D | parametric_3d.c | 444 int n_bas, int wall, in wall_normal_iq_3d() argument 454 detg = Dt_and_DtD_3d(coords, DD, n_bas, e, g); in wall_normal_iq_3d() 486 dDt_and_dDtD_3d(coords, dDD, e, n_bas, De, Dg); in wall_normal_iq_3d() 568 ddDt_and_ddDtD_3d(coords, ddDD, e, De, Dg, n_bas, D2e, D2g); in wall_normal_iq_3d()
|