MAPL_VarSpecPrintCSV Subroutine

public subroutine MAPL_VarSpecPrintCSV(spec, compName, RC)

Arguments

Type IntentOptional Attributes Name
type(MAPL_VarSpec), intent(in) :: spec(:)
character(len=*), intent(in) :: compName
integer, intent(out), optional :: RC

Calls

proc~~mapl_varspecprintcsv~~CallsGraph proc~mapl_varspecprintcsv MAPL_VarSpecPrintCSV none~info~12 Logger%info proc~mapl_varspecprintcsv->none~info~12 proc~mapl_return MAPL_Return proc~mapl_varspecprintcsv->proc~mapl_return proc~mapl_verify MAPL_Verify proc~mapl_varspecprintcsv->proc~mapl_verify at at proc~mapl_return->at insert insert proc~mapl_return->insert proc~mapl_throw_exception MAPL_throw_exception proc~mapl_return->proc~mapl_throw_exception proc~mapl_verify->proc~mapl_throw_exception

Called by

proc~~mapl_varspecprintcsv~~CalledByGraph proc~mapl_varspecprintcsv MAPL_VarSpecPrintCSV proc~mapl_stateprintspeccsv MAPL_StatePrintSpecCSV proc~mapl_stateprintspeccsv->proc~mapl_varspecprintcsv proc~mapl_stateprintspeccsv->proc~mapl_stateprintspeccsv

Source Code

   subroutine MAPL_VarSpecPrintCSV(SPEC, compName, RC )

      type (MAPL_VarSpec ),             intent(in )     :: spec(:)
      character(len=*),                 intent(in )     :: compName
      integer            , optional   , intent(out)     :: RC

      integer                               :: status
      integer                               :: i

      do I = 1, size(spec)
         call MAPL_VarSpecPrint1CSV(Spec(I), compName, RC=status)
         _VERIFY(status)
      end do

      _RETURN(ESMF_SUCCESS)
   end subroutine MAPL_VarSpecPrintCSV