Extract non-initialization parts of shr_pio_mod to a module in share

Extract the non-initialization parts of shr_pio_mod to a module in the
share repository, just keeping the initialization parts here.

Needs to be coordinated with a branch in the CESM_share repository.

cesm/driver/esm.F90

@@ -808,7 +808,7 @@ subroutine esm_init_pelayout(driver, maxthreads, rc)
     use mpi          , only : MPI_COMM_NULL, mpi_comm_size
 #endif
     use mct_mod      , only : mct_world_init
-    use shr_pio_mod  , only : shr_pio_init, shr_pio_component_init
+    use init_pio_mod , only : init_pio_init, init_pio_component_init
 
 #ifdef MED_PRESENT
     use med_internalstate_mod , only : med_id
@@ -934,7 +934,7 @@ subroutine esm_init_pelayout(driver, maxthreads, rc)
 
     ! Initialize PIO
     ! This reads in the pio parameters that are independent of component
-    call shr_pio_init(driver, rc=rc)
+    call init_pio_init(driver, rc=rc)
     if (chkerr(rc,__LINE__,u_FILE_u)) return
 
     allocate(comms(componentCount+1), comps(componentCount+1))
@@ -1182,7 +1182,7 @@ subroutine esm_init_pelayout(driver, maxthreads, rc)
     enddo
     ! Read in component dependent PIO parameters and initialize
     ! IO systems
-    call shr_pio_component_init(driver, size(comps), rc)
+    call init_pio_component_init(driver, size(comps), rc)
     if (chkerr(rc,__LINE__,u_FILE_u)) return
 
     ! Initialize MCT (this is needed for data models and cice prescribed capability)