Home
last modified time | relevance | path

Searched refs:size_sp2c (Results 1 – 2 of 2) sorted by relevance

/dports/science/nwchem-data/nwchem-7.0.2-release/src/NWints/auxil/
H A Dint_spcart.F41 integer size_sp2c ! size of array local
69 size_sp2c = lmaxin+1
70 size_sp2c = size_sp2c*(2*lmaxin+1)
71 size_sp2c = size_sp2c*(((lmaxin+1)*(lmaxin+2))/2)
74 & ma_alloc_get(mt_dbl,size_sp2c,'sph 2 cart trans array',
77 & ('spcart_init: alloc_get failed for size',size_sp2c,
79 call dcopy(size_sp2c,0.0d00,0,dbl_mb(k_sp2c),1)
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/NWints/auxil/
H A Dint_spcart.F41 integer size_sp2c ! size of array local
69 size_sp2c = lmaxin+1
70 size_sp2c = size_sp2c*(2*lmaxin+1)
71 size_sp2c = size_sp2c*(((lmaxin+1)*(lmaxin+2))/2)
74 & ma_alloc_get(mt_dbl,size_sp2c,'sph 2 cart trans array',
77 & ('spcart_init: alloc_get failed for size',size_sp2c,
79 call dcopy(size_sp2c,0.0d00,0,dbl_mb(k_sp2c),1)