ESMF_LogSetError Subroutine

public subroutine ESMF_LogSetError(rcToCheck, keywordEnforcer, msg, line, file, method, rcToReturn, log)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: rcToCheck
type(ESMF_KeywordEnforcer), optional :: keywordEnforcer
character(len=*), intent(in), optional :: msg
integer, intent(in), optional :: line
character(len=*), intent(in), optional :: file
character(len=*), intent(in), optional :: method
integer, intent(out), optional :: rcToReturn
type(ESMF_Log), intent(inout), optional :: log

Calls

proc~~esmf_logseterror~~CallsGraph proc~esmf_logseterror ESMF_LogSetError esmf_breakpoint esmf_breakpoint proc~esmf_logseterror->esmf_breakpoint proc~esmf_logrc2msg ESMF_LogRc2Msg proc~esmf_logseterror->proc~esmf_logrc2msg proc~esmf_logwrite ESMF_LogWrite proc~esmf_logseterror->proc~esmf_logwrite c_esmc_loggeterrormsg c_esmc_loggeterrormsg proc~esmf_logrc2msg->c_esmc_loggeterrormsg c_esmc_vmwtime c_esmc_vmwtime proc~esmf_logwrite->c_esmc_vmwtime proc~esmf_logclose ESMF_LogClose proc~esmf_logwrite->proc~esmf_logclose proc~esmf_logflush ESMF_LogFlush proc~esmf_logwrite->proc~esmf_logflush proc~esmf_logopenfile ESMF_LogOpenFile proc~esmf_logwrite->proc~esmf_logopenfile proc~esmf_utiliounitflush ESMF_UtilIOUnitFlush proc~esmf_logwrite->proc~esmf_utiliounitflush proc~esmf_utilstring2array ESMF_UtilString2Array proc~esmf_logwrite->proc~esmf_utilstring2array proc~esmf_logclose->proc~esmf_logflush proc~esmf_logflush->proc~esmf_utiliounitflush proc~esmf_utilarray2string ESMF_UtilArray2String proc~esmf_logflush->proc~esmf_utilarray2string proc~esmf_logopenfile->proc~esmf_utiliounitflush proc~esmf_utiliounitget ESMF_UtilIOUnitGet proc~esmf_logopenfile->proc~esmf_utiliounitget

Called by

