Set mbGridType to 0 for mlnid

Set mbGridType to 0 for mlnid.  Some code was moved for the scm case
which broke the calculation that was here.

Author: rljacob

driver-moab/main/cplcomp_exchange_mod.F90

@@ -1695,9 +1695,7 @@ subroutine cplcomp_moab_Init(infodata,comp)
          if (mlnid >= 0) then
             ierr  = iMOAB_GetMeshInfo ( mlnid, nvert, nvise, nbl, nsurf, nvisBC )
             comp%mbApCCid = mlnid ! land
-	    ! MOAB TODO:  check this logic.  Seems to assume typeA might be
-	    ! 3 or 2 but only typeB has that possibility.
-            comp%mbGridType = typeA - 2 ! 0 or 1, pc or cells 
+            comp%mbGridType = 0 ! 0 or 1, pc or cells
             comp%mblsize = nvert(1) ! vertices
          endif
          if ( .not. mb_scm_land ) then