Searched refs:N_ORT (Results 1 – 2 of 2) sorted by relevance
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/lucia/ |
| H A D | lucia_icei.F | 152 N_ORT = NDIM_ORT_ST(I_INSM,I_EXTP)
158 IOFF_SG = IOFF_SG + N_ORT
160 IOFF_X1 = IOFF_X1 + N_ORT*N_IN
185 DIMENSION X1(N_ORT,N_IN),S(N_IN*(N_IN+1)/2),SG(N_ORT)
196 WRITE(6,*) 'N_IN, N_ORT, N_EX = ', N_IN, N_ORT, N_EX
209 CALL MATML7(VECIN,X1,VECOUT,N_ORT,N_EX,N_IN,N_ORT,N_IN,N_EX,
213 DO I = 1, N_ORT
215 VECIN((J-1)*N_ORT+I) = VECIN((J-1)*N_ORT+I)/SG(I)
219 CALL MATML7(VECOUT,X1,VECIN,N_IN,N_EX,N_IN,N_ORT,N_ORT,N_EX,
4740 N_ORT = NDIM_ORT_ST(I_INSM,I_EXTP)
[all …]
|
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/lucia/ |
| H A D | lucia_icei.F | 152 N_ORT = NDIM_ORT_ST(I_INSM,I_EXTP)
158 IOFF_SG = IOFF_SG + N_ORT
160 IOFF_X1 = IOFF_X1 + N_ORT*N_IN
185 DIMENSION X1(N_ORT,N_IN),S(N_IN*(N_IN+1)/2),SG(N_ORT)
196 WRITE(6,*) 'N_IN, N_ORT, N_EX = ', N_IN, N_ORT, N_EX
209 CALL MATML7(VECIN,X1,VECOUT,N_ORT,N_EX,N_IN,N_ORT,N_IN,N_EX,
213 DO I = 1, N_ORT
215 VECIN((J-1)*N_ORT+I) = VECIN((J-1)*N_ORT+I)/SG(I)
219 CALL MATML7(VECOUT,X1,VECIN,N_IN,N_EX,N_IN,N_ORT,N_ORT,N_EX,
4740 N_ORT = NDIM_ORT_ST(I_INSM,I_EXTP)
[all …]
|