AdvertisewESMF_LogSetError
w
b_or_p_GridToMeshw
w
Blk2BlkBunRedistw
w
Blk2BlkFldRedistw
w
calc_grid_rankw
w
calculateConnectw
w
CDFCheckErrorw
w
CDFCheckErrorw
w
CDFCheckErrorw
w
CDFCheckErrorw
w
char2intw
w
check_fieldw
w
check_valuew
w
checkGridw
w
checkGridw
w
checkGridLitew
w
CheckImportw
w
CheckImportw
w
CheckVarInfow
w
CheckVarMaskw
w
choose_default_coordsysw
w
comp1_runw
w
comp2_runw
w
compare_redist_arrayw
w
ConcurrentComponentw
w
conserve_GridToMeshw
w
construct_descriptor_stringw
w
convert_corner_arrays_to_1Dw
w
CoordInfoFromCoordDepw
w
CoordInfoFromCoordDepArbw
w
copyFracsIntoOutputFieldw
w
create_arrayw
w
create_coordw
w
create_grid_from_distgridw
w
CreateDstVarw
w
DataInitializew
w
dist_rankw
w
dist_sizew
w
error_check_coordsysw
w
ESMF_ArrayBundleReadw
w
ESMF_ArrayBundleRedistSTestw
w
ESMF_ArrayBundleRedistStoreI4w
w
ESMF_ArrayBundleRedistStoreI8w
w
ESMF_ArrayBundleRedistStoreNFw
w
ESMF_ArrayBundleRedistStoreR4w
w
ESMF_ArrayBundleRedistStoreR8w
w
ESMF_ArrayBundleSMMw
w
ESMF_ArrayBundleSMMStoreI4w
w
ESMF_ArrayBundleSMMStoreI8w
w
ESMF_ArrayBundleSMMStoreNFw
w
ESMF_ArrayBundleSMMStoreR4w
w
ESMF_ArrayBundleSMMStoreR8w
w
ESMF_ArrayBundleSparseMMSTestw
w
ESMF_ArrayBundleWritew
w
ESMF_ArrayCreateFromGridw
w
ESMF_ArrayReadw
w
ESMF_ArrayRedist3DSTestw
w
ESMF_ArrayRedistOpenACCSTestw
w
ESMF_ArrayRedistOpenMPSTestw
w
ESMF_ArrayRedistSharedObjSTestw
w
ESMF_ArrayRedistSTestw
w
ESMF_ArrayRedistSTestw
w
ESMF_ArrayRedistSTestw
w
ESMF_ArrayScatterGatherSTestw
w
ESMF_ArraySMMw
w
ESMF_ArraySparseMatMulSTestw
w
ESMF_ArraySpecSetw
w
ESMF_ArrayWritew
w
ESMF_AttributeSTestw
w
ESMF_ClockPrintw
w
ESMF_CompConstructw
w
ESMF_CompDestructw
w
ESMF_CompExecutew
w
ESMF_CompGetw
w
ESMF_CompIsDualConnectedw
w
ESMF_CompIsPetLocalw
w
ESMF_ComplianceCheckerSTestw
w
ESMF_CompSetw
w
ESMF_CompSetVMMaxPEsw
w
ESMF_CompSetVMMaxThreadsw
w
ESMF_CompSetVMMinThreadsw
w
ESMF_CompSetVMStdRedirectw
w
ESMF_CompValidatew
w
ESMF_CompWaitw
w
ESMF_ConcurrentEnsembleSTestw
w
ESMF_ConfigCreateFromSectionw
w
ESMF_ConfigParseAttributesw
w
ESMF_ContainerGarbageGetFLw
w
ESMF_ContainerGarbageGetSILw
w
ESMF_ContainerGetFieldListw
w
ESMF_ContainerGetFieldListAllw
w
ESMF_ContainerGetSILw
w
ESMF_ContainerGetSILAllw
w
ESMF_CplCompDestroyw
w
ESMF_CplCompFinalizew
w
ESMF_CplCompInitializew
w
ESMF_CplCompReadRestartw
w
ESMF_CplCompRunw
w
ESMF_CplCompServiceLoopw
w
ESMF_CplCompSetServicesShObjw
w
ESMF_CplCompWaitw
w
ESMF_CplCompWriteRestartw
w
ESMF_DELayoutCreateDeprecatedw
w
ESMF_DirectCouplingSTestw
w
ESMF_DistGridConnectionGetw
w
ESMF_DistGridCreateDBAIw
w
ESMF_DistGridGetPLocalDew
w
ESMF_DistGridSeqIndexw
w
ESMF_DistGridSetPLocalDew
w
ESMF_FactorReadw
w
ESMF_FieldArbGridUTestw
w
ESMF_FieldBundleLSRedistArb2ArbSTestw
w
ESMF_FieldBundleLSRedistArb2ArbUngrdDimSTestw
w
ESMF_FieldBundleRedistPackedSTestw
w
ESMF_FieldBundleRegridPackedSTestw
w
ESMF_FieldBundleSMMPackedSTestw
w
ESMF_FieldBundleSMMSTestw
w
ESMF_FieldDestructGeomw
w
ESMF_FieldGetGBAllocBoundsw
w
ESMF_FieldLSRedistArb2ArbSTestw
w
ESMF_FieldLSRedistArb2ArbUngrdDimSTestw
w
ESMF_FieldLSSMMSTestw
w
ESMF_FieldMeshSMMSTestw
w
ESMF_FieldRegridw
w
ESMF_FieldRegridGetAreaw
w
ESMF_FieldRegridLSSTestw
w
ESMF_FieldRegridMeshSTestw
w
ESMF_FieldRegridMeshToMeshSTestw
w
ESMF_FieldRegridPatchDisjointSTestw
w
ESMF_FieldRegridSTestw
w
ESMF_FieldRegridSTestw
w
ESMF_FieldRegridSTestw
w
ESMF_FieldRegridStoreNXw
w
ESMF_FieldRegridStoreXw
w
ESMF_FieldSparseMatMulSTestw
w
ESMF_FieldValidatew
w
ESMF_FieldWriteVTKw
w
ESMF_FileRegridw
w
ESMF_FileRegridCheckw
w
ESMF_FileTypeCheckw
w
ESMF_FrameworkInternalInitw
w
ESMF_GetElemFromUGridFilew
w
ESMF_GetMesh2DFromUGridw
w
ESMF_GetMesh3DFromUGridw
w
ESMF_GetMeshFromUGridFilew
w
ESMF_GetNodeFromUGridFilew
w
ESMF_GridAddCoordNoValuesw
w
ESMF_GridAddItemNoValuesw
w
ESMF_GridCommitw
w
ESMF_GridCompDestroyw
w
ESMF_GridCompFinalizew
w
ESMF_GridCompInitializew
w
ESMF_GridCompReadRestartw
w
ESMF_GridCompRunw
w
ESMF_GridCompServiceLoopw
w
ESMF_GridCompSetServicesShObjw
w
ESMF_GridCompWaitw
w
ESMF_GridCompWriteRestartw
w
ESMF_GridConvertIndexw
w
ESMF_GridCreate1PeriDimUfrmBw
w
ESMF_GridCreate1PeriDimUfrmRw
w
ESMF_GridCreateCopyFromNewDGw
w
ESMF_GridCreateCopyFromRegw
w
ESMF_GridCreateCubedSphereIRegw
w
ESMF_GridCreateCubedSphereRegw
w
ESMF_GridCreateDistgridArbw
w
ESMF_GridCreateDistgridIrregw
w
ESMF_GridCreateDistgridRegw
w
ESMF_GridCreateFrmDistGridw
w
ESMF_GridCreateFrmDistGridArbw
w
ESMF_GridCreateFrmGridw
w
ESMF_GridCreateFrmGridCoordw
w
ESMF_GridCreateFrmGridspecw
w
ESMF_GridCreateFrmNCFilew
w
ESMF_GridCreateFrmNCFileDGw
w
ESMF_GridCreateFrmScripw
w
ESMF_GridCreateMosaicIRegw
w
ESMF_GridCreateMosaicRegw
w
ESMF_GridCreateNoPeriDimUfrmRw
w
ESMF_GridCreateShapeTileArbw
w
ESMF_GridCreateShapeTileIrregw
w
ESMF_GridCreateShapeTileRegw
w
ESMF_GridGetArrayInfow
w
ESMF_GridGetCoord1DR4w
w
ESMF_GridGetCoord1DR8w
w
ESMF_GridGetCoord2DR4w
w
ESMF_GridGetCoord2DR8w
w
ESMF_GridGetCoord3DR4w
w
ESMF_GridGetCoord3DR8w
w
ESMF_GridGetCoordIntoArrayw
w
ESMF_GridGetDefaultw
w
ESMF_GridGetIndexw
w
ESMF_GridGetItem1DI4w
w
ESMF_GridGetItem1DR4w
w
ESMF_GridGetItem1DR8w
w
ESMF_GridGetItem2DI4w
w
ESMF_GridGetItem2DR4w
w
ESMF_GridGetItem2DR8w
w
ESMF_GridGetItem3DI4w
w
ESMF_GridGetItem3DR4w
w
ESMF_GridGetItem3DR8w
w
ESMF_GridGetPLocalDew
w
ESMF_GridLUA1PeriDimw
w
ESMF_GridLUA2PeriDimw
w
ESMF_GridLUADefaultw
w
ESMF_GridSetCmmitShapeTileArbw
w
ESMF_GridSetCmmitShapeTileIrregw
w
ESMF_GridSetCmmitShapeTileRegw
w
ESMF_GridSetCoordFromArrayw
w
ESMF_GridSetItemFromArrayw
w
ESMF_GridspecGetVar1Dw
w
ESMF_GridspecGetVar1DR4w
w
ESMF_GridspecGetVar2Dw
w
ESMF_GridspecGetVar2DR4w
w
ESMF_GridspecGetVarByNamew
w
ESMF_GridspecInqw
w
ESMF_GridspecQueryTileFilew
w
ESMF_GridspecQueryTileGlobalw
w
ESMF_GridspecQueryTileSizew
w
ESMF_GridspecReadMosaicw
w
ESMF_GridspecReadStaggerR4w
w
ESMF_GridspecReadStaggerR8w
w
ESMF_GridspecReadTilew
w
ESMF_HConfigAsI4w
w
ESMF_HConfigAsI4MapKeyw
w
ESMF_HConfigAsI4MapValw
w
ESMF_HConfigAsI4Seqw
w
ESMF_HConfigAsI4SeqMapKeyw
w
ESMF_HConfigAsI4SeqMapValw
w
ESMF_HConfigAsI8w
w
ESMF_HConfigAsI8MapKeyw
w
ESMF_HConfigAsI8MapValw
w
ESMF_HConfigAsI8Seqw
w
ESMF_HConfigAsI8SeqMapKeyw
w
ESMF_HConfigAsI8SeqMapValw
w
ESMF_HConfigAsLogicalw
w
ESMF_HConfigAsLogicalMapKeyw
w
ESMF_HConfigAsLogicalMapValw
w
ESMF_HConfigAsLogicalSeqw
w
ESMF_HConfigAsLogicalSeqMapKeyw
w
ESMF_HConfigAsLogicalSeqMapValw
w
ESMF_HConfigAsR4w
w
ESMF_HConfigAsR4MapKeyw
w
ESMF_HConfigAsR4MapValw
w
ESMF_HConfigAsR4Seqw
w
ESMF_HConfigAsR4SeqMapKeyw
w
ESMF_HConfigAsR4SeqMapValw
w
ESMF_HConfigAsR8w
w
ESMF_HConfigAsR8MapKeyw
w
ESMF_HConfigAsR8MapValw
w
ESMF_HConfigAsR8Seqw
w
ESMF_HConfigAsR8SeqMapKeyw
w
ESMF_HConfigAsR8SeqMapValw
w
ESMF_HConfigAsStringw
w
ESMF_HConfigAsStringMapKeyw
w
ESMF_HConfigAsStringMapValw
w
ESMF_HConfigAsStringSeqw
w
ESMF_HConfigAsStringSeqMapKeyw
w
ESMF_HConfigAsStringSeqMapValw
w
ESMF_HConfigCreateAtw
w
ESMF_HConfigCreateAtMapKeyw
w
ESMF_HConfigCreateAtMapValw
w
ESMF_HConfigCreateDefaultw
w
ESMF_HConfigRemovew
w
ESMF_HConfigValidateMapKeysw
w
ESMF_InfoDescribe%getInfoGeomw
w
ESMF_InfoSetHConfigw
w
ESMF_InterArrayCreateDGConnw
w
ESMF_InterArrayCreatePtrw
w
ESMF_IsProxyw
w
ESMF_LocStreamCreateIrregw
w
ESMF_LocStreamDestroyw
w
ESMF_LocStreamGetw
w
ESMF_LogErrExw
w
ESMF_LogInitializew
w
ESMF_MeshAddElementsw
w
ESMF_MeshAddNodesw
w
ESMF_MeshCreate1Partw
w
ESMF_MeshCreateDualw
w
ESMF_MeshCreateEasyElemsGenw
w
ESMF_MeshCreateFromFileOldw
w
ESMF_MeshCreateFromScripw
w
ESMF_MeshCreateFromUnstructw
w
ESMF_MeshCreateRedistw
w
ESMF_MeshFindPntw
w
ESMF_MeshGetw
w
ESMF_MeshGetElemAreaw
w
ESMF_MeshGetElemFracw
w
ESMF_MeshGetElemFrac2w
w
ESMF_MeshMatchw
w
ESMF_MeshSetw
w
ESMF_MeshWritew
w
ESMF_MeshWriteVTKw
w
ESMF_NetCDFCheckErrorw
w
ESMF_NetCDFInquireDimensionw
w
ESMF_OutputScripGridFilew
w
ESMF_ParseDurDateStringw
w
ESMF_ParseDurStringw
w
ESMF_ParseDurTimeStringw
w
ESMF_PointListCreateFrmLocStreamw
w
ESMF_ReconcileDeserializeAllw
w
ESMF_ReconcileSerializeAllw
w
ESMF_ReconcileSingleCompCasew
w
ESMF_RecursiveComponentSTestw
w
ESMF_RegridGetAreaw
w
ESMF_RegridGetFracw
w
ESMF_RegridGetIwtsw
w
ESMF_RegridStorew
w
ESMF_RegridWeightGenCheckw
w
ESMF_RegridWeightGenDGw
w
ESMF_RegridWeightGenFilew
w
ESMF_SequentialEnsembleSTestw
w
ESMF_SparseMatcaw
w
ESMF_StateItemGetw
w
ESMF_StateItemStringw
w
ESMF_StateReconcilew
w
ESMF_StateReconcile_driverw
w
ESMF_TraceSTestw
w
ESMF_TransferGridSTestw
w
ESMF_TransferMeshSTestw
w
ESMF_UGridGetCoordsw
w
ESMF_UGridGetVarw
w
ESMF_UGridGetVarByNamew
w
ESMF_UGridInqw
w
ESMF_UGridInqVarLocw
w
ESMF_UtilString2Doublew
w
ESMF_UtilString2Intw
w
ESMF_UtilString2Realw
w
ESMF_UtilStringDiffMatchw
w
ESMF_VMAllFullReduceI4w
w
ESMF_VMAllFullReduceI8w
w
ESMF_VMAllFullReduceR4w
w
ESMF_VMAllFullReduceR8w
w
ESMF_VMAllGatherVCharArrayw
w
ESMF_VMAllGatherVI4w
w
ESMF_VMAllGatherVI8w
w
ESMF_VMAllGatherVR4w
w
ESMF_VMAllGatherVR8w
w
ESMF_VMAllGatherVVMIdw
w
ESMF_VMAllReduceI4w
w
ESMF_VMAllReduceI4Sw
w
ESMF_VMAllReduceI8w
w
ESMF_VMAllReduceR4w
w
ESMF_VMAllReduceR8w
w
ESMF_VMAllToAllI4w
w
ESMF_VMAllToAllI8w
w
ESMF_VMAllToAllR4w
w
ESMF_VMAllToAllR8w
w
ESMF_VMAllToAllVCharArrayw
w
ESMF_VMAllToAllVFLogicalw
w
ESMF_VMAllToAllVI4w
w
ESMF_VMAllToAllVI8w
w
ESMF_VMAllToAllVR4w
w
ESMF_VMAllToAllVR8w
w
ESMF_VMAllToAllVVMIdw
w
ESMF_VMBcastVMIdw
w
ESMF_VMGetDefaultw
w
ESMF_VMReduceI4w
w
ESMF_VMReduceI8w
w
ESMF_VMReduceR4w
w
ESMF_VMReduceR8w
w
ESMF_WebServCplCompProcessRqstw
w
ESMF_WebServCplCompWaitForRqstw
w
ESMF_WebServProcessRequestw
w
ESMF_WebServWaitForRequestw
w
ESMF_XGridCreatew
w
ESMF_XGridCreateFromSparseMatw
w
ESMF_XGridDestroyw
w
ESMF_XGridDGOverlayw
w
ESMF_XGridGeomBaseMatchw
w
ESMF_XGridGetDefaultw
w
ESMF_XGridGetDGw
w
ESMF_XGridGetFrac2IntGridw
w
ESMF_XGridGetFrac2IntMeshw
w
ESMF_XGridGetFracIntGridw
w
ESMF_XGridGetFracIntMeshw
w
ESMF_XGridGetGBw
w
ESMF_XGridGetGeomObjw
w
ESMF_XGridGetSMMSpecFracw
w
ESMF_XGridValidatew
w
ESMF_XGridWriteVTKw
w
ESMFIO_FieldAccessw
w
ESMFIO_Readw
w
ESMFIO_Writew
w
ESMX_Appw
w
f_esmf_cplcompprocessfinalw
w
f_esmf_cplcompprocessinitw
w
f_esmf_cplcompprocessrunw
w
f_esmf_dynmaskcallbackr4r4r4w
w
f_esmf_dynmaskcallbackr4r8r4w
w
f_esmf_dynmaskcallbackr8r8r8w
w
f_esmf_meshcreatefromfilew
w
f_esmf_processfinalw
w
f_esmf_processinitw
w
f_esmf_processrunw
w
f_esmf_regridstorefilew
w
f_esmf_xgridgetsparsemata2xw
w
f_esmf_xgridgetsparsematb2xw
w
f_esmf_xgridgetsparsematx2aw
w
f_esmf_xgridgetsparsematx2bw
w
field_regrid_testw
w
FieldBundleCplStorew
w
FieldBundleRedistExw
w
FieldConcurrentComponentw
w
FieldRedistw
w
find_corner_alignw
w
flux_exchangew
w
flux_exchangew
w
flux_exchange_sphw
w
flux_exchange_sphw
w
GetIndexSpaceArbw
w
GetIndexSpaceIrregw
w
GetIndexSpaceRegw
w
getMeshOnCornersWFieldOnCenterw
w
getMeshWithNodesOnFieldLocw
w
getPointListOnFieldLocw
w
getUniqueListw
w
GridReadCoordsw
w
GridSpecReadCoordsw
w
IInitCheckw
w
IInitModifyCplListsw
w
InitializeGenericw
w
InitializeIPDv05p2bw
w
InitializeIPDv05p3w
w
InitializeIPDv05p4w
w
InitializeIPDv05p5w
w
InitializeIPDv05p6bw
w
InitializeIPDvXp07w
w
interpret_descriptor_stringw
w
IOCompUTestComparew
w
IONCClosew
w
IONCCreatew
w
IONCOpenw
w
IORead2Dw
w
IOWrite2Dw
w
loopDataDependentInitializew
w
MapperSimpleTwoConcurrentCompsw
w
memory_separatew
w
memory_topologyw
w
ModelAdvancew
w
ModelFinalizew
w
MosaicReadCoordsw
w
NCFileInquirew
w
NUOPC_AdvertiseFieldw
w
NUOPC_CheckSetClockw
w
NUOPC_ChopStringw
w
NUOPC_ConnectorGetw
w
NUOPC_ConnectorSetw
w
NUOPC_CplCompAttributeGetw
w
NUOPC_CplCompAttributeIngw
w
NUOPC_CplCompSpecializew
w
NUOPC_DriverAddCplCompw
w
NUOPC_DriverAddRunElementCPLw
w
NUOPC_DriverAddRunElementLw
w
NUOPC_DriverAddRunElementMPLw
w
NUOPC_DriverGetAllCplCompw
w
NUOPC_DriverGetAllGridCompw
w
NUOPC_DriverIngestRunSequenceFFw
w
NUOPC_DriverSetRunSequencew
w
NUOPC_FieldBundleUpdateTimew
w
NUOPC_FieldDictionaryIngestIw
w
NUOPC_FreeFormatAddw
w
NUOPC_FreeFormatCreateReadw
w
NUOPC_FreeFormatGetLinew
w
NUOPC_GetStateMemberListsw
w
NUOPC_GridCompAttributeGetw
w
NUOPC_GridCompAttributeIngw
w
NUOPC_GridCompAttributeInitw
w
NUOPC_GridCompSetServicesw
w
NUOPC_GridCompSetVMw
w
NUOPC_GridCompSpecializew
w
NUOPC_IngestPetListFFw
w
NUOPC_InitAttributesFieldw
w
NUOPC_RealizeCompleteGw
w
NUOPC_RealizeCompleteLSw
w
NUOPC_RealizeCompleteMw
w
NUOPC_RealizeTransferw
w
NUOPC_RunElementAddw
w
NUOPC_RunElementAddCompw
w
NUOPC_RunElementAddLinkw
w
NUOPC_RunSequenceCtrlw
w
NUOPC_RunSequenceIteratew
w
NUOPC_SetVMw
w
NUOPC_UpdateAcrossFieldListsw
w
parse_descriptor_stringw
w
populate_array_valuew
w
populate_fieldw
w
populate_redist_arrayw
w
process_queryw
w
ProcessRecusivew
w
read_descriptor_filesw
w
read_dist_specificationw
w
read_grid_specificationw
w
read_redistribution_gridw
w
read_regridding_gridw
w
read_table_integerw
w
read_table_realw
w
read_table_stringw
w
Read_TestHarness_Configw
w
readContactsw
w
ReadMosaicFieldw
w
readVar1Dw
w
readVar2Dw
w
readVar3Dw
w
readVar4Dw
w
Realizew
w
report_descriptor_stringw
w
RunTestsw
w
SetServicesw
w
Setup1PeriodicConnw
w
SetupTileConnw
w
ShareFieldWithGridw
w
ShareFieldWithMeshw
w
test3w
w
test3a2_fptrw
w
test3a_fptrw
w
test7d2_genericw
w
test7d2_generic_fptrw
w
test7d3_generic_fptrw
w
test_gather_1dw
w
test_regrid2xgw
w
test_regrid2xg_containw
w
test_regrid2xg_halfw
w
test_smmw
w
UGridReadCoordsw
w
user_initw
w
user_initw
w
user_initw
w
user_initw
w
user_initw
w
user_runw
w
WriteMosaicFieldw
w
x_comp_check_fieldw
w
x_comp_get_configw
w
x_comp_grid_diagw
w
x_comp_hconfig_i4w
w
x_comp_hconfig_logicalw
w
x_comp_hconfig_r8w
w
x_comp_hconfig_strw
w
x_comp_read_fieldsw
w
x_comp_read_geomw
w
x_comp_read_outputw
w
x_comp_realize_fieldw
w

