renameFiles_princeton Subroutine

private subroutine renameFiles_princeton(logn, inFile, ncciy, inName)

Replace the year in the filename with the value of ncciy for the princeton format

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: logn
character(len=200), intent(inout) :: inFile
integer, intent(in) :: ncciy
character(len=*), intent(in) :: inName