Merge pull request #325 from jedwards4b/pio_asyncio_in_cmeps

enable asyncio using pio
### Description of changes
Allows IO tasks to be independent of compute tasks in cesm

### Specific notes
(testing in progress)
Contributors other than yourself, if any:
Depends on share (ESCOMP#37) and cime (ESMCI/cime#4340).

CMEPS Issues Fixed (include github issue #):

Are changes expected to change answers? (specify if bfb, different at roundoff, more substantial)

Any User Interface Changes (namelist or namelist defaults changes)?

### Testing performed

Testing performed if application target is CESM:
- [ ] (recommended) CIME_DRIVER=nuopc scripts_regression_tests.py
   - machines:
   - details (e.g. failed tests):
- [ ] (recommended) CESM testlist_drv.xml
   - machines and compilers:
   - details (e.g. failed tests):
- [X] (optional) CESM prealpha test
   - machines and compilers cheyenne intel
   - details (e.g. failed tests): results consistant with cesm2_3_alpha10d
- [ ] (other) please described in detail
   - machines and compilers
   - details (e.g. failed tests):

Testing performed if application target is UFS-coupled:
- [ ] (recommended) UFS-coupled testing
   - description:
   - details (e.g. failed tests):

Testing performed if application target is UFS-HAFS:
- [X] (recommended) UFS-HAFS testing
   - description:
   - details (e.g. failed tests):

### Hashes used for testing:

- [ ] CESM:
  - repository to check out: https://github.com/ESCOMP/CESM.git
  - branch/hash:
- [ ] UFS-coupled, then umbrella repostiory to check out and associated hash:
  - repository to check out:
  - branch/hash:
- [ ] UFS-HAFS, then umbrella repostiory to check out and associated hash:
  - repository to check out:
  - branch/hash:

Author: jedwards4b

src/nuopc_shr_methods.F90

@@ -130,9 +130,8 @@ subroutine get_component_instance(gcomp, inst_suffix, inst_index, rc)
   end subroutine get_component_instance
 
 !===============================================================================
-
   subroutine set_component_logging(gcomp, maintask, logunit, shrlogunit, rc)
-    use driver_pio_mod, only : driver_pio_log_comp_settings
+    use NUOPC, only: NUOPC_CompAttributeSet, NUOPC_CompAttributeAdd  
     ! input/output variables
     type(ESMF_GridComp)  :: gcomp
     logical, intent(in)  :: maintask
@@ -144,8 +143,10 @@ subroutine set_component_logging(gcomp, maintask, logunit, shrlogunit, rc)
     character(len=CL) :: diro
     character(len=CL) :: logfile
     character(len=CL) :: inst_suffix
-    integer :: inst_index  ! not used here
+    integer :: inst_index ! Not used here
     integer :: n
+    character(len=CL) :: name
+    character(len=*), parameter :: subname = "("//__FILE__//": set_component_logging)"   
     !-----------------------------------------------------------------------
 
     rc = ESMF_SUCCESS
@@ -164,16 +165,23 @@ subroutine set_component_logging(gcomp, maintask, logunit, shrlogunit, rc)
        endif
 
        open(newunit=logunit,file=trim(diro)//"/"//trim(logfile))
-       ! Write the PIO settings to the beggining of each component log
-       call driver_pio_log_comp_settings(gcomp, logunit)
 
     else
        logUnit = 6
     endif
-    shrlogunit = logunit
+    
+    call ESMF_GridCompGet(gcomp, name=name, rc=rc)
+    if (chkerr(rc,__LINE__,u_FILE_u)) return
 
+    call ESMF_LogWrite(trim(subname)//": setting logunit for component: "//trim(name), ESMF_LOGMSG_INFO)
+    call NUOPC_CompAttributeAdd(gcomp, (/"logunit"/), rc=rc)
+    if (chkerr(rc,__LINE__,u_FILE_u)) return
+    call NUOPC_CompAttributeSet(gcomp, "logunit", logunit, rc=rc)
+    if (chkerr(rc,__LINE__,u_FILE_u)) return
     call shr_log_setLogUnit (logunit)
-    
+    ! Still need to set this return value
+    shrlogunit = logunit
+    call ESMF_LogWrite(trim(subname)//": done for component "//trim(name), ESMF_LOGMSG_INFO)
   end subroutine set_component_logging
 
 !===============================================================================