calcfunpca update