Searched refs:cgaux (Results 1 – 4 of 4) sorted by relevance
/dports/science/siesta/siesta-4.1.5/Src/ |
H A D | iocg.f | 8 subroutine iocg( task, naux, cgaux, cgcntr, relaxd, found ) argument 33 real(dp) cgaux(naux), cgcntr(0:20) 64 read(unit1) (cgaux(i), i = 1, naux) 84 write(unit1) (cgaux(i), i = 1, naux)
|
H A D | cgvc.F | 87 real(dp), pointer, save :: cgaux(:)=>null() 119 if (.not.associated(cgaux)) 120 & call re_alloc( cgaux, 1, na*6+12, 'cgaux', 'cgvc' ) 232 call iocg( 'read', ndeg*2, cgaux, cgcntr, relaxd, found ) 234 call broadcast(cgaux) 343 call conjgr(ndeg,gxa,gfa,dxmax, ftol_tmp ,cgcntr,cgaux ) 355 call conjgr( 3*na, xa, fa, dxmax, ftol, cgcntr, cgaux ) 412 . call iocg( 'write', ndeg*2, cgaux, cgcntr, relaxd, found )
|
H A D | cgvc_zmatrix.F | 107 real(dp), pointer, save :: cgaux(:) 230 if (.not.associated(cgaux)) 231 & call re_alloc( cgaux, 1, 2*ndeg, 'cgaux', 'cgvc_zmatrix' ) 235 call iocg( 'read', ndeg*2, cgaux, cgcntr, relaxd, found ) 237 call broadcast(cgaux) 402 call conjgr(ndeg,gxa,gfa,dxmaxn,ftoln_tmp,cgcntr,cgaux) 451 call conjgr( ndeg, gxa, gfa, dxmaxn, ftoln, cgcntr, cgaux) 566 . call iocg( 'write', ndeg*2, cgaux, cgcntr, relaxd, found )
|
/dports/science/siesta/siesta-4.1.5/Docs/ |
H A D | CHANGES | 17150 The "save" attribute has been added back for cgaux in cgvc.F as 17156 cgvc.F Save attribute added to cgaux
|