ELF>@,@@gen_streams.cgen_streams__intel_sse4_strlensprintffopenprint_warningfprintffputsclose_the_filegen_set_timekeeping_alarmsgen_io_domain_defsgen_set_timekeeping_defsgen_io_form_for_datasetgen_io_form_for_streamgen_switches_and_alarmsgen_check_auxstream_alarmsgen_fine_stream_inputgen_med_auxinput_ingen_med_hist_out_opensgen_med_hist_out_closesgen_med_auxinput_in_closesgen_med_last_solve_iogen_shutdown_closesgen_med_open_esmf_callsgen_med_find_esmf_couplinggen_io_boilerplate.debug_info_seg      `/7=KSYh`0`!P#$%&P''(;`)R)j*+`p+@+P-pp.SUH8HHtvHHHtu HHHvH<$H3H<$3H<$HHuH8][HH4$E3H$ L$L$L$IL$AAE3IMƄ$2ED$(LMH߾LHML$23HHHLHHH߾HL3L$2H߾LHML$23HHH߾LHML$23AA2}nQDA+kAu)Ƅ$2A} AAH$23A|AD$(AAAE3A}EdiHH$ L$L$L$L$HHHtu HHHvH<$H3H<$3H<$HHQHH4$3Ƅ$-H$ HL$AL$IL$AL$MH߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-H߾HL3L$-AA2}iQDA+kAu Ƅ$-LAAH$-3AAHH$ L$L$L$L$HHHtu HHHvH<$H3H<$3H<$HHHH4$HHHHHtu HHHvH<$H3H<$3H<$HH]HH4$HHHHHHHHL$A׾H$(D3H߾3H$(H߾3H$(H߾3H$(H߾3H$(AA|HL$HHHHHHtu HHHvH<$H3H<$3H<$HHHH4$HHHHHHHHL$A׾H$ D3H߾3H$ H߾3H$ H߾3H$ H߾3H$ AA|HL$HHHHHHtu HHHvH<$H3H<$3H<$HHHH4$HHH߾3HL$AL$L$HE}DD3H߾DD3HEuDD3H߾DD3EA|HL$L$L$HHHtu HHHvH<$H3H<$3H<$HHHH4$HL$AH߾D3H߾D3H߾D3H߾D3HHAA|HL$L$AH߾D3H߾D3H߾D3HH߾D3HH߾D3HHAAeHL$HHHtu HHHvH<$H3H<$3H<$HHHH4$HHHHL$AH߾D3H߾D3H߾D3H߾D3AA|HL$HHHHHHHtu HHHvH<$H3H<$3H<$HHXHH4$L$AH߾D3H߾D3H߾DD3H߾D3H߾DD3AA|HL$HHHtu HHHvH<$H3H<$3H<$HHIHH4$L$AH߾D3H߾D3H߾DD3H߾D3H߾DD3AA|HL$HHHtu HHHvH<$H3H<$3H<$HH:HH4$L$AH߾D3H߾D3H߾D3H߾D3HHAA|HL$HHHtu HHHvH<$H3H<$3H<$HH)HH4$L$AH߾D3H߾D3H߾DD3H߾D3HHAA|HL$HHHtu HHHvH<$H3H<$3H<$HHHH4$L$AH߾D3H߾D3HAA|HL$HHHtu HHHvH<$H3H<$3H<$HH5HH4$L$AH߾D3HHAW3H߾D3H߾DD3H߾D3HHAAnAH߾D3HHAW3H߾D3H߾DD3H߾D3HHAAnHL$HHHtu HHHvH<$H3H<$3H<$HHcHH4$L$A׿HH߾D3HH߾D3HHH߾D3HHHHHH߾D3HH߾D3HHH߾D3HHHHAAHL$HHHtu HHHvH<$H3H<$3H<$HHtHH4$HډA3Ã|H3H8][@ATAUAVAWSH3$H$IAIAƸQAkAu$A|"A(L3A}AALHLM3ATLHLMI3AWATLHLMI3AWATLHLMI3AWATLHLMI3AWATLHLMI3AWHPHLHLMI3L<$Ld$H\$L|$Ld$ H0LHLM3HLHLMI3L<$Ld$H\$L|$Ld$ H0LHLM3HLHLMI3L<$Ld$H\$L|$Ld$ H0LLHLM3LLLLLATLHLMI3AWATLHLMI3AWATLHLMI3AWATLHLMI3AWATLHLMI3AWATLHLMI3AWH`HLHLMI3L<$Ld$H\$L|$Ld$ ATLHLMI3AWH@HLHLMI3L<$Ld$H\$L|$Ld$ H0LHLM3HLHLMI3L<$Ld$H\$L|$Ld$ H0LLHLM3LLLLLATLHLMI3AWATLHLMI3AWATLHLMI3AWATLHLMI3AWATLHLMI3AWATLHLMI3AWH`HLHLMI3L<$Ld$H\$L|$Ld$ ATLHLMI3AWH@HLHLMI3L<$Ld$H\$L|$Ld$ H0LHLM3HLHLMI3L<$Ld$H\$L|$Ld$ H0LLHLM3LLLLLLHLM3LLHLM3LLHLM3LLLA13H[A_A^A]A\fATAUAVAWSUH3IAAAAE3HLD$Eĉ$ILLHLILL$3LLLLLLLLH3LD$LHLILL$3LLLHLILL$3AA2}hQDA+kAu&D$AA} AH|$3AA|λ$AE3} 3H][A_A^A]A\ATAUAVAWV3A$IIALLL3L$LLL3L$LLL3L$LLL3L$LLL3L$LLL3L$LLL3L$LLL3L$LLL3L$LLL3L$LLL3L$LLL3L$LLL3L$LLL3L$LLL3L$LLL3L$LLL3L$AA2}eQDA+kAu$AAAH<$3AAA3YA_A^A]A\ATAUVILLLLLLLLAվH<$D3L3H$L3H$L3H$L3H$AA|LLL3YA]A\ÐATAUVILLLLLLLLAվH<$D3L3H$L3H$L3H$L3H$AA|LLL3YA]A\ÐATAUAVAWVILLL3LMALE|$DD3LDD3LEt$DD3LDD3EA|3YA_A^A]A\@ATAUVILALD3LD3LD3LD3LLAA|LMALD3LD3LD3LLD3LLD3LLAAe3YA]A\DATAUVILLLLALD3LD3LD3LD3AA|LLLL3YA]A\ATAUVAILD3LD3LDD3LD3LDD3AA|3YA]A\ATAUVAILD3LD3LDD3LD3LDD3AA|3YA]A\ATAUVAILD3LD3LD3LD3LLAA|3YA]A\DATAUVAILD3LD3LDD3LD3LLAA|3YA]A\ATAUVAILD3LD3LAA|3YA]A\ATAUVAILDDE3AA|3YA]A\ATAUVAILD3LLAU3LD3LDD3LD3LLAAnALD3LLAU3LD3LDD3LD3LLAAn3YA]A\DATAUVAILLD3LLD3LLLD3LLLLLLD3LLD3LLLD3LLLLAA3YA]A\UH H<$3H<$HHuH ]HH4$H3L$L$H$AAAHLD3HAWLDAA3AVEHAWLDAA3AVH HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3HLDAA3AAÃ} HL$L$H$3H ]@ INTEGER, INTENT(IN) :: fid IMPLICIT NONE TYPE(domain) :: grid INTEGER, INTENT(INOUT) :: ierr ENDIF RETURN IF ( DataSet .eq. 'RESTART' ) THEN CALL nl_get_io_form_restart( 1, io_form ) ELSE IF ( DataSet .eq. 'INPUT' ) THEN CALL nl_get_io_form_input( 1, io_form ) ELSE IF ( DataSet .eq. 'HISTORY' ) THEN CALL nl_get_io_form_history( 1, io_form ) ELSE IF ( DataSet .eq. 'BOUNDARY' ) THEN CALL nl_get_io_form_boundary( 1, io_form ) CALL nl_get_io_form_history( 1, io_form ) ENDIF IF ( stream .eq. restart_only ) THEN CALL nl_get_io_form_restart( 1, io_form ) ELSE IF ( stream .eq. input_only ) THEN CALL nl_get_io_form_input( 1, io_form ) ELSE IF ( stream .eq. history_only ) THEN CALL nl_get_io_form_history( 1, io_form ) ELSE IF ( stream .eq. boundary_only ) THEN CALL nl_get_io_form_boundary( 1, io_form ) ENDIF INTEGER, PARAMETER :: history_only = 1 INTEGER, PARAMETER :: HISTORY_ALARM = history_only ! - AUX HISTORY OUTPUT ENDIF #endif ! - AUX INPUT INPUT CALL wrf_debug ( 0 , message ) ENDIF #endif ELSE CALL WRF_ERROR_FATAL ( message ) END IF grid%nframes(stream) = 0 ENDIF grid%nframes(stream) = 0 ENDIF ENDIF IF ( use_package( io_form ) == IO_ESMF ) THEN IF ( ierr /= 0 ) RETURN ENDIF IF ( use_package( io_form ) == IO_ESMF ) THEN IF ( ierr /= 0 ) RETURN ENDIF IF ( .NOT. foundcoupling ) THEN IF ( use_package( io_form ) == IO_ESMF ) THEN IF ( rc /= ESMF_SUCCESS ) THEN ENDIF foundcoupling = .TRUE. ENDIF ENDIF IF ( .NOT. foundcoupling ) THEN IF ( use_package( io_form ) == IO_ESMF ) THEN IF ( rc /= ESMF_SUCCESS ) THEN ENDIF foundcoupling = .TRUE. ENDIF ENDIF CALL wrf_check_error( WRFU_SUCCESS, rc, & __FILE__ , & __LINE__ ) ELSE interval = padding_interval ENDIF CALL wrf_check_error( WRFU_SUCCESS, rc, & __FILE__ , & __LINE__ ) ELSE begin_time = zero_time ENDIF CALL wrf_check_error( WRFU_SUCCESS, rc, & __FILE__ , & __LINE__ ) ELSE end_time = run_length + padding_interval ENDIF CALL wrf_check_error( WRFU_SUCCESS, rc, & __FILE__ , & __LINE__ ) ENDIF INTEGER, INTENT(IN) :: fid INTEGER, INTENT(INOUT) :: ierr IMPLICIT NONE TYPE(domain) :: grid ENDIF RETURN IF ( DataSet .eq. 'RESTART' ) THEN CALL nl_get_io_form_restart( 1, io_form ) ELSE IF ( DataSet .eq. 'INPUT' ) THEN CALL nl_get_io_form_input( 1, io_form ) ELSE IF ( DataSet .eq. 'HISTORY' ) THEN CALL nl_get_io_form_history( 1, io_form ) ELSE IF ( DataSet .eq. 'BOUNDARY' ) THEN CALL nl_get_io_form_boundary( 1, io_form ) CALL nl_get_io_form_history( 1, io_form ) ENDIF IF ( stream .eq. restart_only ) THEN CALL nl_get_io_form_restart( 1, io_form ) ELSE IF ( stream .eq. input_only ) THEN CALL nl_get_io_form_input( 1, io_form ) ELSE IF ( stream .eq. history_only ) THEN CALL nl_get_io_form_history( 1, io_form ) ELSE IF ( stream .eq. boundary_only ) THEN CALL nl_get_io_form_boundary( 1, io_form ) ENDIF INTEGER, PARAMETER :: history_only = 1 INTEGER, PARAMETER :: HISTORY_ALARM = history_only ! - AUX HISTORY OUTPUT ENDIF #endif ! - AUX INPUT INPUT CALL wrf_debug ( 0 , message ) ENDIF #endif ELSE CALL WRF_ERROR_FATAL ( message ) END IF grid%nframes(stream) = 0 ENDIF grid%nframes(stream) = 0 ENDIF ENDIF IF ( use_package( io_form ) == IO_ESMF ) THEN IF ( ierr /= 0 ) RETURN ENDIF IF ( use_package( io_form ) == IO_ESMF ) THEN IF ( ierr /= 0 ) RETURN ENDIF IF ( .NOT. foundcoupling ) THEN IF ( use_package( io_form ) == IO_ESMF ) THEN IF ( rc /= ESMF_SUCCESS ) THEN ENDIF foundcoupling = .TRUE. ENDIF ENDIF IF ( .NOT. foundcoupling ) THEN IF ( use_package( io_form ) == IO_ESMF ) THEN IF ( rc /= ESMF_SUCCESS ) THEN ENDIF foundcoupling = .TRUE. ENDIF ENDIF %s/%smodule_io_domain_defs.inc%swoutputinputSUBROUTINE %s_%s%s%s ( fid , grid , config_flags , ierr ) IF ( config_flags%%io_form_%s%s%s .GT. 0 ) THEN END SUBROUTINE %s_%s%s%s history%dauxhistset_timekeeping_defs.inc INTEGER :: %s%s%s_interval , & %s%s%s_interval_d, & %s%s%s_interval_h, & %s%s%s_interval_m, & %s%s%s_interval_s INTEGER :: %s%s%s_begin , & %s%s%s_begin_y, & %s%s%s_begin_d, & %s%s%s_begin_h, & %s%s%s_begin_m, & %s%s%s_begin_s INTEGER :: %s%s%s_end , & %s%s%s_end_y, & %s%s%s_end_d, & %s%s%s_end_h, & %s%s%s_end_m, & %s%s%s_end_s set_timekeeping_alarms.incio_form_for_dataset.inc ELSE IF ( DataSet .eq. 'AUXINPUT%s' ) THEN CALL nl_get_io_form_auxinput%s( 1, io_form ) ELSE IF ( DataSet .eq. 'AUXHIST%s' ) THEN CALL nl_get_io_form_auxhist%s( 1, io_form ) io_form_for_stream.inc ELSE IF ( stream .eq. auxinput%s_only ) THEN ELSE IF ( stream .eq. auxhist%s_only ) THEN switches_and_alarms.incINTEGER, PARAMETER :: input_only = %d INTEGER, PARAMETER :: auxhist%d_only = %d INTEGER, PARAMETER :: AUXHIST%d_ALARM = %d INTEGER, PARAMETER :: auxinput%d_only = %d INTEGER, PARAMETER :: AUXINPUT%d_ALARM = %d check_auxstream_alarms.inc#ifndef DISABLE_ALARM_AUXHIST%d CALL med_hist_out ( grid , %d, config_flags ) #ifndef DISABLE_ALARM_AUXINPUT%d CALL med_auxinput%d_in ( grid , config_flags ) fine_stream_input.incELSE IF ( config_flags%%fine_input_stream .EQ. %d ) THEN med_auxinput_in.inc CASE ( AUXINPUT%d_ALARM ) input_auxinput%d, ierr ) med_hist_out_opens.inc CASE ( AUXHIST%d_ALARM ) output_auxhist%d, fname, n2, ierr ) med_hist_out_closes.inc grid%%auxhist%d_oid = 0 med_auxinput_in_closes.inc grid%%auxinput%d_oid = 0 med_last_solve_io.incmed_open_esmf_calls.incCALL nl_get_io_form_auxinput%d( 1, io_form ) stream = first_auxinput + %d input_auxinput%d, ierr ) CALL nl_get_io_form_auxhist%d( 1, io_form ) stream = first_auxhist + %d output_auxhist%d, fname, n2, ierr ) med_find_esmf_coupling.inc CALL nl_get_io_form_auxinput%d( 1, io_form ) CALL nl_get_io_form_auxhist%d( 1, io_form ) shutdown_closes.inc! %s%s%s INTERVAL IF ( MAX( %s%s%s_interval_d, & CALL nl_get_%s%s%s_begin ( grid%%id, %s%s%s_begin ) CALL nl_get_%s%s%s_begin_y( grid%%id, %s%s%s_begin_y ) CALL nl_get_%s%s%s_begin_d( grid%%id, %s%s%s_begin_d ) CALL nl_get_%s%s%s_begin_h( grid%%id, %s%s%s_begin_h ) CALL nl_get_%s%s%s_begin_m( grid%%id, %s%s%s_begin_m ) CALL nl_get_%s%s%s_begin_s( grid%%id, %s%s%s_begin_s ) IF ( %s%s%s_begin_m .EQ. 0 ) %s%s%s_begin_m = %s%s%s_begin IF ( MAX( %s%s%s_begin_y, %s%s%s_begin_d, & CALL nl_get_%s%s%s_end( grid%%id, %s%s%s_end ) CALL nl_get_%s%s%s_end_y( grid%%id, %s%s%s_end_y ) CALL nl_get_%s%s%s_end_d( grid%%id, %s%s%s_end_d ) CALL nl_get_%s%s%s_end_h( grid%%id, %s%s%s_end_h ) CALL nl_get_%s%s%s_end_m( grid%%id, %s%s%s_end_m ) CALL nl_get_%s%s%s_end_s( grid%%id, %s%s%s_end_s ) IF ( %s%s%s_end_m .EQ. 0 ) %s%s%s_end_m = %s%s%s_end IF ( MAX( %s%s%s_end_y, %s%s%s_end_d, & CALL WRFU_TimeIntervalSet( end_time , D=%s%s%s_end_d, & Registryio_boilerplate_temporary.incstate integer aux%s%d_oid - - - - - "" "" "" namelist,time_control1rconfig integer aux%s%d_interval_y %s %s 0 max_domainsrconfig integer aux%s%d_interval_d %s %s 0 rconfig integer aux%s%d_interval_h %s %s 0 rconfig integer aux%s%d_interval_m %s %s 0 rconfig integer aux%s%d_interval_s %s %s 0 rconfig integer aux%s%d_interval %s %s 0 rconfig integer aux%s%d_begin_y %s %s 0 rconfig integer aux%s%d_begin_d %s %s 0 rconfig integer aux%s%d_begin_h %s %s 0 rconfig integer aux%s%d_begin_m %s %s 0 rconfig integer aux%s%d_begin_s %s %s 0 rconfig integer aux%s%d_begin %s %s 0 rconfig integer aux%s%d_end_y %s %s 0 rconfig integer aux%s%d_end_d %s %s 0 rconfig integer aux%s%d_end_h %s %s 0 rconfig integer aux%s%d_end_m %s %s 0 rconfig integer aux%s%d_end_s %s %s 0 rconfig integer aux%s%d_end %s %s 0 rconfig integer io_form_aux%s%d %s %s 0 rconfig integer frames_per_aux%s%d %s %s 999999 TYPE(grid_config_rec_type), INTENT(IN ) :: config_flags ELSE ! default if nothing is set in SysDepInfo; use history ELSE ! if no match then do the old service representative schtick CALL wrf_error_fatal('internal error: please contact wrfhelp@ucar.edu: io_form_for_stream.inc -- invalid stream number') INTEGER, PARAMETER :: INPUT_ALARM = input_only ! not used WRITE ( message , FMT='(A,A,A,i3)' ) 'Input data processed for ' , & IF ( ( grid%id .EQ. 1 ) .OR. ( config_flags%fine_input_stream .EQ. 0 ) ) THEN CALL wrf_debug ( 0 , 'med_initialdata_input: calling input_input' ) CALL input_input ( fid , grid , config_flags , ierr ) CALL wrf_debug ( 100 , 'med_initialdata_input: back from input_input' ) WRITE( message , '("med_initialdata_input: bad fine_input_stream = ",I4)') config_flags%fine_input_stream RingInterval=couplingInterval, rc=rc ) RingInterval=couplingInterval, rc=rc ) IF ( interval .NE. padding_interval .AND. begin_time .EQ. zero_time ) THEN TYPE(grid_config_rec_type), INTENT(IN ) :: config_flags ELSE ! default if nothing is set in SysDepInfo; use history ELSE ! if no match then do the old service representative schtick CALL wrf_error_fatal('internal error: please contact wrfhelp@ucar.edu: io_form_for_stream.inc -- invalid stream number') INTEGER, PARAMETER :: INPUT_ALARM = input_only ! not used WRITE ( message , FMT='(A,A,A,i3)' ) 'Input data processed for ' , & IF ( ( grid%id .EQ. 1 ) .OR. ( config_flags%fine_input_stream .EQ. 0 ) ) THEN CALL wrf_debug ( 0 , 'med_initialdata_input: calling input_input' ) CALL input_input ( fid , grid , config_flags , ierr ) CALL wrf_debug ( 100 , 'med_initialdata_input: back from input_input' ) WRITE( message , '("med_initialdata_input: bad fine_input_stream = ",I4)') config_flags%fine_input_stream RingInterval=couplingInterval, rc=rc ) RingInterval=couplingInterval, rc=rc ) rconfig logical override_restart_timers namelist,time_control 1 .false. CALL %s_wrf( fid, grid, config_flags, %s%s%s_only, ierr ) ; IF( WRFU_AlarmIsRinging( grid%%alarms( AUXHIST%d_ALARM ), rc=rc ) ) THEN CALL WRFU_AlarmRingerOff( grid%%alarms( AUXHIST%d_ALARM ), rc=rc ) IF( WRFU_AlarmIsRinging( grid%%alarms( AUXINPUT%d_ALARM ), rc=rc ) ) THEN TRIM(config_flags%%auxinput%d_inname) , ' for domain ',grid%%id CALL WRFU_AlarmRingerOff( grid%%alarms( AUXINPUT%d_ALARM ), rc=rc ) CALL wrf_debug ( 0 , 'med_initialdata_input: calling input_auxinput%d' ) CALL input_auxinput%d ( fid , grid , config_flags , ierr ) CALL wrf_debug ( 100 , 'med_initialdata_input: back from input_auxinput%d' ) CALL open_aux_u( grid, config_flags, stream, AUXINPUT%d_ALARM, & config_flags%%auxinput%d_inname, grid%%auxinput%d_oid, & CALL input_auxinput%d ( grid%%auxinput%d_oid, grid , config_flags , ierr ) CALL open_hist_w( grid, config_flags, stream, AUXHIST%d_ALARM, & config_flags%%auxhist%d_outname, grid%%auxhist%d_oid, & CALL output_auxhist%d ( grid%%auxhist%d_oid, grid , config_flags , ierr ) IF ( grid%%nframes(stream) >= config_flags%%frames_per_auxhist%d ) THEN CALL close_dataset ( grid%%auxhist%d_oid , config_flags , n2 ) IF ( grid%%nframes(stream) >= config_flags%%frames_per_auxinput%d ) THEN CALL close_dataset ( grid%%auxinput%d_oid , config_flags , "DATASET=AUXINPUT%d" ) IF( WRFU_AlarmIsRinging( grid%%alarms( AUXHIST%d_ALARM ), rc=rc ) ) THEN CALL med_hist_out ( grid , AUXHIST%d_ALARM , config_flags ) CALL open_aux_u( grid, config_flags, stream, AUXINPUT%d_ALARM, & config_flags%%auxinput%d_inname, grid%%auxinput%d_oid, & CALL open_hist_w( grid, config_flags, stream, AUXHIST%d_ALARM, & config_flags%%auxhist%d_outname, grid%%auxhist%d_oid, & CALL ESMF_AlarmGet( head_grid%%alarms( AUXINPUT%d_ALARM ), & CALL wrf_error_fatal ( 'wrf_findCouplingInterval: ESMF_AlarmGet(AUXINPUT%d_ALARM) failed' ) CALL ESMF_AlarmGet( head_grid%%alarms( AUXHIST%d_ALARM ), & CALL wrf_error_fatal ( 'wrf_findCouplingInterval: ESMF_AlarmGet(AUXHIST%d_ALARM) failed' ) IF( grid%%auxhist%d_oid > 0 ) CALL close_dataset ( grid%%auxhist%d_oid, config_flags, 'DATASET=AUXHIST%d' ) CALL nl_get_%s%s%s_interval( grid%%id, %s%s%s_interval ) ! same as minutes CALL nl_get_%s%s%s_interval_d( grid%%id, %s%s%s_interval_d ) CALL nl_get_%s%s%s_interval_h( grid%%id, %s%s%s_interval_h ) CALL nl_get_%s%s%s_interval_m( grid%%id, %s%s%s_interval_m ) CALL nl_get_%s%s%s_interval_s( grid%%id, %s%s%s_interval_s ) IF ( %s%s%s_interval_m .EQ. 0 ) %s%s%s_interval_m = %s%s%s_interval %s%s%s_interval_h, %s%s%s_interval_m , %s%s%s_interval_s ) .GT. 0 ) THEN CALL WRFU_TimeIntervalSet( interval, D=%s%s%s_interval_d, & H=%s%s%s_interval_h, M=%s%s%s_interval_m, S=%s%s%s_interval_s, rc=rc ) 'WRFU_TimeIntervalSet(%s%s%s_interval) FAILED', & %s%s%s_begin_h, %s%s%s_begin_m , %s%s%s_begin_s ) .GT. 0 ) THEN CALL WRFU_TimeIntervalSet( begin_time , D=%s%s%s_begin_d, & H=%s%s%s_begin_h, M=%s%s%s_begin_m, S=%s%s%s_begin_s, rc=rc ) 'WRFU_TimeIntervalSet(%s%s%s_begin) FAILED', & %s%s%s_end_h, %s%s%s_end_m , %s%s%s_end_s ) .GT. 0 ) THEN H=%s%s%s_end_h, M=%s%s%s_end_m, S=%s%s%s_end_s, rc=rc ) 'WRFU_TimeIntervalSet(%s%s%s_end) FAILED', & CALL domain_alarm_create( grid, %s%s%s_ALARM, interval, begin_time, end_time ) CALL WRFU_AlarmRingerOn( grid%%alarms( %s%s%s_ALARM ), rc=rc ) 'WRFU_AlarmRingerOn(%s%s%s_ALARM) FAILED', & rconfig character aux%s%d_inname %s %s "aux%s%d_d_" rconfig character aux%s%d_outname %s %s "aux%s%d_d_" .itt_notify_tab0-00'5FWhy#4EVgx0ARctoptimization_report_versionoptimization_report    P2int 2w` SUfp_fnS"_fp auxS S  i2SY._fp 0i2_<_fp i2_Jy_fp auxS S   i2_~)q_fp auxS S C i2_{Li_fp auxS S f i2_yoa_fp auxS S  i2_yY_fp auxS S  i2_Q_fp auxS S  i2_HI}_fp auxS S  i2_Ai_fp kauxS kS k li2]# 9M_fp OauxS OS O8  Pi2_#A 11_fp 3auxS 3S 3[  4i2d ! _fpauxSVS_} i2\  _fpdirSauxSVS_ i2\j2XXdo13#26#S7#S8#S9# S:#(S;#0S<#8S=#@S@#HSA#PSB#XSD#`F#h%H#p2I#t2J#x*M#<N#XO#CQ#LY#c[#n\#y]#%^#_#`#2b#o5XQ+\5s~\/XX2_X.2_2_2_X2_X2_X2_X2_X2_X}2_Xi2_XM2_X12_X2_X2_X2w0_fpUdirSauxSSS_ i2j2X w_fpUdirSauxS^SS i2\j2Pd wP_fpUauxSS_} i2]1A w1_fpU 3auxS 3S 3[  4i2M wM_fpU OauxS OS O8  Pi2 ii_fpU kauxS kS k li2 }P}_fpU auxS S  i2 _fpU auxS S  i2 _fpU auxS S  i2 o_fpU auxS S  i2 L_fpU auxS S f i2 )_fpU auxS S C i2 `_fpU auxS S   i2 @_fpU auxS S  i2 P_fpU i2 .p._fpU 0i2!V2w Xfp_V YS Z [fnS \auxS \S^ \ ]S ^S _i2 _j2XX /usr/include/bits/types/usr/include/bits/pe/intel/compilers_and_libraries_2020.4.304/linux/compiler/include/iccgen_streams.cҎFILE.hɏstruct_FILE.hɏ types.hɏDstddef.h޵     Kc z7 sAr#~<CCC;CCC o4S ~s'xW~0Kcw Di47 ~s7 ~0Kcw?/Kcw CCCCCCCCPkkkkz cC }Kcw CCCCCCCCPkkkkz cC }Kcw CC_Cscs{ } Kcw CPWWWWC y  cPWWWCWCWC v }Kcw CCCCPWWW{ cCC }Kcw PWWcWz }Kcw PWWcWz }Kcw PWWWWC y }Kcw PWWcWC y }Kcw PWW | }Kcw PWC[WcWC w  0WC[WcWC w |Kcw PCWCWCCWCCCCCWCWCCWCCC i |Kcw $~}0   ~P'~_GoooCoCC DCoCoCCCCCoCoCCCCCDoCoCC   ~ m  ''m#~(CCC;CwCCo4S ~k'xK  }  Xssssssssssssssssi47 ~g7   "CCCCCCCC0[[[[z CCC  "CCCCCCCC0[[[[z CCC  2CC_C .; : I' @@? ; : I4; : I4; : I1Y W X ;: I 4;: I 4;: I 4;: I 4;: I ; : I4; : II$ > ; : I; :  ; : 8I< I !/ I !/.;: < I' @? I.; : < I' @? ; : I.; : 1@.;: 1@;: I .;: 1!.;: I@@? x `AAGAAAy \ HHHE  AHHHE   E E sHHE E E +E 9E  E  E E E E E AA 0BBB B(A0D@HXPGXX`GhXpGxXGXI@Dpw@\pw@\pw@hHXPGXX`GhXpGxXGXGXI@DpuxXI@Dpw@\pw@hHXPGXX`GhXpGxXGXGXI@DpuxXI@Dpw@\pw@0A(B BBBTBBB B(A0A8DP8A0A(B BBBDPBBB B(A04(B BBB4BBA BB4BBA BBDBBB B(A0(B BBB4PBBA 9BB4BBA BB4BBA wBB4BBA wBB4BBA yBB4BBA |BB4`BBA HBB,@BBA oBB4PBBA :BB4pBBA WBB\AG|AAsp[M[IHHEIA/lfs/h1/ops/prod/packages/hmon.v3.2.0/sorc/hmon_hwrf_v3.9.1.fd/toolsgen_streams.cIntel(R) C Intel(R) 64 Compiler for applications running on Intel(R) 64, Version 19.1.3.304 Build 20200925_000000 -I/opt/cray/pe/mpich/8.1.7/ofi/intel/19.0/include -march=core-avx2 -mtune=core-avx2 -D__CRAY_X86_ROME -D__CRAYXT_COMPUTE_LINUX_TARGET -DIWORDSIZE=4 -DMAX_HISTORY=25 -DNMM_CORE=1 -c -ggen_streamschardirnameFILE_IO_FILE_flags_IO_read_ptr_IO_read_end_IO_read_base_IO_write_base_IO_write_ptr_IO_write_end_IO_buf_base_IO_buf_end_IO_save_base_IO_backup_base_IO_save_end_markers_IO_marker_chain_fileno_flags2_old_offset__off_tlong_cur_columnunsigned short_vtable_offset_shortbuf_lock_IO_lock_tvoid__off64_t_codecvt_IO_codecvt_wide_data_IO_wide_data_freeres_list_freeres_buf__pad5size_tunsigned long_mode_unused2fnamegen_shutdown_closesstreamtypestreamnogen_med_find_esmf_couplinggen_med_open_esmf_callsgen_med_last_solve_iogen_med_auxinput_in_closesgen_med_hist_out_closesgen_med_hist_out_opensgen_med_auxinput_ingen_fine_stream_inputgen_check_auxstream_alarmsgen_switches_and_alarmsgen_io_form_for_streamgen_io_form_for_datasetgen_set_timekeeping_defsgen_io_domain_defsgen_set_timekeeping_alarmsgen_io_boilerplatehowsetmaxdx `AAGAAAy \ HHHE  AHHHE   E E sHHE E E +E 9E  E  E E E E E AA 0BBB B(A0D@HXPGXX`GhXpGxXGXI@Dpw@\pw@\pw@hHXPGXX`GhXpGxXGXGXI@DpuxXI@Dpw@\pw@hHXPGXX`GhXpGxXGXGXI@DpuxXI@Dpw@\pw@0A(B BBBTBBB B(A0A8DP8A0A(B BBBD\PBBB B(A04(B BBB4BBA BB4BBA BBDBBB B(A0(B BBB4\PBBA 9BB4BBA BB4BBA wBB4BBA wBB4<BBA yBB4tBBA |BB4`BBA HBB,@BBA oBB4PBBA :BB4LpBBA WBB\AG|AAsp[M[IHHEIA.shstrtab.strtab.symtab.data.bss.text.rodata.str1.4.rodata.str1.32.debug_opt_report.note.GNU-stack.debug_info.debug_line.debug_abbrev.debug_frame.debug_str.eh_frame.rela.text.rela.debug_opt_report.rela.debug_info.rela.debug_line.rela.debug_frame.rela.eh_frame9 C O V] f mr {         -2  :? 0GL T_d Hlt \   l t    + 5 D IU h q       &>E |    ( L p  5= RZ ow  $ H l  % :B W_  t    B L X D_f o Dv{    `  `  27 ?D LQ Y^ fk @sx p    x    + @;@ HM <U]   @  @  H x      $ ) <1 6 p> C K ` r z X               : D P W ^ g n s |             8 ) h6 > K t            H  ) 1 @ ; C M U  _ d `l q ly  t  <    `    `       ( - 5 R ~           @      @ $ .6  @H  RZ  dr           7O Ya @ ks       L   L % .F^ dhp `z        ( /4 =Um dw         " )0 9 @E Nf~  @   , P  * 6 4=D M 4TY bz  ` \    L$ - L49 BZr d| d         #/ 6> `HP ]e 4ot |    p  p  ,A  IQ [` 0hp  z   d          `%* 2: `DI @QV L^c hkp tx      ( 6E        ` '1  FP eo  @   .: `en |v~       0 < x  ,6 KU ,jt h   @* :F qz <  p      L# 8B Wa v , d  *6 FR @}    4  `           `$)  19 IN  V[ 0 ch X p    d                 ( 3 8  @ H \Z b  w |           ! !! (! /! l! ! ! !! !! (!! L!! p!" "" ."6" G"O" `"h" $y"" H"" l"" "" "" "" ##  (#V# f# p# |# ## #  ##  ## H ## t ##  ##  $$  $$ 8 $)$ 7$?$ xJ$R$ ]$e$ p$x$  $$ @$$ l $$  $$  $$  $$  $$ @ $$ p % %  %%  %$% ,%9% G%O% XZ%b% m%u% %%  %% %% %% 8%% D%% t%% & & &+& 8&@& 8M&Z& hg&o& |&& && && @ && &&  '' '' ')' 1'D' <N'V'  `'h' `r'w' '' ` '' ''  '' '' $'' @(( (( ( ( @((8( B(J(  T(\(  f(n(  x(( ,(( (( 4(( X(( (( @ ))  )) ')/) <)t) d~)) `)) )) ))  )* d**  *(* 2*:* D*I* `Q*V* ^** ** @** ** ** ** *$+ .+6+ `@+E+ M++ ++ d++ ++ ++ ,, ,, ',,, 4,9, A,^, h,m, u,, ,, `,, ,, 4,, L,, h,- p-!- +-0- 8-@-  J-O-  W-\- d-l- v-{- -- -- --  -- (-- -- L-- -- ` -- . . `.. !.&. ..3. ;.@. H.y. ~.  .  .. ...  .. . / < //  &/ t ,/  5/B/ N/ t T/  ]/i/  u/ t {/  //  / t /  //  / t /  //  !/ t /  // L!/ t /  00 x!0 t 0  '0/0 !;0 t A0  H0P0 !\0 t b0  i0q0 !}0 t 0  00 ("0 t 0  00 T"0 t 0  00 "0 t 0  00 "1 t 1  11 ""1 t (1  /171 "C1 t I1  P1X1 $#d1 t j1  q1y1 L#1 t 1  11 t#1 t 1  11 #1 t 1  11 #1 t 1  1620@P`~pB_     KZi z0@nP`@p$ ;!`!5#($8%"&& @'04(@(Pp)`*p* +++Z,-.. 2  E S . A ~E ~Ld w O i t0^A~s i tj i tY i' t=Jo i{ t; i t  i# t9 k iw t  i t i t96k iw tB i t" i/ t[ g s }            & 6% C3 WA ^O f] nl {    r     $ @ F! L- z8 ? T _ f u   + 2 U U } }    3 7 V Z y }    $ $ : : U U( m, mK O m q      ` i t1 h iu t `! i t #' i3 tT $ i t % i t &, i8 tS ' i t ( i t `)( i4 tO )| i t * i t +$ i0 tKp+x i t+-   p., 8 O^ il tx  P2  ` \ ``! # $ %\ `& ' ( `)< @)t x* + p+ +L P- p. ```!#$%`&'(`)@)x*+p++P-p. @H ! & P2,2p8#;2\ K`z]umuy+0ٞf8 &H 0'`  *