character vectors with short names of RCM and GCMs, with the long RCM/GCM names as vector-names, so it can be used for renaming:
Examples
# for example from inventory
fn_zip <- system.file("extdata", "inv-test-files.zip", package = "eurocordexr")
tmpdir <- tempdir()
unzip(fn_zip, exdir = tmpdir)
dat_inv <- get_inventory(fs::path(tmpdir, "testdata"))
# compare
cbind(dat_inv$gcm, shortnames_gcm[dat_inv$gcm])
#> [,1] [,2]
#> ICHEC-EC-EARTH "ICHEC-EC-EARTH" "EC-EARTH"
#> IPSL-IPSL-CM5A-LR "IPSL-IPSL-CM5A-LR" "IPSL-CM5A-LR"
#> CNRM-CERFACS-CNRM-CM5 "CNRM-CERFACS-CNRM-CM5" "CNRM-CM5"
#> CNRM-CERFACS-CNRM-CM5 "CNRM-CERFACS-CNRM-CM5" "CNRM-CM5"
#> MPI-M-MPI-ESM-LR "MPI-M-MPI-ESM-LR" "MPI-ESM-LR"
#> MPI-M-MPI-ESM-LR "MPI-M-MPI-ESM-LR" "MPI-ESM-LR"
#> CNRM-CERFACS-CNRM-CM5 "CNRM-CERFACS-CNRM-CM5" "CNRM-CM5"
#> CNRM-CERFACS-CNRM-CM5 "CNRM-CERFACS-CNRM-CM5" "CNRM-CM5"
cbind(dat_inv$institute_rcm, shortnames_rcm[dat_inv$institute_rcm])
#> [,1] [,2]
#> KNMI-RACMO22E "KNMI-RACMO22E" "RACMO22E"
#> GERICS-REMO2015 "GERICS-REMO2015" "REMO2015"
#> CLMcom-ETH-COSMO-crCLIM-v1-1 "CLMcom-ETH-COSMO-crCLIM-v1-1" "COSMO-crCLIM-v1-1"
#> CNRM-ALADIN63 "CNRM-ALADIN63" "ALADIN63"
#> CLMcom-ETH-COSMO-crCLIM-v1-1 "CLMcom-ETH-COSMO-crCLIM-v1-1" "COSMO-crCLIM-v1-1"
#> CLMcom-ETH-COSMO-crCLIM-v1-1 "CLMcom-ETH-COSMO-crCLIM-v1-1" "COSMO-crCLIM-v1-1"
#> CLMcom-ETH-COSMO-crCLIM-v1-1 "CLMcom-ETH-COSMO-crCLIM-v1-1" "COSMO-crCLIM-v1-1"
#> CLMcom-ETH-COSMO-crCLIM-v1-1 "CLMcom-ETH-COSMO-crCLIM-v1-1" "COSMO-crCLIM-v1-1"