Source Code

      subroutine ESMF_LogSetError(rcToCheck, keywordEnforcer,  &
                                  msg, line, file, method, &
                                  rcToReturn, log)

! !ARGUMENTS:
!
      integer,          intent(in)              :: rcToCheck
type(ESMF_KeywordEnforcer), optional:: keywordEnforcer ! must use keywords below
      character(len=*), intent(in),    optional :: msg
      integer,          intent(in),    optional :: line
      character(len=*), intent(in),    optional :: file
      character(len=*), intent(in),    optional :: method
      integer,          intent(out),   optional :: rcToReturn
      type(ESMF_Log),   intent(inout), optional :: log

!
! !STATUS:
! \begin{itemize}
! \item\apiStatusCompatibleVersion{5.2.0r}
! \end{itemize}
!
! !DESCRIPTION:
!      This subroutine sets the {\tt rcToReturn} value to {\tt rcToCheck} if
!      {\tt rcToReturn} is present and writes this error code to the {\tt ESMF\_Log}
!      if an error is generated.  A predefined error message will added to the
!      {\tt ESMF\_Log} along with a user added {\tt msg}, {\tt line}, {\tt file}
!      and {\tt method}.
!
!      The arguments are:
!      \begin{description}
!
!      \item [rcToCheck]
!            rc value for set
!      \item [{[msg]}]
!            User-provided message string.
!      \item [{[line]}]
!            Integer source line number.  Expected to be set by
!            using the preprocessor macro {\tt \_\_LINE\_\_} macro.
!      \item [{[file]}]
!            User-provided source file name.
!      \item [{[method]}]
!            User-provided method string.
!      \item [{[rcToReturn]}]
!            If specified, copy the {\tt rcToCheck} value to {\tt rcToreturn}.
!            This is not the return code for this function; it allows
!            the calling code to do an assignment of the error code
!            at the same time it is testing the value.
!      \item [{[log]}]
!            An optional {\tt ESMF\_Log} object that can be used instead
!            of the default Log.
!
!      \end{description}
!
!EOP

    integer:: i
    logical:: masked
    type(ESMF_LogPrivate), pointer          :: alog
    character(len=ESMF_MAXSTR) :: errmsg
    integer :: msglen

    ESMF_INIT_CHECK_SET_SHALLOW(ESMF_LogGetInit,ESMF_LogInit,log)

    nullify(alog) ! ensure that the association status is well defined

    if (present(log)) then
      if (log%logTableIndex > 0) then
         alog => ESMF_LogTable(log%logTableIndex)
      endif
    else
      if (ESMF_LogDefault%logTableIndex > 0) then
        alog => ESMF_LogTable(ESMF_LogDefault%logTableIndex)
      end if
    endif

    if (associated(alog)) then

      ESMF_INIT_CHECK_SET_SHALLOW(ESMF_LogPrivateGetInit,ESMF_LogPrivateInit,alog)

      ! set default returns
      if (present(rcToReturn)) rcToReturn = ESMF_SUCCESS

      ! check the error code
      if (rcToCheck .NE. ESMF_SUCCESS) then
        masked = .false.
        do i=1, alog%errorMaskCount
          if (alog%errorMask(i) == rcToCheck) masked = .true.
        enddo
        if (.not.masked) then
          call ESMF_Breakpoint()  ! no-op to assist debugging
          call ESMF_LogRc2Msg (rcToCheck, errmsg, msglen)
          if (present(msg)) then
            errmsg = errmsg(:msglen) // " - " // msg
            msglen = len_trim (errmsg)
          end if
          call ESMF_LogWrite(errmsg(:msglen), ESMF_LOGMSG_ERROR,  &
            line=line, file=file, method=method, log=log)
          if (present(rcToReturn)) rcToReturn = rcToCheck
        endif
      endif
    else
      if (present(rcToReturn)) rcToReturn = ESMF_SUCCESS
    endif

end subroutine ESMF_LogSetError