include file: get_0_nl_config.inc 1
!STARTOFREGISTRYGENERATEDINCLUDE 'inc/get_0_nl_config.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.
!
SUBROUTINE nl_get_run_days
(docs) ( id_id , run_days ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: run_days
INTEGER id_id
CHARACTER*80 emess
run_days = model_config_rec%run_days
RETURN
END SUBROUTINE nl_get_run_days
SUBROUTINE nl_get_run_hours
(docs) ( id_id , run_hours ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: run_hours
INTEGER id_id
CHARACTER*80 emess
run_hours = model_config_rec%run_hours
RETURN
END SUBROUTINE nl_get_run_hours
SUBROUTINE nl_get_run_minutes
(docs) ( id_id , run_minutes ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: run_minutes
INTEGER id_id
CHARACTER*80 emess
run_minutes = model_config_rec%run_minutes
RETURN
END SUBROUTINE nl_get_run_minutes
SUBROUTINE nl_get_run_seconds
(docs) ( id_id , run_seconds ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: run_seconds
INTEGER id_id
CHARACTER*80 emess
run_seconds = model_config_rec%run_seconds
RETURN
END SUBROUTINE nl_get_run_seconds
SUBROUTINE nl_get_start_year
(docs) ( id_id , start_year ) 13,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: start_year
INTEGER id_id
CHARACTER*80 emess
start_year = model_config_rec%start_year(id_id)
RETURN
END SUBROUTINE nl_get_start_year
SUBROUTINE nl_get_start_month
(docs) ( id_id , start_month ) 15,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: start_month
INTEGER id_id
CHARACTER*80 emess
start_month = model_config_rec%start_month(id_id)
RETURN
END SUBROUTINE nl_get_start_month
SUBROUTINE nl_get_start_day
(docs) ( id_id , start_day ) 15,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: start_day
INTEGER id_id
CHARACTER*80 emess
start_day = model_config_rec%start_day(id_id)
RETURN
END SUBROUTINE nl_get_start_day
SUBROUTINE nl_get_start_hour
(docs) ( id_id , start_hour ) 13,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: start_hour
INTEGER id_id
CHARACTER*80 emess
start_hour = model_config_rec%start_hour(id_id)
RETURN
END SUBROUTINE nl_get_start_hour
SUBROUTINE nl_get_start_minute
(docs) ( id_id , start_minute ) 12,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: start_minute
INTEGER id_id
CHARACTER*80 emess
start_minute = model_config_rec%start_minute(id_id)
RETURN
END SUBROUTINE nl_get_start_minute
SUBROUTINE nl_get_start_second
(docs) ( id_id , start_second ) 12,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: start_second
INTEGER id_id
CHARACTER*80 emess
start_second = model_config_rec%start_second(id_id)
RETURN
END SUBROUTINE nl_get_start_second
SUBROUTINE nl_get_end_year
(docs) ( id_id , end_year ) 2,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: end_year
INTEGER id_id
CHARACTER*80 emess
end_year = model_config_rec%end_year(id_id)
RETURN
END SUBROUTINE nl_get_end_year
SUBROUTINE nl_get_end_month
(docs) ( id_id , end_month ) 2,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: end_month
INTEGER id_id
CHARACTER*80 emess
end_month = model_config_rec%end_month(id_id)
RETURN
END SUBROUTINE nl_get_end_month
SUBROUTINE nl_get_end_day
(docs) ( id_id , end_day ) 2,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: end_day
INTEGER id_id
CHARACTER*80 emess
end_day = model_config_rec%end_day(id_id)
RETURN
END SUBROUTINE nl_get_end_day
SUBROUTINE nl_get_end_hour
(docs) ( id_id , end_hour ) 2,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: end_hour
INTEGER id_id
CHARACTER*80 emess
end_hour = model_config_rec%end_hour(id_id)
RETURN
END SUBROUTINE nl_get_end_hour
SUBROUTINE nl_get_end_minute
(docs) ( id_id , end_minute ) 2,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: end_minute
INTEGER id_id
CHARACTER*80 emess
end_minute = model_config_rec%end_minute(id_id)
RETURN
END SUBROUTINE nl_get_end_minute
SUBROUTINE nl_get_end_second
(docs) ( id_id , end_second ) 2,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: end_second
INTEGER id_id
CHARACTER*80 emess
end_second = model_config_rec%end_second(id_id)
RETURN
END SUBROUTINE nl_get_end_second
SUBROUTINE nl_get_interval_seconds
(docs) ( id_id , interval_seconds ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: interval_seconds
INTEGER id_id
CHARACTER*80 emess
interval_seconds = model_config_rec%interval_seconds
RETURN
END SUBROUTINE nl_get_interval_seconds
SUBROUTINE nl_get_input_from_file
(docs) ( id_id , input_from_file ),1
USE module_configure
, ONLY : model_config_rec
logical , INTENT(OUT) :: input_from_file
INTEGER id_id
CHARACTER*80 emess
input_from_file = model_config_rec%input_from_file(id_id)
RETURN
END SUBROUTINE nl_get_input_from_file
SUBROUTINE nl_get_fine_input_stream
(docs) ( id_id , fine_input_stream ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: fine_input_stream
INTEGER id_id
CHARACTER*80 emess
fine_input_stream = model_config_rec%fine_input_stream(id_id)
RETURN
END SUBROUTINE nl_get_fine_input_stream
SUBROUTINE nl_get_input_from_hires
(docs) ( id_id , input_from_hires ) 1,1
USE module_configure
, ONLY : model_config_rec
logical , INTENT(OUT) :: input_from_hires
INTEGER id_id
CHARACTER*80 emess
input_from_hires = model_config_rec%input_from_hires(id_id)
RETURN
END SUBROUTINE nl_get_input_from_hires
SUBROUTINE nl_get_rsmas_data_path
(docs) ( id_id , rsmas_data_path ) 1,1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: rsmas_data_path
INTEGER id_id
CHARACTER*80 emess
rsmas_data_path = trim(model_config_rec%rsmas_data_path)
RETURN
END SUBROUTINE nl_get_rsmas_data_path
SUBROUTINE nl_get_all_ic_times
(docs) ( id_id , all_ic_times ),1
USE module_configure
, ONLY : model_config_rec
logical , INTENT(OUT) :: all_ic_times
INTEGER id_id
CHARACTER*80 emess
all_ic_times = model_config_rec%all_ic_times
RETURN
END SUBROUTINE nl_get_all_ic_times
SUBROUTINE nl_get_history_interval
(docs) ( id_id , history_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_interval
INTEGER id_id
CHARACTER*80 emess
history_interval = model_config_rec%history_interval(id_id)
RETURN
END SUBROUTINE nl_get_history_interval
SUBROUTINE nl_get_frames_per_outfile
(docs) ( id_id , frames_per_outfile ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: frames_per_outfile
INTEGER id_id
CHARACTER*80 emess
frames_per_outfile = model_config_rec%frames_per_outfile(id_id)
RETURN
END SUBROUTINE nl_get_frames_per_outfile
SUBROUTINE nl_get_frames_per_auxhist1
(docs) ( id_id , frames_per_auxhist1 ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: frames_per_auxhist1
INTEGER id_id
CHARACTER*80 emess
frames_per_auxhist1 = model_config_rec%frames_per_auxhist1(id_id)
RETURN
END SUBROUTINE nl_get_frames_per_auxhist1
SUBROUTINE nl_get_frames_per_auxhist2
(docs) ( id_id , frames_per_auxhist2 ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: frames_per_auxhist2
INTEGER id_id
CHARACTER*80 emess
frames_per_auxhist2 = model_config_rec%frames_per_auxhist2(id_id)
RETURN
END SUBROUTINE nl_get_frames_per_auxhist2
SUBROUTINE nl_get_frames_per_auxhist3
(docs) ( id_id , frames_per_auxhist3 ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: frames_per_auxhist3
INTEGER id_id
CHARACTER*80 emess
frames_per_auxhist3 = model_config_rec%frames_per_auxhist3(id_id)
RETURN
END SUBROUTINE nl_get_frames_per_auxhist3
SUBROUTINE nl_get_frames_per_auxhist4
(docs) ( id_id , frames_per_auxhist4 ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: frames_per_auxhist4
INTEGER id_id
CHARACTER*80 emess
frames_per_auxhist4 = model_config_rec%frames_per_auxhist4(id_id)
RETURN
END SUBROUTINE nl_get_frames_per_auxhist4
SUBROUTINE nl_get_frames_per_auxhist5
(docs) ( id_id , frames_per_auxhist5 ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: frames_per_auxhist5
INTEGER id_id
CHARACTER*80 emess
frames_per_auxhist5 = model_config_rec%frames_per_auxhist5(id_id)
RETURN
END SUBROUTINE nl_get_frames_per_auxhist5
SUBROUTINE nl_get_frames_per_auxhist6
(docs) ( id_id , frames_per_auxhist6 ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: frames_per_auxhist6
INTEGER id_id
CHARACTER*80 emess
frames_per_auxhist6 = model_config_rec%frames_per_auxhist6(id_id)
RETURN
END SUBROUTINE nl_get_frames_per_auxhist6
SUBROUTINE nl_get_frames_per_auxhist7
(docs) ( id_id , frames_per_auxhist7 ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: frames_per_auxhist7
INTEGER id_id
CHARACTER*80 emess
frames_per_auxhist7 = model_config_rec%frames_per_auxhist7(id_id)
RETURN
END SUBROUTINE nl_get_frames_per_auxhist7
SUBROUTINE nl_get_frames_per_auxhist8
(docs) ( id_id , frames_per_auxhist8 ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: frames_per_auxhist8
INTEGER id_id
CHARACTER*80 emess
frames_per_auxhist8 = model_config_rec%frames_per_auxhist8(id_id)
RETURN
END SUBROUTINE nl_get_frames_per_auxhist8
SUBROUTINE nl_get_frames_per_auxhist9
(docs) ( id_id , frames_per_auxhist9 ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: frames_per_auxhist9
INTEGER id_id
CHARACTER*80 emess
frames_per_auxhist9 = model_config_rec%frames_per_auxhist9(id_id)
RETURN
END SUBROUTINE nl_get_frames_per_auxhist9
SUBROUTINE nl_get_frames_per_auxhist10
(docs) ( id_id , frames_per_auxhist10 ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: frames_per_auxhist10
INTEGER id_id
CHARACTER*80 emess
frames_per_auxhist10 = model_config_rec%frames_per_auxhist10(id_id)
RETURN
END SUBROUTINE nl_get_frames_per_auxhist10
SUBROUTINE nl_get_frames_per_auxhist11
(docs) ( id_id , frames_per_auxhist11 ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: frames_per_auxhist11
INTEGER id_id
CHARACTER*80 emess
frames_per_auxhist11 = model_config_rec%frames_per_auxhist11(id_id)
RETURN
END SUBROUTINE nl_get_frames_per_auxhist11
SUBROUTINE nl_get_restart
(docs) ( id_id , restart ) 1,1
USE module_configure
, ONLY : model_config_rec
logical , INTENT(OUT) :: restart
INTEGER id_id
CHARACTER*80 emess
restart = model_config_rec%restart
RETURN
END SUBROUTINE nl_get_restart
SUBROUTINE nl_get_restart_interval
(docs) ( id_id , restart_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: restart_interval
INTEGER id_id
CHARACTER*80 emess
restart_interval = model_config_rec%restart_interval
RETURN
END SUBROUTINE nl_get_restart_interval
SUBROUTINE nl_get_io_form_input
(docs) ( id_id , io_form_input ) 5,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: io_form_input
INTEGER id_id
CHARACTER*80 emess
io_form_input = model_config_rec%io_form_input
RETURN
END SUBROUTINE nl_get_io_form_input
SUBROUTINE nl_get_io_form_history
(docs) ( id_id , io_form_history ) 10,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: io_form_history
INTEGER id_id
CHARACTER*80 emess
io_form_history = model_config_rec%io_form_history
RETURN
END SUBROUTINE nl_get_io_form_history
SUBROUTINE nl_get_io_form_restart
(docs) ( id_id , io_form_restart ) 6,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: io_form_restart
INTEGER id_id
CHARACTER*80 emess
io_form_restart = model_config_rec%io_form_restart
RETURN
END SUBROUTINE nl_get_io_form_restart
SUBROUTINE nl_get_io_form_boundary
(docs) ( id_id , io_form_boundary ) 5,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: io_form_boundary
INTEGER id_id
CHARACTER*80 emess
io_form_boundary = model_config_rec%io_form_boundary
RETURN
END SUBROUTINE nl_get_io_form_boundary
SUBROUTINE nl_get_debug_level
(docs) ( id_id , debug_level ) 8,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: debug_level
INTEGER id_id
CHARACTER*80 emess
debug_level = model_config_rec%debug_level
RETURN
END SUBROUTINE nl_get_debug_level
SUBROUTINE nl_get_self_test_domain
(docs) ( id_id , self_test_domain ) 1,1
USE module_configure
, ONLY : model_config_rec
logical , INTENT(OUT) :: self_test_domain
INTEGER id_id
CHARACTER*80 emess
self_test_domain = model_config_rec%self_test_domain
RETURN
END SUBROUTINE nl_get_self_test_domain
SUBROUTINE nl_get_history_outname
(docs) ( id_id , history_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: history_outname
INTEGER id_id
CHARACTER*80 emess
history_outname = trim(model_config_rec%history_outname)
RETURN
END SUBROUTINE nl_get_history_outname
SUBROUTINE nl_get_auxhist1_outname
(docs) ( id_id , auxhist1_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist1_outname
INTEGER id_id
CHARACTER*80 emess
auxhist1_outname = trim(model_config_rec%auxhist1_outname)
RETURN
END SUBROUTINE nl_get_auxhist1_outname
SUBROUTINE nl_get_auxhist2_outname
(docs) ( id_id , auxhist2_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist2_outname
INTEGER id_id
CHARACTER*80 emess
auxhist2_outname = trim(model_config_rec%auxhist2_outname)
RETURN
END SUBROUTINE nl_get_auxhist2_outname
SUBROUTINE nl_get_auxhist3_outname
(docs) ( id_id , auxhist3_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist3_outname
INTEGER id_id
CHARACTER*80 emess
auxhist3_outname = trim(model_config_rec%auxhist3_outname)
RETURN
END SUBROUTINE nl_get_auxhist3_outname
SUBROUTINE nl_get_auxhist4_outname
(docs) ( id_id , auxhist4_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist4_outname
INTEGER id_id
CHARACTER*80 emess
auxhist4_outname = trim(model_config_rec%auxhist4_outname)
RETURN
END SUBROUTINE nl_get_auxhist4_outname
SUBROUTINE nl_get_auxhist5_outname
(docs) ( id_id , auxhist5_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist5_outname
INTEGER id_id
CHARACTER*80 emess
auxhist5_outname = trim(model_config_rec%auxhist5_outname)
RETURN
END SUBROUTINE nl_get_auxhist5_outname
SUBROUTINE nl_get_auxhist6_outname
(docs) ( id_id , auxhist6_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist6_outname
INTEGER id_id
CHARACTER*80 emess
auxhist6_outname = trim(model_config_rec%auxhist6_outname)
RETURN
END SUBROUTINE nl_get_auxhist6_outname
SUBROUTINE nl_get_auxhist7_outname
(docs) ( id_id , auxhist7_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist7_outname
INTEGER id_id
CHARACTER*80 emess
auxhist7_outname = trim(model_config_rec%auxhist7_outname)
RETURN
END SUBROUTINE nl_get_auxhist7_outname
SUBROUTINE nl_get_auxhist8_outname
(docs) ( id_id , auxhist8_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist8_outname
INTEGER id_id
CHARACTER*80 emess
auxhist8_outname = trim(model_config_rec%auxhist8_outname)
RETURN
END SUBROUTINE nl_get_auxhist8_outname
SUBROUTINE nl_get_auxhist9_outname
(docs) ( id_id , auxhist9_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist9_outname
INTEGER id_id
CHARACTER*80 emess
auxhist9_outname = trim(model_config_rec%auxhist9_outname)
RETURN
END SUBROUTINE nl_get_auxhist9_outname
SUBROUTINE nl_get_auxhist10_outname
(docs) ( id_id , auxhist10_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist10_outname
INTEGER id_id
CHARACTER*80 emess
auxhist10_outname = trim(model_config_rec%auxhist10_outname)
RETURN
END SUBROUTINE nl_get_auxhist10_outname
SUBROUTINE nl_get_auxhist11_outname
(docs) ( id_id , auxhist11_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist11_outname
INTEGER id_id
CHARACTER*80 emess
auxhist11_outname = trim(model_config_rec%auxhist11_outname)
RETURN
END SUBROUTINE nl_get_auxhist11_outname
SUBROUTINE nl_get_history_inname
(docs) ( id_id , history_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: history_inname
INTEGER id_id
CHARACTER*80 emess
history_inname = trim(model_config_rec%history_inname)
RETURN
END SUBROUTINE nl_get_history_inname
SUBROUTINE nl_get_auxhist1_inname
(docs) ( id_id , auxhist1_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist1_inname
INTEGER id_id
CHARACTER*80 emess
auxhist1_inname = trim(model_config_rec%auxhist1_inname)
RETURN
END SUBROUTINE nl_get_auxhist1_inname
SUBROUTINE nl_get_auxhist2_inname
(docs) ( id_id , auxhist2_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist2_inname
INTEGER id_id
CHARACTER*80 emess
auxhist2_inname = trim(model_config_rec%auxhist2_inname)
RETURN
END SUBROUTINE nl_get_auxhist2_inname
SUBROUTINE nl_get_auxhist3_inname
(docs) ( id_id , auxhist3_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist3_inname
INTEGER id_id
CHARACTER*80 emess
auxhist3_inname = trim(model_config_rec%auxhist3_inname)
RETURN
END SUBROUTINE nl_get_auxhist3_inname
SUBROUTINE nl_get_auxhist4_inname
(docs) ( id_id , auxhist4_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist4_inname
INTEGER id_id
CHARACTER*80 emess
auxhist4_inname = trim(model_config_rec%auxhist4_inname)
RETURN
END SUBROUTINE nl_get_auxhist4_inname
SUBROUTINE nl_get_auxhist5_inname
(docs) ( id_id , auxhist5_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist5_inname
INTEGER id_id
CHARACTER*80 emess
auxhist5_inname = trim(model_config_rec%auxhist5_inname)
RETURN
END SUBROUTINE nl_get_auxhist5_inname
SUBROUTINE nl_get_auxhist6_inname
(docs) ( id_id , auxhist6_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist6_inname
INTEGER id_id
CHARACTER*80 emess
auxhist6_inname = trim(model_config_rec%auxhist6_inname)
RETURN
END SUBROUTINE nl_get_auxhist6_inname
SUBROUTINE nl_get_auxhist7_inname
(docs) ( id_id , auxhist7_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist7_inname
INTEGER id_id
CHARACTER*80 emess
auxhist7_inname = trim(model_config_rec%auxhist7_inname)
RETURN
END SUBROUTINE nl_get_auxhist7_inname
SUBROUTINE nl_get_auxhist8_inname
(docs) ( id_id , auxhist8_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist8_inname
INTEGER id_id
CHARACTER*80 emess
auxhist8_inname = trim(model_config_rec%auxhist8_inname)
RETURN
END SUBROUTINE nl_get_auxhist8_inname
SUBROUTINE nl_get_auxhist9_inname
(docs) ( id_id , auxhist9_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist9_inname
INTEGER id_id
CHARACTER*80 emess
auxhist9_inname = trim(model_config_rec%auxhist9_inname)
RETURN
END SUBROUTINE nl_get_auxhist9_inname
SUBROUTINE nl_get_auxhist10_inname
(docs) ( id_id , auxhist10_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist10_inname
INTEGER id_id
CHARACTER*80 emess
auxhist10_inname = trim(model_config_rec%auxhist10_inname)
RETURN
END SUBROUTINE nl_get_auxhist10_inname
SUBROUTINE nl_get_auxhist11_inname
(docs) ( id_id , auxhist11_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxhist11_inname
INTEGER id_id
CHARACTER*80 emess
auxhist11_inname = trim(model_config_rec%auxhist11_inname)
RETURN
END SUBROUTINE nl_get_auxhist11_inname
SUBROUTINE nl_get_auxinput1_outname
(docs) ( id_id , auxinput1_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput1_outname
INTEGER id_id
CHARACTER*80 emess
auxinput1_outname = trim(model_config_rec%auxinput1_outname)
RETURN
END SUBROUTINE nl_get_auxinput1_outname
SUBROUTINE nl_get_auxinput2_outname
(docs) ( id_id , auxinput2_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput2_outname
INTEGER id_id
CHARACTER*80 emess
auxinput2_outname = trim(model_config_rec%auxinput2_outname)
RETURN
END SUBROUTINE nl_get_auxinput2_outname
SUBROUTINE nl_get_auxinput3_outname
(docs) ( id_id , auxinput3_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput3_outname
INTEGER id_id
CHARACTER*80 emess
auxinput3_outname = trim(model_config_rec%auxinput3_outname)
RETURN
END SUBROUTINE nl_get_auxinput3_outname
SUBROUTINE nl_get_auxinput4_outname
(docs) ( id_id , auxinput4_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput4_outname
INTEGER id_id
CHARACTER*80 emess
auxinput4_outname = trim(model_config_rec%auxinput4_outname)
RETURN
END SUBROUTINE nl_get_auxinput4_outname
SUBROUTINE nl_get_auxinput5_outname
(docs) ( id_id , auxinput5_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput5_outname
INTEGER id_id
CHARACTER*80 emess
auxinput5_outname = trim(model_config_rec%auxinput5_outname)
RETURN
END SUBROUTINE nl_get_auxinput5_outname
SUBROUTINE nl_get_auxinput6_outname
(docs) ( id_id , auxinput6_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput6_outname
INTEGER id_id
CHARACTER*80 emess
auxinput6_outname = trim(model_config_rec%auxinput6_outname)
RETURN
END SUBROUTINE nl_get_auxinput6_outname
SUBROUTINE nl_get_auxinput7_outname
(docs) ( id_id , auxinput7_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput7_outname
INTEGER id_id
CHARACTER*80 emess
auxinput7_outname = trim(model_config_rec%auxinput7_outname)
RETURN
END SUBROUTINE nl_get_auxinput7_outname
SUBROUTINE nl_get_auxinput8_outname
(docs) ( id_id , auxinput8_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput8_outname
INTEGER id_id
CHARACTER*80 emess
auxinput8_outname = trim(model_config_rec%auxinput8_outname)
RETURN
END SUBROUTINE nl_get_auxinput8_outname
SUBROUTINE nl_get_auxinput9_outname
(docs) ( id_id , auxinput9_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput9_outname
INTEGER id_id
CHARACTER*80 emess
auxinput9_outname = trim(model_config_rec%auxinput9_outname)
RETURN
END SUBROUTINE nl_get_auxinput9_outname
SUBROUTINE nl_get_auxinput10_outname
(docs) ( id_id , auxinput10_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput10_outname
INTEGER id_id
CHARACTER*80 emess
auxinput10_outname = trim(model_config_rec%auxinput10_outname)
RETURN
END SUBROUTINE nl_get_auxinput10_outname
SUBROUTINE nl_get_auxinput11_outname
(docs) ( id_id , auxinput11_outname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput11_outname
INTEGER id_id
CHARACTER*80 emess
auxinput11_outname = trim(model_config_rec%auxinput11_outname)
RETURN
END SUBROUTINE nl_get_auxinput11_outname
SUBROUTINE nl_get_auxinput1_inname
(docs) ( id_id , auxinput1_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput1_inname
INTEGER id_id
CHARACTER*80 emess
auxinput1_inname = trim(model_config_rec%auxinput1_inname)
RETURN
END SUBROUTINE nl_get_auxinput1_inname
SUBROUTINE nl_get_auxinput2_inname
(docs) ( id_id , auxinput2_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput2_inname
INTEGER id_id
CHARACTER*80 emess
auxinput2_inname = trim(model_config_rec%auxinput2_inname)
RETURN
END SUBROUTINE nl_get_auxinput2_inname
SUBROUTINE nl_get_auxinput3_inname
(docs) ( id_id , auxinput3_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput3_inname
INTEGER id_id
CHARACTER*80 emess
auxinput3_inname = trim(model_config_rec%auxinput3_inname)
RETURN
END SUBROUTINE nl_get_auxinput3_inname
SUBROUTINE nl_get_auxinput4_inname
(docs) ( id_id , auxinput4_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput4_inname
INTEGER id_id
CHARACTER*80 emess
auxinput4_inname = trim(model_config_rec%auxinput4_inname)
RETURN
END SUBROUTINE nl_get_auxinput4_inname
SUBROUTINE nl_get_auxinput5_inname
(docs) ( id_id , auxinput5_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput5_inname
INTEGER id_id
CHARACTER*80 emess
auxinput5_inname = trim(model_config_rec%auxinput5_inname)
RETURN
END SUBROUTINE nl_get_auxinput5_inname
SUBROUTINE nl_get_auxinput6_inname
(docs) ( id_id , auxinput6_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput6_inname
INTEGER id_id
CHARACTER*80 emess
auxinput6_inname = trim(model_config_rec%auxinput6_inname)
RETURN
END SUBROUTINE nl_get_auxinput6_inname
SUBROUTINE nl_get_auxinput7_inname
(docs) ( id_id , auxinput7_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput7_inname
INTEGER id_id
CHARACTER*80 emess
auxinput7_inname = trim(model_config_rec%auxinput7_inname)
RETURN
END SUBROUTINE nl_get_auxinput7_inname
SUBROUTINE nl_get_auxinput8_inname
(docs) ( id_id , auxinput8_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput8_inname
INTEGER id_id
CHARACTER*80 emess
auxinput8_inname = trim(model_config_rec%auxinput8_inname)
RETURN
END SUBROUTINE nl_get_auxinput8_inname
SUBROUTINE nl_get_sgfdda_inname
(docs) ( id_id , sgfdda_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: sgfdda_inname
INTEGER id_id
CHARACTER*80 emess
sgfdda_inname = trim(model_config_rec%sgfdda_inname)
RETURN
END SUBROUTINE nl_get_sgfdda_inname
SUBROUTINE nl_get_gfdda_inname
(docs) ( id_id , gfdda_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: gfdda_inname
INTEGER id_id
CHARACTER*80 emess
gfdda_inname = trim(model_config_rec%gfdda_inname)
RETURN
END SUBROUTINE nl_get_gfdda_inname
SUBROUTINE nl_get_auxinput11_inname
(docs) ( id_id , auxinput11_inname ),1
USE module_configure
, ONLY : model_config_rec
character*256 , INTENT(OUT) :: auxinput11_inname
INTEGER id_id
CHARACTER*80 emess
auxinput11_inname = trim(model_config_rec%auxinput11_inname)
RETURN
END SUBROUTINE nl_get_auxinput11_inname
SUBROUTINE nl_get_history_interval_mo
(docs) ( id_id , history_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_interval_mo
INTEGER id_id
CHARACTER*80 emess
history_interval_mo = model_config_rec%history_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_history_interval_mo
SUBROUTINE nl_get_history_interval_d
(docs) ( id_id , history_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_interval_d
INTEGER id_id
CHARACTER*80 emess
history_interval_d = model_config_rec%history_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_history_interval_d
SUBROUTINE nl_get_history_interval_h
(docs) ( id_id , history_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_interval_h
INTEGER id_id
CHARACTER*80 emess
history_interval_h = model_config_rec%history_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_history_interval_h
SUBROUTINE nl_get_history_interval_m
(docs) ( id_id , history_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_interval_m
INTEGER id_id
CHARACTER*80 emess
history_interval_m = model_config_rec%history_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_history_interval_m
SUBROUTINE nl_get_history_interval_s
(docs) ( id_id , history_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_interval_s
INTEGER id_id
CHARACTER*80 emess
history_interval_s = model_config_rec%history_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_history_interval_s
SUBROUTINE nl_get_inputout_interval_mo
(docs) ( id_id , inputout_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_interval_mo
INTEGER id_id
CHARACTER*80 emess
inputout_interval_mo = model_config_rec%inputout_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_inputout_interval_mo
SUBROUTINE nl_get_inputout_interval_d
(docs) ( id_id , inputout_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_interval_d
INTEGER id_id
CHARACTER*80 emess
inputout_interval_d = model_config_rec%inputout_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_inputout_interval_d
SUBROUTINE nl_get_inputout_interval_h
(docs) ( id_id , inputout_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_interval_h
INTEGER id_id
CHARACTER*80 emess
inputout_interval_h = model_config_rec%inputout_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_inputout_interval_h
SUBROUTINE nl_get_inputout_interval_m
(docs) ( id_id , inputout_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_interval_m
INTEGER id_id
CHARACTER*80 emess
inputout_interval_m = model_config_rec%inputout_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_inputout_interval_m
SUBROUTINE nl_get_inputout_interval_s
(docs) ( id_id , inputout_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_interval_s
INTEGER id_id
CHARACTER*80 emess
inputout_interval_s = model_config_rec%inputout_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_inputout_interval_s
SUBROUTINE nl_get_inputout_interval
(docs) ( id_id , inputout_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_interval
INTEGER id_id
CHARACTER*80 emess
inputout_interval = model_config_rec%inputout_interval(id_id)
RETURN
END SUBROUTINE nl_get_inputout_interval
SUBROUTINE nl_get_auxhist1_interval_mo
(docs) ( id_id , auxhist1_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxhist1_interval_mo = model_config_rec%auxhist1_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_interval_mo
SUBROUTINE nl_get_auxhist1_interval_d
(docs) ( id_id , auxhist1_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_interval_d
INTEGER id_id
CHARACTER*80 emess
auxhist1_interval_d = model_config_rec%auxhist1_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_interval_d
SUBROUTINE nl_get_auxhist1_interval_h
(docs) ( id_id , auxhist1_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_interval_h
INTEGER id_id
CHARACTER*80 emess
auxhist1_interval_h = model_config_rec%auxhist1_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_interval_h
SUBROUTINE nl_get_auxhist1_interval_m
(docs) ( id_id , auxhist1_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_interval_m
INTEGER id_id
CHARACTER*80 emess
auxhist1_interval_m = model_config_rec%auxhist1_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_interval_m
SUBROUTINE nl_get_auxhist1_interval_s
(docs) ( id_id , auxhist1_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_interval_s
INTEGER id_id
CHARACTER*80 emess
auxhist1_interval_s = model_config_rec%auxhist1_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_interval_s
SUBROUTINE nl_get_auxhist1_interval
(docs) ( id_id , auxhist1_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_interval
INTEGER id_id
CHARACTER*80 emess
auxhist1_interval = model_config_rec%auxhist1_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_interval
SUBROUTINE nl_get_auxhist2_interval_mo
(docs) ( id_id , auxhist2_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxhist2_interval_mo = model_config_rec%auxhist2_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_interval_mo
SUBROUTINE nl_get_auxhist2_interval_d
(docs) ( id_id , auxhist2_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_interval_d
INTEGER id_id
CHARACTER*80 emess
auxhist2_interval_d = model_config_rec%auxhist2_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_interval_d
SUBROUTINE nl_get_auxhist2_interval_h
(docs) ( id_id , auxhist2_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_interval_h
INTEGER id_id
CHARACTER*80 emess
auxhist2_interval_h = model_config_rec%auxhist2_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_interval_h
SUBROUTINE nl_get_auxhist2_interval_m
(docs) ( id_id , auxhist2_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_interval_m
INTEGER id_id
CHARACTER*80 emess
auxhist2_interval_m = model_config_rec%auxhist2_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_interval_m
SUBROUTINE nl_get_auxhist2_interval_s
(docs) ( id_id , auxhist2_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_interval_s
INTEGER id_id
CHARACTER*80 emess
auxhist2_interval_s = model_config_rec%auxhist2_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_interval_s
SUBROUTINE nl_get_auxhist2_interval
(docs) ( id_id , auxhist2_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_interval
INTEGER id_id
CHARACTER*80 emess
auxhist2_interval = model_config_rec%auxhist2_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_interval
SUBROUTINE nl_get_auxhist3_interval_mo
(docs) ( id_id , auxhist3_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxhist3_interval_mo = model_config_rec%auxhist3_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_interval_mo
SUBROUTINE nl_get_auxhist3_interval_d
(docs) ( id_id , auxhist3_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_interval_d
INTEGER id_id
CHARACTER*80 emess
auxhist3_interval_d = model_config_rec%auxhist3_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_interval_d
SUBROUTINE nl_get_auxhist3_interval_h
(docs) ( id_id , auxhist3_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_interval_h
INTEGER id_id
CHARACTER*80 emess
auxhist3_interval_h = model_config_rec%auxhist3_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_interval_h
SUBROUTINE nl_get_auxhist3_interval_m
(docs) ( id_id , auxhist3_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_interval_m
INTEGER id_id
CHARACTER*80 emess
auxhist3_interval_m = model_config_rec%auxhist3_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_interval_m
SUBROUTINE nl_get_auxhist3_interval_s
(docs) ( id_id , auxhist3_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_interval_s
INTEGER id_id
CHARACTER*80 emess
auxhist3_interval_s = model_config_rec%auxhist3_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_interval_s
SUBROUTINE nl_get_auxhist3_interval
(docs) ( id_id , auxhist3_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_interval
INTEGER id_id
CHARACTER*80 emess
auxhist3_interval = model_config_rec%auxhist3_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_interval
SUBROUTINE nl_get_auxhist4_interval_mo
(docs) ( id_id , auxhist4_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxhist4_interval_mo = model_config_rec%auxhist4_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_interval_mo
SUBROUTINE nl_get_auxhist4_interval_d
(docs) ( id_id , auxhist4_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_interval_d
INTEGER id_id
CHARACTER*80 emess
auxhist4_interval_d = model_config_rec%auxhist4_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_interval_d
SUBROUTINE nl_get_auxhist4_interval_h
(docs) ( id_id , auxhist4_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_interval_h
INTEGER id_id
CHARACTER*80 emess
auxhist4_interval_h = model_config_rec%auxhist4_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_interval_h
SUBROUTINE nl_get_auxhist4_interval_m
(docs) ( id_id , auxhist4_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_interval_m
INTEGER id_id
CHARACTER*80 emess
auxhist4_interval_m = model_config_rec%auxhist4_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_interval_m
SUBROUTINE nl_get_auxhist4_interval_s
(docs) ( id_id , auxhist4_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_interval_s
INTEGER id_id
CHARACTER*80 emess
auxhist4_interval_s = model_config_rec%auxhist4_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_interval_s
SUBROUTINE nl_get_auxhist4_interval
(docs) ( id_id , auxhist4_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_interval
INTEGER id_id
CHARACTER*80 emess
auxhist4_interval = model_config_rec%auxhist4_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_interval
SUBROUTINE nl_get_auxhist5_interval_mo
(docs) ( id_id , auxhist5_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxhist5_interval_mo = model_config_rec%auxhist5_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_interval_mo
SUBROUTINE nl_get_auxhist5_interval_d
(docs) ( id_id , auxhist5_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_interval_d
INTEGER id_id
CHARACTER*80 emess
auxhist5_interval_d = model_config_rec%auxhist5_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_interval_d
SUBROUTINE nl_get_auxhist5_interval_h
(docs) ( id_id , auxhist5_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_interval_h
INTEGER id_id
CHARACTER*80 emess
auxhist5_interval_h = model_config_rec%auxhist5_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_interval_h
SUBROUTINE nl_get_auxhist5_interval_m
(docs) ( id_id , auxhist5_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_interval_m
INTEGER id_id
CHARACTER*80 emess
auxhist5_interval_m = model_config_rec%auxhist5_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_interval_m
SUBROUTINE nl_get_auxhist5_interval_s
(docs) ( id_id , auxhist5_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_interval_s
INTEGER id_id
CHARACTER*80 emess
auxhist5_interval_s = model_config_rec%auxhist5_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_interval_s
SUBROUTINE nl_get_auxhist5_interval
(docs) ( id_id , auxhist5_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_interval
INTEGER id_id
CHARACTER*80 emess
auxhist5_interval = model_config_rec%auxhist5_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_interval
SUBROUTINE nl_get_auxhist6_interval_mo
(docs) ( id_id , auxhist6_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxhist6_interval_mo = model_config_rec%auxhist6_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_interval_mo
SUBROUTINE nl_get_auxhist6_interval_d
(docs) ( id_id , auxhist6_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_interval_d
INTEGER id_id
CHARACTER*80 emess
auxhist6_interval_d = model_config_rec%auxhist6_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_interval_d
SUBROUTINE nl_get_auxhist6_interval_h
(docs) ( id_id , auxhist6_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_interval_h
INTEGER id_id
CHARACTER*80 emess
auxhist6_interval_h = model_config_rec%auxhist6_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_interval_h
SUBROUTINE nl_get_auxhist6_interval_m
(docs) ( id_id , auxhist6_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_interval_m
INTEGER id_id
CHARACTER*80 emess
auxhist6_interval_m = model_config_rec%auxhist6_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_interval_m
SUBROUTINE nl_get_auxhist6_interval_s
(docs) ( id_id , auxhist6_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_interval_s
INTEGER id_id
CHARACTER*80 emess
auxhist6_interval_s = model_config_rec%auxhist6_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_interval_s
SUBROUTINE nl_get_auxhist6_interval
(docs) ( id_id , auxhist6_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_interval
INTEGER id_id
CHARACTER*80 emess
auxhist6_interval = model_config_rec%auxhist6_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_interval
SUBROUTINE nl_get_auxhist7_interval_mo
(docs) ( id_id , auxhist7_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxhist7_interval_mo = model_config_rec%auxhist7_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_interval_mo
SUBROUTINE nl_get_auxhist7_interval_d
(docs) ( id_id , auxhist7_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_interval_d
INTEGER id_id
CHARACTER*80 emess
auxhist7_interval_d = model_config_rec%auxhist7_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_interval_d
SUBROUTINE nl_get_auxhist7_interval_h
(docs) ( id_id , auxhist7_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_interval_h
INTEGER id_id
CHARACTER*80 emess
auxhist7_interval_h = model_config_rec%auxhist7_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_interval_h
SUBROUTINE nl_get_auxhist7_interval_m
(docs) ( id_id , auxhist7_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_interval_m
INTEGER id_id
CHARACTER*80 emess
auxhist7_interval_m = model_config_rec%auxhist7_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_interval_m
SUBROUTINE nl_get_auxhist7_interval_s
(docs) ( id_id , auxhist7_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_interval_s
INTEGER id_id
CHARACTER*80 emess
auxhist7_interval_s = model_config_rec%auxhist7_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_interval_s
SUBROUTINE nl_get_auxhist7_interval
(docs) ( id_id , auxhist7_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_interval
INTEGER id_id
CHARACTER*80 emess
auxhist7_interval = model_config_rec%auxhist7_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_interval
SUBROUTINE nl_get_auxhist8_interval_mo
(docs) ( id_id , auxhist8_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxhist8_interval_mo = model_config_rec%auxhist8_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_interval_mo
SUBROUTINE nl_get_auxhist8_interval_d
(docs) ( id_id , auxhist8_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_interval_d
INTEGER id_id
CHARACTER*80 emess
auxhist8_interval_d = model_config_rec%auxhist8_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_interval_d
SUBROUTINE nl_get_auxhist8_interval_h
(docs) ( id_id , auxhist8_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_interval_h
INTEGER id_id
CHARACTER*80 emess
auxhist8_interval_h = model_config_rec%auxhist8_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_interval_h
SUBROUTINE nl_get_auxhist8_interval_m
(docs) ( id_id , auxhist8_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_interval_m
INTEGER id_id
CHARACTER*80 emess
auxhist8_interval_m = model_config_rec%auxhist8_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_interval_m
SUBROUTINE nl_get_auxhist8_interval_s
(docs) ( id_id , auxhist8_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_interval_s
INTEGER id_id
CHARACTER*80 emess
auxhist8_interval_s = model_config_rec%auxhist8_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_interval_s
SUBROUTINE nl_get_auxhist8_interval
(docs) ( id_id , auxhist8_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_interval
INTEGER id_id
CHARACTER*80 emess
auxhist8_interval = model_config_rec%auxhist8_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_interval
SUBROUTINE nl_get_auxhist9_interval_mo
(docs) ( id_id , auxhist9_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxhist9_interval_mo = model_config_rec%auxhist9_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_interval_mo
SUBROUTINE nl_get_auxhist9_interval_d
(docs) ( id_id , auxhist9_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_interval_d
INTEGER id_id
CHARACTER*80 emess
auxhist9_interval_d = model_config_rec%auxhist9_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_interval_d
SUBROUTINE nl_get_auxhist9_interval_h
(docs) ( id_id , auxhist9_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_interval_h
INTEGER id_id
CHARACTER*80 emess
auxhist9_interval_h = model_config_rec%auxhist9_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_interval_h
SUBROUTINE nl_get_auxhist9_interval_m
(docs) ( id_id , auxhist9_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_interval_m
INTEGER id_id
CHARACTER*80 emess
auxhist9_interval_m = model_config_rec%auxhist9_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_interval_m
SUBROUTINE nl_get_auxhist9_interval_s
(docs) ( id_id , auxhist9_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_interval_s
INTEGER id_id
CHARACTER*80 emess
auxhist9_interval_s = model_config_rec%auxhist9_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_interval_s
SUBROUTINE nl_get_auxhist9_interval
(docs) ( id_id , auxhist9_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_interval
INTEGER id_id
CHARACTER*80 emess
auxhist9_interval = model_config_rec%auxhist9_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_interval
SUBROUTINE nl_get_auxhist10_interval_mo
(docs) ( id_id , auxhist10_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxhist10_interval_mo = model_config_rec%auxhist10_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_interval_mo
SUBROUTINE nl_get_auxhist10_interval_d
(docs) ( id_id , auxhist10_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_interval_d
INTEGER id_id
CHARACTER*80 emess
auxhist10_interval_d = model_config_rec%auxhist10_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_interval_d
SUBROUTINE nl_get_auxhist10_interval_h
(docs) ( id_id , auxhist10_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_interval_h
INTEGER id_id
CHARACTER*80 emess
auxhist10_interval_h = model_config_rec%auxhist10_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_interval_h
SUBROUTINE nl_get_auxhist10_interval_m
(docs) ( id_id , auxhist10_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_interval_m
INTEGER id_id
CHARACTER*80 emess
auxhist10_interval_m = model_config_rec%auxhist10_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_interval_m
SUBROUTINE nl_get_auxhist10_interval_s
(docs) ( id_id , auxhist10_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_interval_s
INTEGER id_id
CHARACTER*80 emess
auxhist10_interval_s = model_config_rec%auxhist10_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_interval_s
SUBROUTINE nl_get_auxhist10_interval
(docs) ( id_id , auxhist10_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_interval
INTEGER id_id
CHARACTER*80 emess
auxhist10_interval = model_config_rec%auxhist10_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_interval
SUBROUTINE nl_get_auxhist11_interval_mo
(docs) ( id_id , auxhist11_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxhist11_interval_mo = model_config_rec%auxhist11_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_interval_mo
SUBROUTINE nl_get_auxhist11_interval_d
(docs) ( id_id , auxhist11_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_interval_d
INTEGER id_id
CHARACTER*80 emess
auxhist11_interval_d = model_config_rec%auxhist11_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_interval_d
SUBROUTINE nl_get_auxhist11_interval_h
(docs) ( id_id , auxhist11_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_interval_h
INTEGER id_id
CHARACTER*80 emess
auxhist11_interval_h = model_config_rec%auxhist11_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_interval_h
SUBROUTINE nl_get_auxhist11_interval_m
(docs) ( id_id , auxhist11_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_interval_m
INTEGER id_id
CHARACTER*80 emess
auxhist11_interval_m = model_config_rec%auxhist11_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_interval_m
SUBROUTINE nl_get_auxhist11_interval_s
(docs) ( id_id , auxhist11_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_interval_s
INTEGER id_id
CHARACTER*80 emess
auxhist11_interval_s = model_config_rec%auxhist11_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_interval_s
SUBROUTINE nl_get_auxhist11_interval
(docs) ( id_id , auxhist11_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_interval
INTEGER id_id
CHARACTER*80 emess
auxhist11_interval = model_config_rec%auxhist11_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_interval
SUBROUTINE nl_get_auxinput1_interval_mo
(docs) ( id_id , auxinput1_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxinput1_interval_mo = model_config_rec%auxinput1_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_interval_mo
SUBROUTINE nl_get_auxinput1_interval_d
(docs) ( id_id , auxinput1_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_interval_d
INTEGER id_id
CHARACTER*80 emess
auxinput1_interval_d = model_config_rec%auxinput1_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_interval_d
SUBROUTINE nl_get_auxinput1_interval_h
(docs) ( id_id , auxinput1_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_interval_h
INTEGER id_id
CHARACTER*80 emess
auxinput1_interval_h = model_config_rec%auxinput1_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_interval_h
SUBROUTINE nl_get_auxinput1_interval_m
(docs) ( id_id , auxinput1_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_interval_m
INTEGER id_id
CHARACTER*80 emess
auxinput1_interval_m = model_config_rec%auxinput1_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_interval_m
SUBROUTINE nl_get_auxinput1_interval_s
(docs) ( id_id , auxinput1_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_interval_s
INTEGER id_id
CHARACTER*80 emess
auxinput1_interval_s = model_config_rec%auxinput1_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_interval_s
SUBROUTINE nl_get_auxinput1_interval
(docs) ( id_id , auxinput1_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_interval
INTEGER id_id
CHARACTER*80 emess
auxinput1_interval = model_config_rec%auxinput1_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_interval
SUBROUTINE nl_get_auxinput2_interval_mo
(docs) ( id_id , auxinput2_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxinput2_interval_mo = model_config_rec%auxinput2_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_interval_mo
SUBROUTINE nl_get_auxinput2_interval_d
(docs) ( id_id , auxinput2_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_interval_d
INTEGER id_id
CHARACTER*80 emess
auxinput2_interval_d = model_config_rec%auxinput2_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_interval_d
SUBROUTINE nl_get_auxinput2_interval_h
(docs) ( id_id , auxinput2_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_interval_h
INTEGER id_id
CHARACTER*80 emess
auxinput2_interval_h = model_config_rec%auxinput2_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_interval_h
SUBROUTINE nl_get_auxinput2_interval_m
(docs) ( id_id , auxinput2_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_interval_m
INTEGER id_id
CHARACTER*80 emess
auxinput2_interval_m = model_config_rec%auxinput2_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_interval_m
SUBROUTINE nl_get_auxinput2_interval_s
(docs) ( id_id , auxinput2_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_interval_s
INTEGER id_id
CHARACTER*80 emess
auxinput2_interval_s = model_config_rec%auxinput2_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_interval_s
SUBROUTINE nl_get_auxinput2_interval
(docs) ( id_id , auxinput2_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_interval
INTEGER id_id
CHARACTER*80 emess
auxinput2_interval = model_config_rec%auxinput2_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_interval
SUBROUTINE nl_get_auxinput3_interval_mo
(docs) ( id_id , auxinput3_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxinput3_interval_mo = model_config_rec%auxinput3_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_interval_mo
SUBROUTINE nl_get_auxinput3_interval_d
(docs) ( id_id , auxinput3_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_interval_d
INTEGER id_id
CHARACTER*80 emess
auxinput3_interval_d = model_config_rec%auxinput3_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_interval_d
SUBROUTINE nl_get_auxinput3_interval_h
(docs) ( id_id , auxinput3_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_interval_h
INTEGER id_id
CHARACTER*80 emess
auxinput3_interval_h = model_config_rec%auxinput3_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_interval_h
SUBROUTINE nl_get_auxinput3_interval_m
(docs) ( id_id , auxinput3_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_interval_m
INTEGER id_id
CHARACTER*80 emess
auxinput3_interval_m = model_config_rec%auxinput3_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_interval_m
SUBROUTINE nl_get_auxinput3_interval_s
(docs) ( id_id , auxinput3_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_interval_s
INTEGER id_id
CHARACTER*80 emess
auxinput3_interval_s = model_config_rec%auxinput3_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_interval_s
SUBROUTINE nl_get_auxinput3_interval
(docs) ( id_id , auxinput3_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_interval
INTEGER id_id
CHARACTER*80 emess
auxinput3_interval = model_config_rec%auxinput3_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_interval
SUBROUTINE nl_get_auxinput4_interval_mo
(docs) ( id_id , auxinput4_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxinput4_interval_mo = model_config_rec%auxinput4_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_interval_mo
SUBROUTINE nl_get_auxinput4_interval_d
(docs) ( id_id , auxinput4_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_interval_d
INTEGER id_id
CHARACTER*80 emess
auxinput4_interval_d = model_config_rec%auxinput4_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_interval_d
SUBROUTINE nl_get_auxinput4_interval_h
(docs) ( id_id , auxinput4_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_interval_h
INTEGER id_id
CHARACTER*80 emess
auxinput4_interval_h = model_config_rec%auxinput4_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_interval_h
SUBROUTINE nl_get_auxinput4_interval_m
(docs) ( id_id , auxinput4_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_interval_m
INTEGER id_id
CHARACTER*80 emess
auxinput4_interval_m = model_config_rec%auxinput4_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_interval_m
SUBROUTINE nl_get_auxinput4_interval_s
(docs) ( id_id , auxinput4_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_interval_s
INTEGER id_id
CHARACTER*80 emess
auxinput4_interval_s = model_config_rec%auxinput4_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_interval_s
SUBROUTINE nl_get_auxinput4_interval
(docs) ( id_id , auxinput4_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_interval
INTEGER id_id
CHARACTER*80 emess
auxinput4_interval = model_config_rec%auxinput4_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_interval
SUBROUTINE nl_get_auxinput5_interval_mo
(docs) ( id_id , auxinput5_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxinput5_interval_mo = model_config_rec%auxinput5_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_interval_mo
SUBROUTINE nl_get_auxinput5_interval_d
(docs) ( id_id , auxinput5_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_interval_d
INTEGER id_id
CHARACTER*80 emess
auxinput5_interval_d = model_config_rec%auxinput5_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_interval_d
SUBROUTINE nl_get_auxinput5_interval_h
(docs) ( id_id , auxinput5_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_interval_h
INTEGER id_id
CHARACTER*80 emess
auxinput5_interval_h = model_config_rec%auxinput5_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_interval_h
SUBROUTINE nl_get_auxinput5_interval_m
(docs) ( id_id , auxinput5_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_interval_m
INTEGER id_id
CHARACTER*80 emess
auxinput5_interval_m = model_config_rec%auxinput5_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_interval_m
SUBROUTINE nl_get_auxinput5_interval_s
(docs) ( id_id , auxinput5_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_interval_s
INTEGER id_id
CHARACTER*80 emess
auxinput5_interval_s = model_config_rec%auxinput5_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_interval_s
SUBROUTINE nl_get_auxinput5_interval
(docs) ( id_id , auxinput5_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_interval
INTEGER id_id
CHARACTER*80 emess
auxinput5_interval = model_config_rec%auxinput5_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_interval
SUBROUTINE nl_get_auxinput6_interval_mo
(docs) ( id_id , auxinput6_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxinput6_interval_mo = model_config_rec%auxinput6_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_interval_mo
SUBROUTINE nl_get_auxinput6_interval_d
(docs) ( id_id , auxinput6_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_interval_d
INTEGER id_id
CHARACTER*80 emess
auxinput6_interval_d = model_config_rec%auxinput6_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_interval_d
SUBROUTINE nl_get_auxinput6_interval_h
(docs) ( id_id , auxinput6_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_interval_h
INTEGER id_id
CHARACTER*80 emess
auxinput6_interval_h = model_config_rec%auxinput6_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_interval_h
SUBROUTINE nl_get_auxinput6_interval_m
(docs) ( id_id , auxinput6_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_interval_m
INTEGER id_id
CHARACTER*80 emess
auxinput6_interval_m = model_config_rec%auxinput6_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_interval_m
SUBROUTINE nl_get_auxinput6_interval_s
(docs) ( id_id , auxinput6_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_interval_s
INTEGER id_id
CHARACTER*80 emess
auxinput6_interval_s = model_config_rec%auxinput6_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_interval_s
SUBROUTINE nl_get_auxinput6_interval
(docs) ( id_id , auxinput6_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_interval
INTEGER id_id
CHARACTER*80 emess
auxinput6_interval = model_config_rec%auxinput6_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_interval
SUBROUTINE nl_get_auxinput7_interval_mo
(docs) ( id_id , auxinput7_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput7_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxinput7_interval_mo = model_config_rec%auxinput7_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput7_interval_mo
SUBROUTINE nl_get_auxinput7_interval_d
(docs) ( id_id , auxinput7_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput7_interval_d
INTEGER id_id
CHARACTER*80 emess
auxinput7_interval_d = model_config_rec%auxinput7_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput7_interval_d
SUBROUTINE nl_get_auxinput7_interval_h
(docs) ( id_id , auxinput7_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput7_interval_h
INTEGER id_id
CHARACTER*80 emess
auxinput7_interval_h = model_config_rec%auxinput7_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput7_interval_h
SUBROUTINE nl_get_auxinput7_interval_m
(docs) ( id_id , auxinput7_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput7_interval_m
INTEGER id_id
CHARACTER*80 emess
auxinput7_interval_m = model_config_rec%auxinput7_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput7_interval_m
SUBROUTINE nl_get_auxinput7_interval_s
(docs) ( id_id , auxinput7_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput7_interval_s
INTEGER id_id
CHARACTER*80 emess
auxinput7_interval_s = model_config_rec%auxinput7_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput7_interval_s
SUBROUTINE nl_get_auxinput7_interval
(docs) ( id_id , auxinput7_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput7_interval
INTEGER id_id
CHARACTER*80 emess
auxinput7_interval = model_config_rec%auxinput7_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxinput7_interval
SUBROUTINE nl_get_auxinput8_interval_mo
(docs) ( id_id , auxinput8_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput8_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxinput8_interval_mo = model_config_rec%auxinput8_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput8_interval_mo
SUBROUTINE nl_get_auxinput8_interval_d
(docs) ( id_id , auxinput8_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput8_interval_d
INTEGER id_id
CHARACTER*80 emess
auxinput8_interval_d = model_config_rec%auxinput8_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput8_interval_d
SUBROUTINE nl_get_auxinput8_interval_h
(docs) ( id_id , auxinput8_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput8_interval_h
INTEGER id_id
CHARACTER*80 emess
auxinput8_interval_h = model_config_rec%auxinput8_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput8_interval_h
SUBROUTINE nl_get_auxinput8_interval_m
(docs) ( id_id , auxinput8_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput8_interval_m
INTEGER id_id
CHARACTER*80 emess
auxinput8_interval_m = model_config_rec%auxinput8_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput8_interval_m
SUBROUTINE nl_get_auxinput8_interval_s
(docs) ( id_id , auxinput8_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput8_interval_s
INTEGER id_id
CHARACTER*80 emess
auxinput8_interval_s = model_config_rec%auxinput8_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput8_interval_s
SUBROUTINE nl_get_auxinput8_interval
(docs) ( id_id , auxinput8_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput8_interval
INTEGER id_id
CHARACTER*80 emess
auxinput8_interval = model_config_rec%auxinput8_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxinput8_interval
SUBROUTINE nl_get_sgfdda_interval_mo
(docs) ( id_id , sgfdda_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: sgfdda_interval_mo
INTEGER id_id
CHARACTER*80 emess
sgfdda_interval_mo = model_config_rec%sgfdda_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_sgfdda_interval_mo
SUBROUTINE nl_get_sgfdda_interval_d
(docs) ( id_id , sgfdda_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: sgfdda_interval_d
INTEGER id_id
CHARACTER*80 emess
sgfdda_interval_d = model_config_rec%sgfdda_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_sgfdda_interval_d
SUBROUTINE nl_get_sgfdda_interval_h
(docs) ( id_id , sgfdda_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: sgfdda_interval_h
INTEGER id_id
CHARACTER*80 emess
sgfdda_interval_h = model_config_rec%sgfdda_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_sgfdda_interval_h
SUBROUTINE nl_get_sgfdda_interval_m
(docs) ( id_id , sgfdda_interval_m ) 2,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: sgfdda_interval_m
INTEGER id_id
CHARACTER*80 emess
sgfdda_interval_m = model_config_rec%sgfdda_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_sgfdda_interval_m
SUBROUTINE nl_get_sgfdda_interval_s
(docs) ( id_id , sgfdda_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: sgfdda_interval_s
INTEGER id_id
CHARACTER*80 emess
sgfdda_interval_s = model_config_rec%sgfdda_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_sgfdda_interval_s
SUBROUTINE nl_get_sgfdda_interval
(docs) ( id_id , sgfdda_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: sgfdda_interval
INTEGER id_id
CHARACTER*80 emess
sgfdda_interval = model_config_rec%sgfdda_interval(id_id)
RETURN
END SUBROUTINE nl_get_sgfdda_interval
SUBROUTINE nl_get_gfdda_interval_mo
(docs) ( id_id , gfdda_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: gfdda_interval_mo
INTEGER id_id
CHARACTER*80 emess
gfdda_interval_mo = model_config_rec%gfdda_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_gfdda_interval_mo
SUBROUTINE nl_get_gfdda_interval_d
(docs) ( id_id , gfdda_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: gfdda_interval_d
INTEGER id_id
CHARACTER*80 emess
gfdda_interval_d = model_config_rec%gfdda_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_gfdda_interval_d
SUBROUTINE nl_get_gfdda_interval_h
(docs) ( id_id , gfdda_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: gfdda_interval_h
INTEGER id_id
CHARACTER*80 emess
gfdda_interval_h = model_config_rec%gfdda_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_gfdda_interval_h
SUBROUTINE nl_get_gfdda_interval_m
(docs) ( id_id , gfdda_interval_m ) 2,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: gfdda_interval_m
INTEGER id_id
CHARACTER*80 emess
gfdda_interval_m = model_config_rec%gfdda_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_gfdda_interval_m
SUBROUTINE nl_get_gfdda_interval_s
(docs) ( id_id , gfdda_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: gfdda_interval_s
INTEGER id_id
CHARACTER*80 emess
gfdda_interval_s = model_config_rec%gfdda_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_gfdda_interval_s
SUBROUTINE nl_get_gfdda_interval
(docs) ( id_id , gfdda_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: gfdda_interval
INTEGER id_id
CHARACTER*80 emess
gfdda_interval = model_config_rec%gfdda_interval(id_id)
RETURN
END SUBROUTINE nl_get_gfdda_interval
SUBROUTINE nl_get_auxinput11_interval_mo
(docs) ( id_id , auxinput11_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput11_interval_mo
INTEGER id_id
CHARACTER*80 emess
auxinput11_interval_mo = model_config_rec%auxinput11_interval_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput11_interval_mo
SUBROUTINE nl_get_auxinput11_interval_d
(docs) ( id_id , auxinput11_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput11_interval_d
INTEGER id_id
CHARACTER*80 emess
auxinput11_interval_d = model_config_rec%auxinput11_interval_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput11_interval_d
SUBROUTINE nl_get_auxinput11_interval_h
(docs) ( id_id , auxinput11_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput11_interval_h
INTEGER id_id
CHARACTER*80 emess
auxinput11_interval_h = model_config_rec%auxinput11_interval_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput11_interval_h
SUBROUTINE nl_get_auxinput11_interval_m
(docs) ( id_id , auxinput11_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput11_interval_m
INTEGER id_id
CHARACTER*80 emess
auxinput11_interval_m = model_config_rec%auxinput11_interval_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput11_interval_m
SUBROUTINE nl_get_auxinput11_interval_s
(docs) ( id_id , auxinput11_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput11_interval_s
INTEGER id_id
CHARACTER*80 emess
auxinput11_interval_s = model_config_rec%auxinput11_interval_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput11_interval_s
SUBROUTINE nl_get_auxinput11_interval
(docs) ( id_id , auxinput11_interval ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput11_interval
INTEGER id_id
CHARACTER*80 emess
auxinput11_interval = model_config_rec%auxinput11_interval(id_id)
RETURN
END SUBROUTINE nl_get_auxinput11_interval
SUBROUTINE nl_get_restart_interval_mo
(docs) ( id_id , restart_interval_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: restart_interval_mo
INTEGER id_id
CHARACTER*80 emess
restart_interval_mo = model_config_rec%restart_interval_mo
RETURN
END SUBROUTINE nl_get_restart_interval_mo
SUBROUTINE nl_get_restart_interval_d
(docs) ( id_id , restart_interval_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: restart_interval_d
INTEGER id_id
CHARACTER*80 emess
restart_interval_d = model_config_rec%restart_interval_d
RETURN
END SUBROUTINE nl_get_restart_interval_d
SUBROUTINE nl_get_restart_interval_h
(docs) ( id_id , restart_interval_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: restart_interval_h
INTEGER id_id
CHARACTER*80 emess
restart_interval_h = model_config_rec%restart_interval_h
RETURN
END SUBROUTINE nl_get_restart_interval_h
SUBROUTINE nl_get_restart_interval_m
(docs) ( id_id , restart_interval_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: restart_interval_m
INTEGER id_id
CHARACTER*80 emess
restart_interval_m = model_config_rec%restart_interval_m
RETURN
END SUBROUTINE nl_get_restart_interval_m
SUBROUTINE nl_get_restart_interval_s
(docs) ( id_id , restart_interval_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: restart_interval_s
INTEGER id_id
CHARACTER*80 emess
restart_interval_s = model_config_rec%restart_interval_s
RETURN
END SUBROUTINE nl_get_restart_interval_s
SUBROUTINE nl_get_history_begin_y
(docs) ( id_id , history_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_begin_y
INTEGER id_id
CHARACTER*80 emess
history_begin_y = model_config_rec%history_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_history_begin_y
SUBROUTINE nl_get_history_begin_mo
(docs) ( id_id , history_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_begin_mo
INTEGER id_id
CHARACTER*80 emess
history_begin_mo = model_config_rec%history_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_history_begin_mo
SUBROUTINE nl_get_history_begin_d
(docs) ( id_id , history_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_begin_d
INTEGER id_id
CHARACTER*80 emess
history_begin_d = model_config_rec%history_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_history_begin_d
SUBROUTINE nl_get_history_begin_h
(docs) ( id_id , history_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_begin_h
INTEGER id_id
CHARACTER*80 emess
history_begin_h = model_config_rec%history_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_history_begin_h
SUBROUTINE nl_get_history_begin_m
(docs) ( id_id , history_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_begin_m
INTEGER id_id
CHARACTER*80 emess
history_begin_m = model_config_rec%history_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_history_begin_m
SUBROUTINE nl_get_history_begin_s
(docs) ( id_id , history_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_begin_s
INTEGER id_id
CHARACTER*80 emess
history_begin_s = model_config_rec%history_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_history_begin_s
SUBROUTINE nl_get_inputout_begin_y
(docs) ( id_id , inputout_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_begin_y
INTEGER id_id
CHARACTER*80 emess
inputout_begin_y = model_config_rec%inputout_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_inputout_begin_y
SUBROUTINE nl_get_inputout_begin_mo
(docs) ( id_id , inputout_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_begin_mo
INTEGER id_id
CHARACTER*80 emess
inputout_begin_mo = model_config_rec%inputout_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_inputout_begin_mo
SUBROUTINE nl_get_inputout_begin_d
(docs) ( id_id , inputout_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_begin_d
INTEGER id_id
CHARACTER*80 emess
inputout_begin_d = model_config_rec%inputout_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_inputout_begin_d
SUBROUTINE nl_get_inputout_begin_h
(docs) ( id_id , inputout_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_begin_h
INTEGER id_id
CHARACTER*80 emess
inputout_begin_h = model_config_rec%inputout_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_inputout_begin_h
SUBROUTINE nl_get_inputout_begin_m
(docs) ( id_id , inputout_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_begin_m
INTEGER id_id
CHARACTER*80 emess
inputout_begin_m = model_config_rec%inputout_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_inputout_begin_m
SUBROUTINE nl_get_inputout_begin_s
(docs) ( id_id , inputout_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_begin_s
INTEGER id_id
CHARACTER*80 emess
inputout_begin_s = model_config_rec%inputout_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_inputout_begin_s
SUBROUTINE nl_get_auxhist1_begin_y
(docs) ( id_id , auxhist1_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_begin_y
INTEGER id_id
CHARACTER*80 emess
auxhist1_begin_y = model_config_rec%auxhist1_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_begin_y
SUBROUTINE nl_get_auxhist1_begin_mo
(docs) ( id_id , auxhist1_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxhist1_begin_mo = model_config_rec%auxhist1_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_begin_mo
SUBROUTINE nl_get_auxhist1_begin_d
(docs) ( id_id , auxhist1_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_begin_d
INTEGER id_id
CHARACTER*80 emess
auxhist1_begin_d = model_config_rec%auxhist1_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_begin_d
SUBROUTINE nl_get_auxhist1_begin_h
(docs) ( id_id , auxhist1_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_begin_h
INTEGER id_id
CHARACTER*80 emess
auxhist1_begin_h = model_config_rec%auxhist1_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_begin_h
SUBROUTINE nl_get_auxhist1_begin_m
(docs) ( id_id , auxhist1_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_begin_m
INTEGER id_id
CHARACTER*80 emess
auxhist1_begin_m = model_config_rec%auxhist1_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_begin_m
SUBROUTINE nl_get_auxhist1_begin_s
(docs) ( id_id , auxhist1_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_begin_s
INTEGER id_id
CHARACTER*80 emess
auxhist1_begin_s = model_config_rec%auxhist1_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_begin_s
SUBROUTINE nl_get_auxhist2_begin_y
(docs) ( id_id , auxhist2_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_begin_y
INTEGER id_id
CHARACTER*80 emess
auxhist2_begin_y = model_config_rec%auxhist2_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_begin_y
SUBROUTINE nl_get_auxhist2_begin_mo
(docs) ( id_id , auxhist2_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxhist2_begin_mo = model_config_rec%auxhist2_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_begin_mo
SUBROUTINE nl_get_auxhist2_begin_d
(docs) ( id_id , auxhist2_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_begin_d
INTEGER id_id
CHARACTER*80 emess
auxhist2_begin_d = model_config_rec%auxhist2_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_begin_d
SUBROUTINE nl_get_auxhist2_begin_h
(docs) ( id_id , auxhist2_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_begin_h
INTEGER id_id
CHARACTER*80 emess
auxhist2_begin_h = model_config_rec%auxhist2_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_begin_h
SUBROUTINE nl_get_auxhist2_begin_m
(docs) ( id_id , auxhist2_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_begin_m
INTEGER id_id
CHARACTER*80 emess
auxhist2_begin_m = model_config_rec%auxhist2_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_begin_m
SUBROUTINE nl_get_auxhist2_begin_s
(docs) ( id_id , auxhist2_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_begin_s
INTEGER id_id
CHARACTER*80 emess
auxhist2_begin_s = model_config_rec%auxhist2_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_begin_s
SUBROUTINE nl_get_auxhist3_begin_y
(docs) ( id_id , auxhist3_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_begin_y
INTEGER id_id
CHARACTER*80 emess
auxhist3_begin_y = model_config_rec%auxhist3_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_begin_y
SUBROUTINE nl_get_auxhist3_begin_mo
(docs) ( id_id , auxhist3_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxhist3_begin_mo = model_config_rec%auxhist3_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_begin_mo
SUBROUTINE nl_get_auxhist3_begin_d
(docs) ( id_id , auxhist3_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_begin_d
INTEGER id_id
CHARACTER*80 emess
auxhist3_begin_d = model_config_rec%auxhist3_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_begin_d
SUBROUTINE nl_get_auxhist3_begin_h
(docs) ( id_id , auxhist3_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_begin_h
INTEGER id_id
CHARACTER*80 emess
auxhist3_begin_h = model_config_rec%auxhist3_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_begin_h
SUBROUTINE nl_get_auxhist3_begin_m
(docs) ( id_id , auxhist3_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_begin_m
INTEGER id_id
CHARACTER*80 emess
auxhist3_begin_m = model_config_rec%auxhist3_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_begin_m
SUBROUTINE nl_get_auxhist3_begin_s
(docs) ( id_id , auxhist3_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_begin_s
INTEGER id_id
CHARACTER*80 emess
auxhist3_begin_s = model_config_rec%auxhist3_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_begin_s
SUBROUTINE nl_get_auxhist4_begin_y
(docs) ( id_id , auxhist4_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_begin_y
INTEGER id_id
CHARACTER*80 emess
auxhist4_begin_y = model_config_rec%auxhist4_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_begin_y
SUBROUTINE nl_get_auxhist4_begin_mo
(docs) ( id_id , auxhist4_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxhist4_begin_mo = model_config_rec%auxhist4_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_begin_mo
SUBROUTINE nl_get_auxhist4_begin_d
(docs) ( id_id , auxhist4_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_begin_d
INTEGER id_id
CHARACTER*80 emess
auxhist4_begin_d = model_config_rec%auxhist4_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_begin_d
SUBROUTINE nl_get_auxhist4_begin_h
(docs) ( id_id , auxhist4_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_begin_h
INTEGER id_id
CHARACTER*80 emess
auxhist4_begin_h = model_config_rec%auxhist4_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_begin_h
SUBROUTINE nl_get_auxhist4_begin_m
(docs) ( id_id , auxhist4_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_begin_m
INTEGER id_id
CHARACTER*80 emess
auxhist4_begin_m = model_config_rec%auxhist4_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_begin_m
SUBROUTINE nl_get_auxhist4_begin_s
(docs) ( id_id , auxhist4_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_begin_s
INTEGER id_id
CHARACTER*80 emess
auxhist4_begin_s = model_config_rec%auxhist4_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_begin_s
SUBROUTINE nl_get_auxhist5_begin_y
(docs) ( id_id , auxhist5_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_begin_y
INTEGER id_id
CHARACTER*80 emess
auxhist5_begin_y = model_config_rec%auxhist5_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_begin_y
SUBROUTINE nl_get_auxhist5_begin_mo
(docs) ( id_id , auxhist5_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxhist5_begin_mo = model_config_rec%auxhist5_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_begin_mo
SUBROUTINE nl_get_auxhist5_begin_d
(docs) ( id_id , auxhist5_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_begin_d
INTEGER id_id
CHARACTER*80 emess
auxhist5_begin_d = model_config_rec%auxhist5_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_begin_d
SUBROUTINE nl_get_auxhist5_begin_h
(docs) ( id_id , auxhist5_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_begin_h
INTEGER id_id
CHARACTER*80 emess
auxhist5_begin_h = model_config_rec%auxhist5_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_begin_h
SUBROUTINE nl_get_auxhist5_begin_m
(docs) ( id_id , auxhist5_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_begin_m
INTEGER id_id
CHARACTER*80 emess
auxhist5_begin_m = model_config_rec%auxhist5_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_begin_m
SUBROUTINE nl_get_auxhist5_begin_s
(docs) ( id_id , auxhist5_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_begin_s
INTEGER id_id
CHARACTER*80 emess
auxhist5_begin_s = model_config_rec%auxhist5_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_begin_s
SUBROUTINE nl_get_auxhist6_begin_y
(docs) ( id_id , auxhist6_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_begin_y
INTEGER id_id
CHARACTER*80 emess
auxhist6_begin_y = model_config_rec%auxhist6_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_begin_y
SUBROUTINE nl_get_auxhist6_begin_mo
(docs) ( id_id , auxhist6_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxhist6_begin_mo = model_config_rec%auxhist6_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_begin_mo
SUBROUTINE nl_get_auxhist6_begin_d
(docs) ( id_id , auxhist6_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_begin_d
INTEGER id_id
CHARACTER*80 emess
auxhist6_begin_d = model_config_rec%auxhist6_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_begin_d
SUBROUTINE nl_get_auxhist6_begin_h
(docs) ( id_id , auxhist6_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_begin_h
INTEGER id_id
CHARACTER*80 emess
auxhist6_begin_h = model_config_rec%auxhist6_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_begin_h
SUBROUTINE nl_get_auxhist6_begin_m
(docs) ( id_id , auxhist6_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_begin_m
INTEGER id_id
CHARACTER*80 emess
auxhist6_begin_m = model_config_rec%auxhist6_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_begin_m
SUBROUTINE nl_get_auxhist6_begin_s
(docs) ( id_id , auxhist6_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_begin_s
INTEGER id_id
CHARACTER*80 emess
auxhist6_begin_s = model_config_rec%auxhist6_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_begin_s
SUBROUTINE nl_get_auxhist7_begin_y
(docs) ( id_id , auxhist7_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_begin_y
INTEGER id_id
CHARACTER*80 emess
auxhist7_begin_y = model_config_rec%auxhist7_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_begin_y
SUBROUTINE nl_get_auxhist7_begin_mo
(docs) ( id_id , auxhist7_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxhist7_begin_mo = model_config_rec%auxhist7_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_begin_mo
SUBROUTINE nl_get_auxhist7_begin_d
(docs) ( id_id , auxhist7_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_begin_d
INTEGER id_id
CHARACTER*80 emess
auxhist7_begin_d = model_config_rec%auxhist7_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_begin_d
SUBROUTINE nl_get_auxhist7_begin_h
(docs) ( id_id , auxhist7_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_begin_h
INTEGER id_id
CHARACTER*80 emess
auxhist7_begin_h = model_config_rec%auxhist7_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_begin_h
SUBROUTINE nl_get_auxhist7_begin_m
(docs) ( id_id , auxhist7_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_begin_m
INTEGER id_id
CHARACTER*80 emess
auxhist7_begin_m = model_config_rec%auxhist7_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_begin_m
SUBROUTINE nl_get_auxhist7_begin_s
(docs) ( id_id , auxhist7_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_begin_s
INTEGER id_id
CHARACTER*80 emess
auxhist7_begin_s = model_config_rec%auxhist7_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_begin_s
SUBROUTINE nl_get_auxhist8_begin_y
(docs) ( id_id , auxhist8_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_begin_y
INTEGER id_id
CHARACTER*80 emess
auxhist8_begin_y = model_config_rec%auxhist8_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_begin_y
SUBROUTINE nl_get_auxhist8_begin_mo
(docs) ( id_id , auxhist8_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxhist8_begin_mo = model_config_rec%auxhist8_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_begin_mo
SUBROUTINE nl_get_auxhist8_begin_d
(docs) ( id_id , auxhist8_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_begin_d
INTEGER id_id
CHARACTER*80 emess
auxhist8_begin_d = model_config_rec%auxhist8_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_begin_d
SUBROUTINE nl_get_auxhist8_begin_h
(docs) ( id_id , auxhist8_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_begin_h
INTEGER id_id
CHARACTER*80 emess
auxhist8_begin_h = model_config_rec%auxhist8_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_begin_h
SUBROUTINE nl_get_auxhist8_begin_m
(docs) ( id_id , auxhist8_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_begin_m
INTEGER id_id
CHARACTER*80 emess
auxhist8_begin_m = model_config_rec%auxhist8_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_begin_m
SUBROUTINE nl_get_auxhist8_begin_s
(docs) ( id_id , auxhist8_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_begin_s
INTEGER id_id
CHARACTER*80 emess
auxhist8_begin_s = model_config_rec%auxhist8_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_begin_s
SUBROUTINE nl_get_auxhist9_begin_y
(docs) ( id_id , auxhist9_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_begin_y
INTEGER id_id
CHARACTER*80 emess
auxhist9_begin_y = model_config_rec%auxhist9_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_begin_y
SUBROUTINE nl_get_auxhist9_begin_mo
(docs) ( id_id , auxhist9_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxhist9_begin_mo = model_config_rec%auxhist9_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_begin_mo
SUBROUTINE nl_get_auxhist9_begin_d
(docs) ( id_id , auxhist9_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_begin_d
INTEGER id_id
CHARACTER*80 emess
auxhist9_begin_d = model_config_rec%auxhist9_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_begin_d
SUBROUTINE nl_get_auxhist9_begin_h
(docs) ( id_id , auxhist9_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_begin_h
INTEGER id_id
CHARACTER*80 emess
auxhist9_begin_h = model_config_rec%auxhist9_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_begin_h
SUBROUTINE nl_get_auxhist9_begin_m
(docs) ( id_id , auxhist9_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_begin_m
INTEGER id_id
CHARACTER*80 emess
auxhist9_begin_m = model_config_rec%auxhist9_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_begin_m
SUBROUTINE nl_get_auxhist9_begin_s
(docs) ( id_id , auxhist9_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_begin_s
INTEGER id_id
CHARACTER*80 emess
auxhist9_begin_s = model_config_rec%auxhist9_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_begin_s
SUBROUTINE nl_get_auxhist10_begin_y
(docs) ( id_id , auxhist10_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_begin_y
INTEGER id_id
CHARACTER*80 emess
auxhist10_begin_y = model_config_rec%auxhist10_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_begin_y
SUBROUTINE nl_get_auxhist10_begin_mo
(docs) ( id_id , auxhist10_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxhist10_begin_mo = model_config_rec%auxhist10_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_begin_mo
SUBROUTINE nl_get_auxhist10_begin_d
(docs) ( id_id , auxhist10_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_begin_d
INTEGER id_id
CHARACTER*80 emess
auxhist10_begin_d = model_config_rec%auxhist10_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_begin_d
SUBROUTINE nl_get_auxhist10_begin_h
(docs) ( id_id , auxhist10_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_begin_h
INTEGER id_id
CHARACTER*80 emess
auxhist10_begin_h = model_config_rec%auxhist10_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_begin_h
SUBROUTINE nl_get_auxhist10_begin_m
(docs) ( id_id , auxhist10_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_begin_m
INTEGER id_id
CHARACTER*80 emess
auxhist10_begin_m = model_config_rec%auxhist10_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_begin_m
SUBROUTINE nl_get_auxhist10_begin_s
(docs) ( id_id , auxhist10_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_begin_s
INTEGER id_id
CHARACTER*80 emess
auxhist10_begin_s = model_config_rec%auxhist10_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_begin_s
SUBROUTINE nl_get_auxhist11_begin_y
(docs) ( id_id , auxhist11_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_begin_y
INTEGER id_id
CHARACTER*80 emess
auxhist11_begin_y = model_config_rec%auxhist11_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_begin_y
SUBROUTINE nl_get_auxhist11_begin_mo
(docs) ( id_id , auxhist11_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxhist11_begin_mo = model_config_rec%auxhist11_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_begin_mo
SUBROUTINE nl_get_auxhist11_begin_d
(docs) ( id_id , auxhist11_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_begin_d
INTEGER id_id
CHARACTER*80 emess
auxhist11_begin_d = model_config_rec%auxhist11_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_begin_d
SUBROUTINE nl_get_auxhist11_begin_h
(docs) ( id_id , auxhist11_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_begin_h
INTEGER id_id
CHARACTER*80 emess
auxhist11_begin_h = model_config_rec%auxhist11_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_begin_h
SUBROUTINE nl_get_auxhist11_begin_m
(docs) ( id_id , auxhist11_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_begin_m
INTEGER id_id
CHARACTER*80 emess
auxhist11_begin_m = model_config_rec%auxhist11_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_begin_m
SUBROUTINE nl_get_auxhist11_begin_s
(docs) ( id_id , auxhist11_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_begin_s
INTEGER id_id
CHARACTER*80 emess
auxhist11_begin_s = model_config_rec%auxhist11_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_begin_s
SUBROUTINE nl_get_auxinput1_begin_y
(docs) ( id_id , auxinput1_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_begin_y
INTEGER id_id
CHARACTER*80 emess
auxinput1_begin_y = model_config_rec%auxinput1_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_begin_y
SUBROUTINE nl_get_auxinput1_begin_mo
(docs) ( id_id , auxinput1_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxinput1_begin_mo = model_config_rec%auxinput1_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_begin_mo
SUBROUTINE nl_get_auxinput1_begin_d
(docs) ( id_id , auxinput1_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_begin_d
INTEGER id_id
CHARACTER*80 emess
auxinput1_begin_d = model_config_rec%auxinput1_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_begin_d
SUBROUTINE nl_get_auxinput1_begin_h
(docs) ( id_id , auxinput1_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_begin_h
INTEGER id_id
CHARACTER*80 emess
auxinput1_begin_h = model_config_rec%auxinput1_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_begin_h
SUBROUTINE nl_get_auxinput1_begin_m
(docs) ( id_id , auxinput1_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_begin_m
INTEGER id_id
CHARACTER*80 emess
auxinput1_begin_m = model_config_rec%auxinput1_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_begin_m
SUBROUTINE nl_get_auxinput1_begin_s
(docs) ( id_id , auxinput1_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_begin_s
INTEGER id_id
CHARACTER*80 emess
auxinput1_begin_s = model_config_rec%auxinput1_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_begin_s
SUBROUTINE nl_get_auxinput2_begin_y
(docs) ( id_id , auxinput2_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_begin_y
INTEGER id_id
CHARACTER*80 emess
auxinput2_begin_y = model_config_rec%auxinput2_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_begin_y
SUBROUTINE nl_get_auxinput2_begin_mo
(docs) ( id_id , auxinput2_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxinput2_begin_mo = model_config_rec%auxinput2_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_begin_mo
SUBROUTINE nl_get_auxinput2_begin_d
(docs) ( id_id , auxinput2_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_begin_d
INTEGER id_id
CHARACTER*80 emess
auxinput2_begin_d = model_config_rec%auxinput2_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_begin_d
SUBROUTINE nl_get_auxinput2_begin_h
(docs) ( id_id , auxinput2_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_begin_h
INTEGER id_id
CHARACTER*80 emess
auxinput2_begin_h = model_config_rec%auxinput2_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_begin_h
SUBROUTINE nl_get_auxinput2_begin_m
(docs) ( id_id , auxinput2_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_begin_m
INTEGER id_id
CHARACTER*80 emess
auxinput2_begin_m = model_config_rec%auxinput2_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_begin_m
SUBROUTINE nl_get_auxinput2_begin_s
(docs) ( id_id , auxinput2_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_begin_s
INTEGER id_id
CHARACTER*80 emess
auxinput2_begin_s = model_config_rec%auxinput2_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_begin_s
SUBROUTINE nl_get_auxinput3_begin_y
(docs) ( id_id , auxinput3_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_begin_y
INTEGER id_id
CHARACTER*80 emess
auxinput3_begin_y = model_config_rec%auxinput3_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_begin_y
SUBROUTINE nl_get_auxinput3_begin_mo
(docs) ( id_id , auxinput3_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxinput3_begin_mo = model_config_rec%auxinput3_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_begin_mo
SUBROUTINE nl_get_auxinput3_begin_d
(docs) ( id_id , auxinput3_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_begin_d
INTEGER id_id
CHARACTER*80 emess
auxinput3_begin_d = model_config_rec%auxinput3_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_begin_d
SUBROUTINE nl_get_auxinput3_begin_h
(docs) ( id_id , auxinput3_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_begin_h
INTEGER id_id
CHARACTER*80 emess
auxinput3_begin_h = model_config_rec%auxinput3_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_begin_h
SUBROUTINE nl_get_auxinput3_begin_m
(docs) ( id_id , auxinput3_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_begin_m
INTEGER id_id
CHARACTER*80 emess
auxinput3_begin_m = model_config_rec%auxinput3_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_begin_m
SUBROUTINE nl_get_auxinput3_begin_s
(docs) ( id_id , auxinput3_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_begin_s
INTEGER id_id
CHARACTER*80 emess
auxinput3_begin_s = model_config_rec%auxinput3_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_begin_s
SUBROUTINE nl_get_auxinput4_begin_y
(docs) ( id_id , auxinput4_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_begin_y
INTEGER id_id
CHARACTER*80 emess
auxinput4_begin_y = model_config_rec%auxinput4_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_begin_y
SUBROUTINE nl_get_auxinput4_begin_mo
(docs) ( id_id , auxinput4_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxinput4_begin_mo = model_config_rec%auxinput4_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_begin_mo
SUBROUTINE nl_get_auxinput4_begin_d
(docs) ( id_id , auxinput4_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_begin_d
INTEGER id_id
CHARACTER*80 emess
auxinput4_begin_d = model_config_rec%auxinput4_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_begin_d
SUBROUTINE nl_get_auxinput4_begin_h
(docs) ( id_id , auxinput4_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_begin_h
INTEGER id_id
CHARACTER*80 emess
auxinput4_begin_h = model_config_rec%auxinput4_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_begin_h
SUBROUTINE nl_get_auxinput4_begin_m
(docs) ( id_id , auxinput4_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_begin_m
INTEGER id_id
CHARACTER*80 emess
auxinput4_begin_m = model_config_rec%auxinput4_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_begin_m
SUBROUTINE nl_get_auxinput4_begin_s
(docs) ( id_id , auxinput4_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_begin_s
INTEGER id_id
CHARACTER*80 emess
auxinput4_begin_s = model_config_rec%auxinput4_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_begin_s
SUBROUTINE nl_get_auxinput5_begin_y
(docs) ( id_id , auxinput5_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_begin_y
INTEGER id_id
CHARACTER*80 emess
auxinput5_begin_y = model_config_rec%auxinput5_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_begin_y
SUBROUTINE nl_get_auxinput5_begin_mo
(docs) ( id_id , auxinput5_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxinput5_begin_mo = model_config_rec%auxinput5_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_begin_mo
SUBROUTINE nl_get_auxinput5_begin_d
(docs) ( id_id , auxinput5_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_begin_d
INTEGER id_id
CHARACTER*80 emess
auxinput5_begin_d = model_config_rec%auxinput5_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_begin_d
SUBROUTINE nl_get_auxinput5_begin_h
(docs) ( id_id , auxinput5_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_begin_h
INTEGER id_id
CHARACTER*80 emess
auxinput5_begin_h = model_config_rec%auxinput5_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_begin_h
SUBROUTINE nl_get_auxinput5_begin_m
(docs) ( id_id , auxinput5_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_begin_m
INTEGER id_id
CHARACTER*80 emess
auxinput5_begin_m = model_config_rec%auxinput5_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_begin_m
SUBROUTINE nl_get_auxinput5_begin_s
(docs) ( id_id , auxinput5_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_begin_s
INTEGER id_id
CHARACTER*80 emess
auxinput5_begin_s = model_config_rec%auxinput5_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_begin_s
SUBROUTINE nl_get_auxinput6_begin_y
(docs) ( id_id , auxinput6_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_begin_y
INTEGER id_id
CHARACTER*80 emess
auxinput6_begin_y = model_config_rec%auxinput6_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_begin_y
SUBROUTINE nl_get_auxinput6_begin_mo
(docs) ( id_id , auxinput6_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxinput6_begin_mo = model_config_rec%auxinput6_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_begin_mo
SUBROUTINE nl_get_auxinput6_begin_d
(docs) ( id_id , auxinput6_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_begin_d
INTEGER id_id
CHARACTER*80 emess
auxinput6_begin_d = model_config_rec%auxinput6_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_begin_d
SUBROUTINE nl_get_auxinput6_begin_h
(docs) ( id_id , auxinput6_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_begin_h
INTEGER id_id
CHARACTER*80 emess
auxinput6_begin_h = model_config_rec%auxinput6_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_begin_h
SUBROUTINE nl_get_auxinput6_begin_m
(docs) ( id_id , auxinput6_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_begin_m
INTEGER id_id
CHARACTER*80 emess
auxinput6_begin_m = model_config_rec%auxinput6_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_begin_m
SUBROUTINE nl_get_auxinput6_begin_s
(docs) ( id_id , auxinput6_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_begin_s
INTEGER id_id
CHARACTER*80 emess
auxinput6_begin_s = model_config_rec%auxinput6_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_begin_s
SUBROUTINE nl_get_auxinput7_begin_y
(docs) ( id_id , auxinput7_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput7_begin_y
INTEGER id_id
CHARACTER*80 emess
auxinput7_begin_y = model_config_rec%auxinput7_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput7_begin_y
SUBROUTINE nl_get_auxinput7_begin_mo
(docs) ( id_id , auxinput7_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput7_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxinput7_begin_mo = model_config_rec%auxinput7_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput7_begin_mo
SUBROUTINE nl_get_auxinput7_begin_d
(docs) ( id_id , auxinput7_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput7_begin_d
INTEGER id_id
CHARACTER*80 emess
auxinput7_begin_d = model_config_rec%auxinput7_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput7_begin_d
SUBROUTINE nl_get_auxinput7_begin_h
(docs) ( id_id , auxinput7_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput7_begin_h
INTEGER id_id
CHARACTER*80 emess
auxinput7_begin_h = model_config_rec%auxinput7_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput7_begin_h
SUBROUTINE nl_get_auxinput7_begin_m
(docs) ( id_id , auxinput7_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput7_begin_m
INTEGER id_id
CHARACTER*80 emess
auxinput7_begin_m = model_config_rec%auxinput7_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput7_begin_m
SUBROUTINE nl_get_auxinput7_begin_s
(docs) ( id_id , auxinput7_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput7_begin_s
INTEGER id_id
CHARACTER*80 emess
auxinput7_begin_s = model_config_rec%auxinput7_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput7_begin_s
SUBROUTINE nl_get_auxinput8_begin_y
(docs) ( id_id , auxinput8_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput8_begin_y
INTEGER id_id
CHARACTER*80 emess
auxinput8_begin_y = model_config_rec%auxinput8_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput8_begin_y
SUBROUTINE nl_get_auxinput8_begin_mo
(docs) ( id_id , auxinput8_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput8_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxinput8_begin_mo = model_config_rec%auxinput8_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput8_begin_mo
SUBROUTINE nl_get_auxinput8_begin_d
(docs) ( id_id , auxinput8_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput8_begin_d
INTEGER id_id
CHARACTER*80 emess
auxinput8_begin_d = model_config_rec%auxinput8_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput8_begin_d
SUBROUTINE nl_get_auxinput8_begin_h
(docs) ( id_id , auxinput8_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput8_begin_h
INTEGER id_id
CHARACTER*80 emess
auxinput8_begin_h = model_config_rec%auxinput8_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput8_begin_h
SUBROUTINE nl_get_auxinput8_begin_m
(docs) ( id_id , auxinput8_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput8_begin_m
INTEGER id_id
CHARACTER*80 emess
auxinput8_begin_m = model_config_rec%auxinput8_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput8_begin_m
SUBROUTINE nl_get_auxinput8_begin_s
(docs) ( id_id , auxinput8_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput8_begin_s
INTEGER id_id
CHARACTER*80 emess
auxinput8_begin_s = model_config_rec%auxinput8_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput8_begin_s
SUBROUTINE nl_get_sgfdda_begin_y
(docs) ( id_id , sgfdda_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: sgfdda_begin_y
INTEGER id_id
CHARACTER*80 emess
sgfdda_begin_y = model_config_rec%sgfdda_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_sgfdda_begin_y
SUBROUTINE nl_get_sgfdda_begin_mo
(docs) ( id_id , sgfdda_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: sgfdda_begin_mo
INTEGER id_id
CHARACTER*80 emess
sgfdda_begin_mo = model_config_rec%sgfdda_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_sgfdda_begin_mo
SUBROUTINE nl_get_sgfdda_begin_d
(docs) ( id_id , sgfdda_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: sgfdda_begin_d
INTEGER id_id
CHARACTER*80 emess
sgfdda_begin_d = model_config_rec%sgfdda_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_sgfdda_begin_d
SUBROUTINE nl_get_sgfdda_begin_h
(docs) ( id_id , sgfdda_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: sgfdda_begin_h
INTEGER id_id
CHARACTER*80 emess
sgfdda_begin_h = model_config_rec%sgfdda_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_sgfdda_begin_h
SUBROUTINE nl_get_sgfdda_begin_m
(docs) ( id_id , sgfdda_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: sgfdda_begin_m
INTEGER id_id
CHARACTER*80 emess
sgfdda_begin_m = model_config_rec%sgfdda_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_sgfdda_begin_m
SUBROUTINE nl_get_sgfdda_begin_s
(docs) ( id_id , sgfdda_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: sgfdda_begin_s
INTEGER id_id
CHARACTER*80 emess
sgfdda_begin_s = model_config_rec%sgfdda_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_sgfdda_begin_s
SUBROUTINE nl_get_gfdda_begin_y
(docs) ( id_id , gfdda_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: gfdda_begin_y
INTEGER id_id
CHARACTER*80 emess
gfdda_begin_y = model_config_rec%gfdda_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_gfdda_begin_y
SUBROUTINE nl_get_gfdda_begin_mo
(docs) ( id_id , gfdda_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: gfdda_begin_mo
INTEGER id_id
CHARACTER*80 emess
gfdda_begin_mo = model_config_rec%gfdda_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_gfdda_begin_mo
SUBROUTINE nl_get_gfdda_begin_d
(docs) ( id_id , gfdda_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: gfdda_begin_d
INTEGER id_id
CHARACTER*80 emess
gfdda_begin_d = model_config_rec%gfdda_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_gfdda_begin_d
SUBROUTINE nl_get_gfdda_begin_h
(docs) ( id_id , gfdda_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: gfdda_begin_h
INTEGER id_id
CHARACTER*80 emess
gfdda_begin_h = model_config_rec%gfdda_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_gfdda_begin_h
SUBROUTINE nl_get_gfdda_begin_m
(docs) ( id_id , gfdda_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: gfdda_begin_m
INTEGER id_id
CHARACTER*80 emess
gfdda_begin_m = model_config_rec%gfdda_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_gfdda_begin_m
SUBROUTINE nl_get_gfdda_begin_s
(docs) ( id_id , gfdda_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: gfdda_begin_s
INTEGER id_id
CHARACTER*80 emess
gfdda_begin_s = model_config_rec%gfdda_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_gfdda_begin_s
SUBROUTINE nl_get_auxinput11_begin_y
(docs) ( id_id , auxinput11_begin_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput11_begin_y
INTEGER id_id
CHARACTER*80 emess
auxinput11_begin_y = model_config_rec%auxinput11_begin_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput11_begin_y
SUBROUTINE nl_get_auxinput11_begin_mo
(docs) ( id_id , auxinput11_begin_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput11_begin_mo
INTEGER id_id
CHARACTER*80 emess
auxinput11_begin_mo = model_config_rec%auxinput11_begin_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput11_begin_mo
SUBROUTINE nl_get_auxinput11_begin_d
(docs) ( id_id , auxinput11_begin_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput11_begin_d
INTEGER id_id
CHARACTER*80 emess
auxinput11_begin_d = model_config_rec%auxinput11_begin_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput11_begin_d
SUBROUTINE nl_get_auxinput11_begin_h
(docs) ( id_id , auxinput11_begin_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput11_begin_h
INTEGER id_id
CHARACTER*80 emess
auxinput11_begin_h = model_config_rec%auxinput11_begin_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput11_begin_h
SUBROUTINE nl_get_auxinput11_begin_m
(docs) ( id_id , auxinput11_begin_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput11_begin_m
INTEGER id_id
CHARACTER*80 emess
auxinput11_begin_m = model_config_rec%auxinput11_begin_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput11_begin_m
SUBROUTINE nl_get_auxinput11_begin_s
(docs) ( id_id , auxinput11_begin_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput11_begin_s
INTEGER id_id
CHARACTER*80 emess
auxinput11_begin_s = model_config_rec%auxinput11_begin_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput11_begin_s
SUBROUTINE nl_get_restart_begin_y
(docs) ( id_id , restart_begin_y ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: restart_begin_y
INTEGER id_id
CHARACTER*80 emess
restart_begin_y = model_config_rec%restart_begin_y
RETURN
END SUBROUTINE nl_get_restart_begin_y
SUBROUTINE nl_get_restart_begin_mo
(docs) ( id_id , restart_begin_mo ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: restart_begin_mo
INTEGER id_id
CHARACTER*80 emess
restart_begin_mo = model_config_rec%restart_begin_mo
RETURN
END SUBROUTINE nl_get_restart_begin_mo
SUBROUTINE nl_get_restart_begin_d
(docs) ( id_id , restart_begin_d ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: restart_begin_d
INTEGER id_id
CHARACTER*80 emess
restart_begin_d = model_config_rec%restart_begin_d
RETURN
END SUBROUTINE nl_get_restart_begin_d
SUBROUTINE nl_get_restart_begin_h
(docs) ( id_id , restart_begin_h ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: restart_begin_h
INTEGER id_id
CHARACTER*80 emess
restart_begin_h = model_config_rec%restart_begin_h
RETURN
END SUBROUTINE nl_get_restart_begin_h
SUBROUTINE nl_get_restart_begin_m
(docs) ( id_id , restart_begin_m ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: restart_begin_m
INTEGER id_id
CHARACTER*80 emess
restart_begin_m = model_config_rec%restart_begin_m
RETURN
END SUBROUTINE nl_get_restart_begin_m
SUBROUTINE nl_get_restart_begin_s
(docs) ( id_id , restart_begin_s ),1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: restart_begin_s
INTEGER id_id
CHARACTER*80 emess
restart_begin_s = model_config_rec%restart_begin_s
RETURN
END SUBROUTINE nl_get_restart_begin_s
SUBROUTINE nl_get_history_end_y
(docs) ( id_id , history_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_end_y
INTEGER id_id
CHARACTER*80 emess
history_end_y = model_config_rec%history_end_y(id_id)
RETURN
END SUBROUTINE nl_get_history_end_y
SUBROUTINE nl_get_history_end_mo
(docs) ( id_id , history_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_end_mo
INTEGER id_id
CHARACTER*80 emess
history_end_mo = model_config_rec%history_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_history_end_mo
SUBROUTINE nl_get_history_end_d
(docs) ( id_id , history_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_end_d
INTEGER id_id
CHARACTER*80 emess
history_end_d = model_config_rec%history_end_d(id_id)
RETURN
END SUBROUTINE nl_get_history_end_d
SUBROUTINE nl_get_history_end_h
(docs) ( id_id , history_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_end_h
INTEGER id_id
CHARACTER*80 emess
history_end_h = model_config_rec%history_end_h(id_id)
RETURN
END SUBROUTINE nl_get_history_end_h
SUBROUTINE nl_get_history_end_m
(docs) ( id_id , history_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_end_m
INTEGER id_id
CHARACTER*80 emess
history_end_m = model_config_rec%history_end_m(id_id)
RETURN
END SUBROUTINE nl_get_history_end_m
SUBROUTINE nl_get_history_end_s
(docs) ( id_id , history_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: history_end_s
INTEGER id_id
CHARACTER*80 emess
history_end_s = model_config_rec%history_end_s(id_id)
RETURN
END SUBROUTINE nl_get_history_end_s
SUBROUTINE nl_get_inputout_end_y
(docs) ( id_id , inputout_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_end_y
INTEGER id_id
CHARACTER*80 emess
inputout_end_y = model_config_rec%inputout_end_y(id_id)
RETURN
END SUBROUTINE nl_get_inputout_end_y
SUBROUTINE nl_get_inputout_end_mo
(docs) ( id_id , inputout_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_end_mo
INTEGER id_id
CHARACTER*80 emess
inputout_end_mo = model_config_rec%inputout_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_inputout_end_mo
SUBROUTINE nl_get_inputout_end_d
(docs) ( id_id , inputout_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_end_d
INTEGER id_id
CHARACTER*80 emess
inputout_end_d = model_config_rec%inputout_end_d(id_id)
RETURN
END SUBROUTINE nl_get_inputout_end_d
SUBROUTINE nl_get_inputout_end_h
(docs) ( id_id , inputout_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_end_h
INTEGER id_id
CHARACTER*80 emess
inputout_end_h = model_config_rec%inputout_end_h(id_id)
RETURN
END SUBROUTINE nl_get_inputout_end_h
SUBROUTINE nl_get_inputout_end_m
(docs) ( id_id , inputout_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_end_m
INTEGER id_id
CHARACTER*80 emess
inputout_end_m = model_config_rec%inputout_end_m(id_id)
RETURN
END SUBROUTINE nl_get_inputout_end_m
SUBROUTINE nl_get_inputout_end_s
(docs) ( id_id , inputout_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: inputout_end_s
INTEGER id_id
CHARACTER*80 emess
inputout_end_s = model_config_rec%inputout_end_s(id_id)
RETURN
END SUBROUTINE nl_get_inputout_end_s
SUBROUTINE nl_get_auxhist1_end_y
(docs) ( id_id , auxhist1_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_end_y
INTEGER id_id
CHARACTER*80 emess
auxhist1_end_y = model_config_rec%auxhist1_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_end_y
SUBROUTINE nl_get_auxhist1_end_mo
(docs) ( id_id , auxhist1_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_end_mo
INTEGER id_id
CHARACTER*80 emess
auxhist1_end_mo = model_config_rec%auxhist1_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_end_mo
SUBROUTINE nl_get_auxhist1_end_d
(docs) ( id_id , auxhist1_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_end_d
INTEGER id_id
CHARACTER*80 emess
auxhist1_end_d = model_config_rec%auxhist1_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_end_d
SUBROUTINE nl_get_auxhist1_end_h
(docs) ( id_id , auxhist1_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_end_h
INTEGER id_id
CHARACTER*80 emess
auxhist1_end_h = model_config_rec%auxhist1_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_end_h
SUBROUTINE nl_get_auxhist1_end_m
(docs) ( id_id , auxhist1_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_end_m
INTEGER id_id
CHARACTER*80 emess
auxhist1_end_m = model_config_rec%auxhist1_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_end_m
SUBROUTINE nl_get_auxhist1_end_s
(docs) ( id_id , auxhist1_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist1_end_s
INTEGER id_id
CHARACTER*80 emess
auxhist1_end_s = model_config_rec%auxhist1_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist1_end_s
SUBROUTINE nl_get_auxhist2_end_y
(docs) ( id_id , auxhist2_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_end_y
INTEGER id_id
CHARACTER*80 emess
auxhist2_end_y = model_config_rec%auxhist2_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_end_y
SUBROUTINE nl_get_auxhist2_end_mo
(docs) ( id_id , auxhist2_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_end_mo
INTEGER id_id
CHARACTER*80 emess
auxhist2_end_mo = model_config_rec%auxhist2_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_end_mo
SUBROUTINE nl_get_auxhist2_end_d
(docs) ( id_id , auxhist2_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_end_d
INTEGER id_id
CHARACTER*80 emess
auxhist2_end_d = model_config_rec%auxhist2_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_end_d
SUBROUTINE nl_get_auxhist2_end_h
(docs) ( id_id , auxhist2_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_end_h
INTEGER id_id
CHARACTER*80 emess
auxhist2_end_h = model_config_rec%auxhist2_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_end_h
SUBROUTINE nl_get_auxhist2_end_m
(docs) ( id_id , auxhist2_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_end_m
INTEGER id_id
CHARACTER*80 emess
auxhist2_end_m = model_config_rec%auxhist2_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_end_m
SUBROUTINE nl_get_auxhist2_end_s
(docs) ( id_id , auxhist2_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist2_end_s
INTEGER id_id
CHARACTER*80 emess
auxhist2_end_s = model_config_rec%auxhist2_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist2_end_s
SUBROUTINE nl_get_auxhist3_end_y
(docs) ( id_id , auxhist3_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_end_y
INTEGER id_id
CHARACTER*80 emess
auxhist3_end_y = model_config_rec%auxhist3_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_end_y
SUBROUTINE nl_get_auxhist3_end_mo
(docs) ( id_id , auxhist3_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_end_mo
INTEGER id_id
CHARACTER*80 emess
auxhist3_end_mo = model_config_rec%auxhist3_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_end_mo
SUBROUTINE nl_get_auxhist3_end_d
(docs) ( id_id , auxhist3_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_end_d
INTEGER id_id
CHARACTER*80 emess
auxhist3_end_d = model_config_rec%auxhist3_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_end_d
SUBROUTINE nl_get_auxhist3_end_h
(docs) ( id_id , auxhist3_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_end_h
INTEGER id_id
CHARACTER*80 emess
auxhist3_end_h = model_config_rec%auxhist3_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_end_h
SUBROUTINE nl_get_auxhist3_end_m
(docs) ( id_id , auxhist3_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_end_m
INTEGER id_id
CHARACTER*80 emess
auxhist3_end_m = model_config_rec%auxhist3_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_end_m
SUBROUTINE nl_get_auxhist3_end_s
(docs) ( id_id , auxhist3_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist3_end_s
INTEGER id_id
CHARACTER*80 emess
auxhist3_end_s = model_config_rec%auxhist3_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist3_end_s
SUBROUTINE nl_get_auxhist4_end_y
(docs) ( id_id , auxhist4_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_end_y
INTEGER id_id
CHARACTER*80 emess
auxhist4_end_y = model_config_rec%auxhist4_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_end_y
SUBROUTINE nl_get_auxhist4_end_mo
(docs) ( id_id , auxhist4_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_end_mo
INTEGER id_id
CHARACTER*80 emess
auxhist4_end_mo = model_config_rec%auxhist4_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_end_mo
SUBROUTINE nl_get_auxhist4_end_d
(docs) ( id_id , auxhist4_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_end_d
INTEGER id_id
CHARACTER*80 emess
auxhist4_end_d = model_config_rec%auxhist4_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_end_d
SUBROUTINE nl_get_auxhist4_end_h
(docs) ( id_id , auxhist4_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_end_h
INTEGER id_id
CHARACTER*80 emess
auxhist4_end_h = model_config_rec%auxhist4_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_end_h
SUBROUTINE nl_get_auxhist4_end_m
(docs) ( id_id , auxhist4_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_end_m
INTEGER id_id
CHARACTER*80 emess
auxhist4_end_m = model_config_rec%auxhist4_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_end_m
SUBROUTINE nl_get_auxhist4_end_s
(docs) ( id_id , auxhist4_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist4_end_s
INTEGER id_id
CHARACTER*80 emess
auxhist4_end_s = model_config_rec%auxhist4_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist4_end_s
SUBROUTINE nl_get_auxhist5_end_y
(docs) ( id_id , auxhist5_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_end_y
INTEGER id_id
CHARACTER*80 emess
auxhist5_end_y = model_config_rec%auxhist5_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_end_y
SUBROUTINE nl_get_auxhist5_end_mo
(docs) ( id_id , auxhist5_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_end_mo
INTEGER id_id
CHARACTER*80 emess
auxhist5_end_mo = model_config_rec%auxhist5_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_end_mo
SUBROUTINE nl_get_auxhist5_end_d
(docs) ( id_id , auxhist5_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_end_d
INTEGER id_id
CHARACTER*80 emess
auxhist5_end_d = model_config_rec%auxhist5_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_end_d
SUBROUTINE nl_get_auxhist5_end_h
(docs) ( id_id , auxhist5_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_end_h
INTEGER id_id
CHARACTER*80 emess
auxhist5_end_h = model_config_rec%auxhist5_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_end_h
SUBROUTINE nl_get_auxhist5_end_m
(docs) ( id_id , auxhist5_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_end_m
INTEGER id_id
CHARACTER*80 emess
auxhist5_end_m = model_config_rec%auxhist5_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_end_m
SUBROUTINE nl_get_auxhist5_end_s
(docs) ( id_id , auxhist5_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist5_end_s
INTEGER id_id
CHARACTER*80 emess
auxhist5_end_s = model_config_rec%auxhist5_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist5_end_s
SUBROUTINE nl_get_auxhist6_end_y
(docs) ( id_id , auxhist6_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_end_y
INTEGER id_id
CHARACTER*80 emess
auxhist6_end_y = model_config_rec%auxhist6_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_end_y
SUBROUTINE nl_get_auxhist6_end_mo
(docs) ( id_id , auxhist6_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_end_mo
INTEGER id_id
CHARACTER*80 emess
auxhist6_end_mo = model_config_rec%auxhist6_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_end_mo
SUBROUTINE nl_get_auxhist6_end_d
(docs) ( id_id , auxhist6_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_end_d
INTEGER id_id
CHARACTER*80 emess
auxhist6_end_d = model_config_rec%auxhist6_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_end_d
SUBROUTINE nl_get_auxhist6_end_h
(docs) ( id_id , auxhist6_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_end_h
INTEGER id_id
CHARACTER*80 emess
auxhist6_end_h = model_config_rec%auxhist6_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_end_h
SUBROUTINE nl_get_auxhist6_end_m
(docs) ( id_id , auxhist6_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_end_m
INTEGER id_id
CHARACTER*80 emess
auxhist6_end_m = model_config_rec%auxhist6_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_end_m
SUBROUTINE nl_get_auxhist6_end_s
(docs) ( id_id , auxhist6_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist6_end_s
INTEGER id_id
CHARACTER*80 emess
auxhist6_end_s = model_config_rec%auxhist6_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist6_end_s
SUBROUTINE nl_get_auxhist7_end_y
(docs) ( id_id , auxhist7_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_end_y
INTEGER id_id
CHARACTER*80 emess
auxhist7_end_y = model_config_rec%auxhist7_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_end_y
SUBROUTINE nl_get_auxhist7_end_mo
(docs) ( id_id , auxhist7_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_end_mo
INTEGER id_id
CHARACTER*80 emess
auxhist7_end_mo = model_config_rec%auxhist7_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_end_mo
SUBROUTINE nl_get_auxhist7_end_d
(docs) ( id_id , auxhist7_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_end_d
INTEGER id_id
CHARACTER*80 emess
auxhist7_end_d = model_config_rec%auxhist7_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_end_d
SUBROUTINE nl_get_auxhist7_end_h
(docs) ( id_id , auxhist7_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_end_h
INTEGER id_id
CHARACTER*80 emess
auxhist7_end_h = model_config_rec%auxhist7_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_end_h
SUBROUTINE nl_get_auxhist7_end_m
(docs) ( id_id , auxhist7_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_end_m
INTEGER id_id
CHARACTER*80 emess
auxhist7_end_m = model_config_rec%auxhist7_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_end_m
SUBROUTINE nl_get_auxhist7_end_s
(docs) ( id_id , auxhist7_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist7_end_s
INTEGER id_id
CHARACTER*80 emess
auxhist7_end_s = model_config_rec%auxhist7_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist7_end_s
SUBROUTINE nl_get_auxhist8_end_y
(docs) ( id_id , auxhist8_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_end_y
INTEGER id_id
CHARACTER*80 emess
auxhist8_end_y = model_config_rec%auxhist8_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_end_y
SUBROUTINE nl_get_auxhist8_end_mo
(docs) ( id_id , auxhist8_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_end_mo
INTEGER id_id
CHARACTER*80 emess
auxhist8_end_mo = model_config_rec%auxhist8_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_end_mo
SUBROUTINE nl_get_auxhist8_end_d
(docs) ( id_id , auxhist8_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_end_d
INTEGER id_id
CHARACTER*80 emess
auxhist8_end_d = model_config_rec%auxhist8_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_end_d
SUBROUTINE nl_get_auxhist8_end_h
(docs) ( id_id , auxhist8_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_end_h
INTEGER id_id
CHARACTER*80 emess
auxhist8_end_h = model_config_rec%auxhist8_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_end_h
SUBROUTINE nl_get_auxhist8_end_m
(docs) ( id_id , auxhist8_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_end_m
INTEGER id_id
CHARACTER*80 emess
auxhist8_end_m = model_config_rec%auxhist8_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_end_m
SUBROUTINE nl_get_auxhist8_end_s
(docs) ( id_id , auxhist8_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist8_end_s
INTEGER id_id
CHARACTER*80 emess
auxhist8_end_s = model_config_rec%auxhist8_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist8_end_s
SUBROUTINE nl_get_auxhist9_end_y
(docs) ( id_id , auxhist9_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_end_y
INTEGER id_id
CHARACTER*80 emess
auxhist9_end_y = model_config_rec%auxhist9_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_end_y
SUBROUTINE nl_get_auxhist9_end_mo
(docs) ( id_id , auxhist9_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_end_mo
INTEGER id_id
CHARACTER*80 emess
auxhist9_end_mo = model_config_rec%auxhist9_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_end_mo
SUBROUTINE nl_get_auxhist9_end_d
(docs) ( id_id , auxhist9_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_end_d
INTEGER id_id
CHARACTER*80 emess
auxhist9_end_d = model_config_rec%auxhist9_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_end_d
SUBROUTINE nl_get_auxhist9_end_h
(docs) ( id_id , auxhist9_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_end_h
INTEGER id_id
CHARACTER*80 emess
auxhist9_end_h = model_config_rec%auxhist9_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_end_h
SUBROUTINE nl_get_auxhist9_end_m
(docs) ( id_id , auxhist9_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_end_m
INTEGER id_id
CHARACTER*80 emess
auxhist9_end_m = model_config_rec%auxhist9_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_end_m
SUBROUTINE nl_get_auxhist9_end_s
(docs) ( id_id , auxhist9_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist9_end_s
INTEGER id_id
CHARACTER*80 emess
auxhist9_end_s = model_config_rec%auxhist9_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist9_end_s
SUBROUTINE nl_get_auxhist10_end_y
(docs) ( id_id , auxhist10_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_end_y
INTEGER id_id
CHARACTER*80 emess
auxhist10_end_y = model_config_rec%auxhist10_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_end_y
SUBROUTINE nl_get_auxhist10_end_mo
(docs) ( id_id , auxhist10_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_end_mo
INTEGER id_id
CHARACTER*80 emess
auxhist10_end_mo = model_config_rec%auxhist10_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_end_mo
SUBROUTINE nl_get_auxhist10_end_d
(docs) ( id_id , auxhist10_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_end_d
INTEGER id_id
CHARACTER*80 emess
auxhist10_end_d = model_config_rec%auxhist10_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_end_d
SUBROUTINE nl_get_auxhist10_end_h
(docs) ( id_id , auxhist10_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_end_h
INTEGER id_id
CHARACTER*80 emess
auxhist10_end_h = model_config_rec%auxhist10_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_end_h
SUBROUTINE nl_get_auxhist10_end_m
(docs) ( id_id , auxhist10_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_end_m
INTEGER id_id
CHARACTER*80 emess
auxhist10_end_m = model_config_rec%auxhist10_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_end_m
SUBROUTINE nl_get_auxhist10_end_s
(docs) ( id_id , auxhist10_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist10_end_s
INTEGER id_id
CHARACTER*80 emess
auxhist10_end_s = model_config_rec%auxhist10_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist10_end_s
SUBROUTINE nl_get_auxhist11_end_y
(docs) ( id_id , auxhist11_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_end_y
INTEGER id_id
CHARACTER*80 emess
auxhist11_end_y = model_config_rec%auxhist11_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_end_y
SUBROUTINE nl_get_auxhist11_end_mo
(docs) ( id_id , auxhist11_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_end_mo
INTEGER id_id
CHARACTER*80 emess
auxhist11_end_mo = model_config_rec%auxhist11_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_end_mo
SUBROUTINE nl_get_auxhist11_end_d
(docs) ( id_id , auxhist11_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_end_d
INTEGER id_id
CHARACTER*80 emess
auxhist11_end_d = model_config_rec%auxhist11_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_end_d
SUBROUTINE nl_get_auxhist11_end_h
(docs) ( id_id , auxhist11_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_end_h
INTEGER id_id
CHARACTER*80 emess
auxhist11_end_h = model_config_rec%auxhist11_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_end_h
SUBROUTINE nl_get_auxhist11_end_m
(docs) ( id_id , auxhist11_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_end_m
INTEGER id_id
CHARACTER*80 emess
auxhist11_end_m = model_config_rec%auxhist11_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_end_m
SUBROUTINE nl_get_auxhist11_end_s
(docs) ( id_id , auxhist11_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxhist11_end_s
INTEGER id_id
CHARACTER*80 emess
auxhist11_end_s = model_config_rec%auxhist11_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxhist11_end_s
SUBROUTINE nl_get_auxinput1_end_y
(docs) ( id_id , auxinput1_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_end_y
INTEGER id_id
CHARACTER*80 emess
auxinput1_end_y = model_config_rec%auxinput1_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_end_y
SUBROUTINE nl_get_auxinput1_end_mo
(docs) ( id_id , auxinput1_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_end_mo
INTEGER id_id
CHARACTER*80 emess
auxinput1_end_mo = model_config_rec%auxinput1_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_end_mo
SUBROUTINE nl_get_auxinput1_end_d
(docs) ( id_id , auxinput1_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_end_d
INTEGER id_id
CHARACTER*80 emess
auxinput1_end_d = model_config_rec%auxinput1_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_end_d
SUBROUTINE nl_get_auxinput1_end_h
(docs) ( id_id , auxinput1_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_end_h
INTEGER id_id
CHARACTER*80 emess
auxinput1_end_h = model_config_rec%auxinput1_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_end_h
SUBROUTINE nl_get_auxinput1_end_m
(docs) ( id_id , auxinput1_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_end_m
INTEGER id_id
CHARACTER*80 emess
auxinput1_end_m = model_config_rec%auxinput1_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_end_m
SUBROUTINE nl_get_auxinput1_end_s
(docs) ( id_id , auxinput1_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput1_end_s
INTEGER id_id
CHARACTER*80 emess
auxinput1_end_s = model_config_rec%auxinput1_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput1_end_s
SUBROUTINE nl_get_auxinput2_end_y
(docs) ( id_id , auxinput2_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_end_y
INTEGER id_id
CHARACTER*80 emess
auxinput2_end_y = model_config_rec%auxinput2_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_end_y
SUBROUTINE nl_get_auxinput2_end_mo
(docs) ( id_id , auxinput2_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_end_mo
INTEGER id_id
CHARACTER*80 emess
auxinput2_end_mo = model_config_rec%auxinput2_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_end_mo
SUBROUTINE nl_get_auxinput2_end_d
(docs) ( id_id , auxinput2_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_end_d
INTEGER id_id
CHARACTER*80 emess
auxinput2_end_d = model_config_rec%auxinput2_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_end_d
SUBROUTINE nl_get_auxinput2_end_h
(docs) ( id_id , auxinput2_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_end_h
INTEGER id_id
CHARACTER*80 emess
auxinput2_end_h = model_config_rec%auxinput2_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_end_h
SUBROUTINE nl_get_auxinput2_end_m
(docs) ( id_id , auxinput2_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_end_m
INTEGER id_id
CHARACTER*80 emess
auxinput2_end_m = model_config_rec%auxinput2_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_end_m
SUBROUTINE nl_get_auxinput2_end_s
(docs) ( id_id , auxinput2_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput2_end_s
INTEGER id_id
CHARACTER*80 emess
auxinput2_end_s = model_config_rec%auxinput2_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput2_end_s
SUBROUTINE nl_get_auxinput3_end_y
(docs) ( id_id , auxinput3_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_end_y
INTEGER id_id
CHARACTER*80 emess
auxinput3_end_y = model_config_rec%auxinput3_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_end_y
SUBROUTINE nl_get_auxinput3_end_mo
(docs) ( id_id , auxinput3_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_end_mo
INTEGER id_id
CHARACTER*80 emess
auxinput3_end_mo = model_config_rec%auxinput3_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_end_mo
SUBROUTINE nl_get_auxinput3_end_d
(docs) ( id_id , auxinput3_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_end_d
INTEGER id_id
CHARACTER*80 emess
auxinput3_end_d = model_config_rec%auxinput3_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_end_d
SUBROUTINE nl_get_auxinput3_end_h
(docs) ( id_id , auxinput3_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_end_h
INTEGER id_id
CHARACTER*80 emess
auxinput3_end_h = model_config_rec%auxinput3_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_end_h
SUBROUTINE nl_get_auxinput3_end_m
(docs) ( id_id , auxinput3_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_end_m
INTEGER id_id
CHARACTER*80 emess
auxinput3_end_m = model_config_rec%auxinput3_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_end_m
SUBROUTINE nl_get_auxinput3_end_s
(docs) ( id_id , auxinput3_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput3_end_s
INTEGER id_id
CHARACTER*80 emess
auxinput3_end_s = model_config_rec%auxinput3_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput3_end_s
SUBROUTINE nl_get_auxinput4_end_y
(docs) ( id_id , auxinput4_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_end_y
INTEGER id_id
CHARACTER*80 emess
auxinput4_end_y = model_config_rec%auxinput4_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_end_y
SUBROUTINE nl_get_auxinput4_end_mo
(docs) ( id_id , auxinput4_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_end_mo
INTEGER id_id
CHARACTER*80 emess
auxinput4_end_mo = model_config_rec%auxinput4_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_end_mo
SUBROUTINE nl_get_auxinput4_end_d
(docs) ( id_id , auxinput4_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_end_d
INTEGER id_id
CHARACTER*80 emess
auxinput4_end_d = model_config_rec%auxinput4_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_end_d
SUBROUTINE nl_get_auxinput4_end_h
(docs) ( id_id , auxinput4_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_end_h
INTEGER id_id
CHARACTER*80 emess
auxinput4_end_h = model_config_rec%auxinput4_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_end_h
SUBROUTINE nl_get_auxinput4_end_m
(docs) ( id_id , auxinput4_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_end_m
INTEGER id_id
CHARACTER*80 emess
auxinput4_end_m = model_config_rec%auxinput4_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_end_m
SUBROUTINE nl_get_auxinput4_end_s
(docs) ( id_id , auxinput4_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput4_end_s
INTEGER id_id
CHARACTER*80 emess
auxinput4_end_s = model_config_rec%auxinput4_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput4_end_s
SUBROUTINE nl_get_auxinput5_end_y
(docs) ( id_id , auxinput5_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_end_y
INTEGER id_id
CHARACTER*80 emess
auxinput5_end_y = model_config_rec%auxinput5_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_end_y
SUBROUTINE nl_get_auxinput5_end_mo
(docs) ( id_id , auxinput5_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_end_mo
INTEGER id_id
CHARACTER*80 emess
auxinput5_end_mo = model_config_rec%auxinput5_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_end_mo
SUBROUTINE nl_get_auxinput5_end_d
(docs) ( id_id , auxinput5_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_end_d
INTEGER id_id
CHARACTER*80 emess
auxinput5_end_d = model_config_rec%auxinput5_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_end_d
SUBROUTINE nl_get_auxinput5_end_h
(docs) ( id_id , auxinput5_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_end_h
INTEGER id_id
CHARACTER*80 emess
auxinput5_end_h = model_config_rec%auxinput5_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_end_h
SUBROUTINE nl_get_auxinput5_end_m
(docs) ( id_id , auxinput5_end_m ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_end_m
INTEGER id_id
CHARACTER*80 emess
auxinput5_end_m = model_config_rec%auxinput5_end_m(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_end_m
SUBROUTINE nl_get_auxinput5_end_s
(docs) ( id_id , auxinput5_end_s ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput5_end_s
INTEGER id_id
CHARACTER*80 emess
auxinput5_end_s = model_config_rec%auxinput5_end_s(id_id)
RETURN
END SUBROUTINE nl_get_auxinput5_end_s
SUBROUTINE nl_get_auxinput6_end_y
(docs) ( id_id , auxinput6_end_y ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_end_y
INTEGER id_id
CHARACTER*80 emess
auxinput6_end_y = model_config_rec%auxinput6_end_y(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_end_y
SUBROUTINE nl_get_auxinput6_end_mo
(docs) ( id_id , auxinput6_end_mo ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_end_mo
INTEGER id_id
CHARACTER*80 emess
auxinput6_end_mo = model_config_rec%auxinput6_end_mo(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_end_mo
SUBROUTINE nl_get_auxinput6_end_d
(docs) ( id_id , auxinput6_end_d ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_end_d
INTEGER id_id
CHARACTER*80 emess
auxinput6_end_d = model_config_rec%auxinput6_end_d(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_end_d
SUBROUTINE nl_get_auxinput6_end_h
(docs) ( id_id , auxinput6_end_h ) 1,1
USE module_configure
, ONLY : model_config_rec
integer , INTENT(OUT) :: auxinput6_end_h
INTEGER id_id
CHARACTER*80 emess
auxinput6_end_h = model_config_rec%auxinput6_end_h(id_id)
RETURN
END SUBROUTINE nl_get_auxinput6_end_h
!ENDOFREGISTRYGENERATEDINCLUDE