change API names

no functional difference
change from iMOAB_FromMappingFile to iMOAB_LoadMapFile
and from iMOAB_WriteMappingWeightsFile to iMOAB_WriteMapFile

Author: iulian787

driver-moab/main/prep_ocn_mod.F90

@@ -210,7 +210,7 @@ subroutine prep_ocn_init(infodata, atm_c2_ocn, atm_c2_ice, ice_c2_ocn, rof_c2_oc
     use iMOAB, only: iMOAB_ComputeMeshIntersectionOnSphere, iMOAB_RegisterApplication, &
       iMOAB_WriteMesh, iMOAB_DefineTagStorage, iMOAB_ComputeCommGraph, iMOAB_ComputeScalarProjectionWeights, &
       iMOAB_MigrateMapMesh, iMOAB_WriteLocalMesh, iMOAB_GetMeshInfo, iMOAB_SetDoubleTagStorage, &
-      iMOAB_WriteMappingWeightsToFile, iMOAB_SetMapGhostLayers
+      iMOAB_WriteMapFile, iMOAB_SetMapGhostLayers
     !---------------------------------------------------------------
     ! Description
     ! Initialize module attribute vectors and all other non-mapping
@@ -540,7 +540,7 @@ subroutine prep_ocn_init(infodata, atm_c2_ocn, atm_c2_ice, ice_c2_ocn, rof_c2_oc
                      call shr_sys_abort(subname//' ERROR in computing ATM-OCN weights ')
                   endif
 
-                  ! ierr = iMOAB_WriteMappingWeightsToFile(mbintxao, wgtIda2o_bilinear, 'bilinear_a2o.nc'//C_NULL_CHAR)
+                  ! ierr = iMOAB_WriteMapFile(mbintxao, wgtIda2o_bilinear, 'bilinear_a2o.nc'//C_NULL_CHAR)
 
                   ! Next compute the conservative map for projection of flux fields
                   if (iamroot_CPLID) then

driver-moab/main/seq_map_mod.F90

@@ -178,7 +178,7 @@ end subroutine seq_map_init_rcfile
   subroutine moab_map_init_rcfile( mbsrc, mbtgt, mbintx, discretization_type, &
     maprcfile, maprcname, maprctype, samegrid, arearead, sol_identifier, string, esmf_map)
 
-   use iMOAB, only: iMOAB_LoadFromMappingFile
+   use iMOAB, only: iMOAB_LoadMapFile
    implicit none
    !-----------------------------------------------------
    !
@@ -229,7 +229,7 @@ subroutine moab_map_init_rcfile( mbsrc, mbtgt, mbintx, discretization_type, &
        write(logunit,*) subname,' reading map file with iMOAB: ', trim(mapfile_term)
    endif
 
-   ierr = iMOAB_LoadFromMappingFile( mbsrc, mbtgt, mbintx, discretization_type, &
+   ierr = iMOAB_LoadMapFile( mbsrc, mbtgt, mbintx, discretization_type, &
                       discretization_type, arearead, sol_identifier, mapfile_term)
    if (ierr .ne. 0) then
       write(logunit,*) subname,' error in loading map file'