!STARTOFREGISTRYGENERATEDINCLUDE 'inc/med_open_esmf_calls.inc'
!
! WARNING This file is generated automatically by use_registry
! using the data base in the file named Registry.
! Do not edit.  Your changes to this file will be lost.
!
CALL nl_get_io_form_auxinput1( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 0
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT1_ALARM,       &
                   config_flags%auxinput1_inname, grid%auxinput1_oid, &
                   input_auxinput1, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput2( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 1
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT2_ALARM,       &
                   config_flags%auxinput2_inname, grid%auxinput2_oid, &
                   input_auxinput2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput3( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 2
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT3_ALARM,       &
                   config_flags%auxinput3_inname, grid%auxinput3_oid, &
                   input_auxinput3, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput4( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 3
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT4_ALARM,       &
                   config_flags%auxinput4_inname, grid%auxinput4_oid, &
                   input_auxinput4, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput5( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 4
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT5_ALARM,       &
                   config_flags%auxinput5_inname, grid%auxinput5_oid, &
                   input_auxinput5, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput6( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 5
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT6_ALARM,       &
                   config_flags%auxinput6_inname, grid%auxinput6_oid, &
                   input_auxinput6, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput7( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 6
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT7_ALARM,       &
                   config_flags%auxinput7_inname, grid%auxinput7_oid, &
                   input_auxinput7, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput8( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 7
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT8_ALARM,       &
                   config_flags%auxinput8_inname, grid%auxinput8_oid, &
                   input_auxinput8, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput9( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 8
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT9_ALARM,       &
                   config_flags%auxinput9_inname, grid%auxinput9_oid, &
                   input_auxinput9, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput10( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 9
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT10_ALARM,       &
                   config_flags%auxinput10_inname, grid%auxinput10_oid, &
                   input_auxinput10, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput11( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 10
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT11_ALARM,       &
                   config_flags%auxinput11_inname, grid%auxinput11_oid, &
                   input_auxinput11, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput12( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 11
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT12_ALARM,       &
                   config_flags%auxinput12_inname, grid%auxinput12_oid, &
                   input_auxinput12, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput13( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 12
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT13_ALARM,       &
                   config_flags%auxinput13_inname, grid%auxinput13_oid, &
                   input_auxinput13, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput14( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 13
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT14_ALARM,       &
                   config_flags%auxinput14_inname, grid%auxinput14_oid, &
                   input_auxinput14, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput15( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 14
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT15_ALARM,       &
                   config_flags%auxinput15_inname, grid%auxinput15_oid, &
                   input_auxinput15, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput16( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 15
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT16_ALARM,       &
                   config_flags%auxinput16_inname, grid%auxinput16_oid, &
                   input_auxinput16, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput17( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 16
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT17_ALARM,       &
                   config_flags%auxinput17_inname, grid%auxinput17_oid, &
                   input_auxinput17, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput18( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 17
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT18_ALARM,       &
                   config_flags%auxinput18_inname, grid%auxinput18_oid, &
                   input_auxinput18, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput19( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 18
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT19_ALARM,       &
                   config_flags%auxinput19_inname, grid%auxinput19_oid, &
                   input_auxinput19, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput20( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 19
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT20_ALARM,       &
                   config_flags%auxinput20_inname, grid%auxinput20_oid, &
                   input_auxinput20, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput21( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 20
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT21_ALARM,       &
                   config_flags%auxinput21_inname, grid%auxinput21_oid, &
                   input_auxinput21, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput22( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 21
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT22_ALARM,       &
                   config_flags%auxinput22_inname, grid%auxinput22_oid, &
                   input_auxinput22, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput23( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 22
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT23_ALARM,       &
                   config_flags%auxinput23_inname, grid%auxinput23_oid, &
                   input_auxinput23, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxinput24( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxinput + 23
  CALL open_aux_u( grid, config_flags, stream, AUXINPUT24_ALARM,       &
                   config_flags%auxinput24_inname, grid%auxinput24_oid, &
                   input_auxinput24, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist1( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 0
  CALL open_hist_w( grid, config_flags, stream, AUXHIST1_ALARM,       &
                    config_flags%auxhist1_outname, grid%auxhist1_oid, &
                    output_auxhist1, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist2( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 1
  CALL open_hist_w( grid, config_flags, stream, AUXHIST2_ALARM,       &
                    config_flags%auxhist2_outname, grid%auxhist2_oid, &
                    output_auxhist2, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist3( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 2
  CALL open_hist_w( grid, config_flags, stream, AUXHIST3_ALARM,       &
                    config_flags%auxhist3_outname, grid%auxhist3_oid, &
                    output_auxhist3, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist4( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 3
  CALL open_hist_w( grid, config_flags, stream, AUXHIST4_ALARM,       &
                    config_flags%auxhist4_outname, grid%auxhist4_oid, &
                    output_auxhist4, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist5( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 4
  CALL open_hist_w( grid, config_flags, stream, AUXHIST5_ALARM,       &
                    config_flags%auxhist5_outname, grid%auxhist5_oid, &
                    output_auxhist5, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist6( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 5
  CALL open_hist_w( grid, config_flags, stream, AUXHIST6_ALARM,       &
                    config_flags%auxhist6_outname, grid%auxhist6_oid, &
                    output_auxhist6, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist7( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 6
  CALL open_hist_w( grid, config_flags, stream, AUXHIST7_ALARM,       &
                    config_flags%auxhist7_outname, grid%auxhist7_oid, &
                    output_auxhist7, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist8( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 7
  CALL open_hist_w( grid, config_flags, stream, AUXHIST8_ALARM,       &
                    config_flags%auxhist8_outname, grid%auxhist8_oid, &
                    output_auxhist8, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist9( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 8
  CALL open_hist_w( grid, config_flags, stream, AUXHIST9_ALARM,       &
                    config_flags%auxhist9_outname, grid%auxhist9_oid, &
                    output_auxhist9, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist10( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 9
  CALL open_hist_w( grid, config_flags, stream, AUXHIST10_ALARM,       &
                    config_flags%auxhist10_outname, grid%auxhist10_oid, &
                    output_auxhist10, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist11( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 10
  CALL open_hist_w( grid, config_flags, stream, AUXHIST11_ALARM,       &
                    config_flags%auxhist11_outname, grid%auxhist11_oid, &
                    output_auxhist11, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist12( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 11
  CALL open_hist_w( grid, config_flags, stream, AUXHIST12_ALARM,       &
                    config_flags%auxhist12_outname, grid%auxhist12_oid, &
                    output_auxhist12, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist13( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 12
  CALL open_hist_w( grid, config_flags, stream, AUXHIST13_ALARM,       &
                    config_flags%auxhist13_outname, grid%auxhist13_oid, &
                    output_auxhist13, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist14( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 13
  CALL open_hist_w( grid, config_flags, stream, AUXHIST14_ALARM,       &
                    config_flags%auxhist14_outname, grid%auxhist14_oid, &
                    output_auxhist14, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist15( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 14
  CALL open_hist_w( grid, config_flags, stream, AUXHIST15_ALARM,       &
                    config_flags%auxhist15_outname, grid%auxhist15_oid, &
                    output_auxhist15, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist16( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 15
  CALL open_hist_w( grid, config_flags, stream, AUXHIST16_ALARM,       &
                    config_flags%auxhist16_outname, grid%auxhist16_oid, &
                    output_auxhist16, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist17( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 16
  CALL open_hist_w( grid, config_flags, stream, AUXHIST17_ALARM,       &
                    config_flags%auxhist17_outname, grid%auxhist17_oid, &
                    output_auxhist17, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist18( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 17
  CALL open_hist_w( grid, config_flags, stream, AUXHIST18_ALARM,       &
                    config_flags%auxhist18_outname, grid%auxhist18_oid, &
                    output_auxhist18, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist19( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 18
  CALL open_hist_w( grid, config_flags, stream, AUXHIST19_ALARM,       &
                    config_flags%auxhist19_outname, grid%auxhist19_oid, &
                    output_auxhist19, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist20( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 19
  CALL open_hist_w( grid, config_flags, stream, AUXHIST20_ALARM,       &
                    config_flags%auxhist20_outname, grid%auxhist20_oid, &
                    output_auxhist20, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist21( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 20
  CALL open_hist_w( grid, config_flags, stream, AUXHIST21_ALARM,       &
                    config_flags%auxhist21_outname, grid%auxhist21_oid, &
                    output_auxhist21, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist22( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 21
  CALL open_hist_w( grid, config_flags, stream, AUXHIST22_ALARM,       &
                    config_flags%auxhist22_outname, grid%auxhist22_oid, &
                    output_auxhist22, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist23( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 22
  CALL open_hist_w( grid, config_flags, stream, AUXHIST23_ALARM,       &
                    config_flags%auxhist23_outname, grid%auxhist23_oid, &
                    output_auxhist23, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
CALL nl_get_io_form_auxhist24( 1, io_form )
IF ( use_package( io_form ) == IO_ESMF ) THEN
  stream = first_auxhist + 23
  CALL open_hist_w( grid, config_flags, stream, AUXHIST24_ALARM,       &
                    config_flags%auxhist24_outname, grid%auxhist24_oid, &
                    output_auxhist24, fname, n2, ierr )
  IF ( ierr /= 0 ) RETURN
ENDIF
!ENDOFREGISTRYGENERATEDINCLUDE