1. Glenn Hammond
  2. pflotran-dev

Commits

Glenn Hammond  committed 3d8308b

Modified units

  • Participants
  • Parent commits 85b5884
  • Branches default

Comments (0)

Files changed (1)

File src/pflotran/reactive_transport.F90

View file
  • Ignore whitespace
       if (reaction%total_sorb_print(i)) then
         name = 'Total Sorbed ' // trim(reaction%primary_species_names(i))
         units = 'mol/m^3'
-       call  OutputVariableAddToList(list,name,OUTPUT_CONCENTRATION,units, &
-                                     TOTAL_SORBED,i)        
+        call  OutputVariableAddToList(list,name,OUTPUT_CONCENTRATION,units, &
+                                      TOTAL_SORBED,i)        
       endif
     enddo
   endif
       if (reaction%total_sorb_mobile_print(i)) then
         name = 'Total Sorbed Mobile ' // &
                trim(reaction%colloid_species_names(i))
-        units = '??'
+        units = trim(tot_mol_char)
         call OutputVariableAddToList(list,name,OUTPUT_CONCENTRATION,units, &
                                      TOTAL_SORBED_MOBILE,i)  
       endif