Changeset d3482a for pcp/src/pseudo.c
- Timestamp:
- Apr 23, 2008, 4:03:13 PM (18 years ago)
- Children:
- 4f9fe2
- Parents:
- d52fb5
- File:
-
- 1 edited
-
pcp/src/pseudo.c (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
pcp/src/pseudo.c
rd52fb5 rd3482a 445 445 void InitPseudoRead(struct Problem *P, char *pseudopot_path) 446 446 { 447 char cpiInputFileName[255];447 char *cpiInputFileName; 448 448 FILE *cpiInputFile; 449 449 int i,it,ib,il,m,j,ia; … … 483 483 PP->lm_endmax = 0; 484 484 PP->corecorr = NotCoreCorrected; 485 cpiInputFileName = (char *) Malloc(sizeof(char)*255, "InitPseudoRead: *cpiInputFileName"); 485 486 for (it = 0; it < I->Max_Types; it++) { 486 487 PP->lm_end[it] = I->I[it].l_max*I->I[it].l_max+1-2*I->I[it].l_loc; … … 585 586 fclose(cpiInputFile); 586 587 } 588 Free(cpiInputFileName, "InitPseudoRead: *cpiInputFileName"); 587 589 PP->fnl = (fftw_complex ****) Malloc(sizeof(fftw_complex***)*(Lat->Psi.LocalNo+1), "InitPseudoRead: "); 588 590 for (i=0; i< Lat->Psi.LocalNo+1; i++) {
Note:
See TracChangeset
for help on using the changeset viewer.
