Merge pull request ESCOMP#102 from mvertens/feature/fix_logout

fixed log output encountered in ctsm
### Description of changes
Minor fix to output vector stream info

### Specific notes

Contributors other than yourself, if any:

CMEPS Issues Fixed (include github issue #):

Are there dependencies on other component PRs
 - [ ] CIME (list)
 - [ ] CMEPS (list)

Are changes expected to change answers?
 - [x] bit for bit
 - [ ] different at roundoff level
 - [ ] more substantial

Any User Interface Changes (namelist or namelist defaults changes)?
 - [ ] Yes
 - [x] No

Testing performed:
- [ ] (required) aux_cdeps
   - machines and compilers:
   - details (e.g. failed tests):
- [ ] (optional) CESM prealpha test
   - machines and compilers
   - details (e.g. failed tests):
 - found in running the aux_clm test suite with the nuopc cap

Hashes used for testing:
feature/stream_refactor in https://github.com/mvertens/CTSM

streams/dshr_strdata_mod.F90

@@ -1155,19 +1155,16 @@ subroutine shr_strdata_print(sdat, name)
     write(sdat%logunit,F01) "pio_iotype  = ",sdat%io_type
 
     write(sdat%logunit,F01) "nstreams    = ",shr_strdata_get_stream_count(sdat)
+    write(sdat%logunit,F01) "nvectors    = ",sdat%nvectors
     do ns = 1, shr_strdata_get_stream_count(sdat)
        write(sdat%logunit,F04) "  taxMode (",ns,") = ",trim(sdat%stream(ns)%taxmode)
        write(sdat%logunit,F07) "  dtlimit (",ns,") = ",sdat%stream(ns)%dtlimit
        write(sdat%logunit,F04) "  mapalgo (",ns,") = ",trim(sdat%stream(ns)%mapalgo)
        write(sdat%logunit,F04) "  tintalgo(",ns,") = ",trim(sdat%stream(ns)%tinterpalgo)
        write(sdat%logunit,F04) "  readmode(",ns,") = ",trim(sdat%stream(ns)%readmode)
+       write(sdat%logunit,F04) "  vectors (",ns,") = ",trim(sdat%stream(ns)%stream_vectors)
        write(sdat%logunit,F01) " "
     end do
-
-    write(sdat%logunit,F01) "nvectors    = ",sdat%nvectors
-    do n=1, sdat%nvectors
-       write(sdat%logunit,F04) "  vectors (",n,") = ",trim(sdat%stream(n)%stream_vectors)
-    end do
     write(sdat%logunit,F90)
 
   end subroutine shr_strdata_print