checked_int32 Function

public function checked_int32(i) result(i32)

Receives a default kind integer, checks its bounds (Fortran signed int), fixes it if needed, and returns an int32.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: i

Return Value integer(kind=int32)


Called by

proc~~checked_int32~~CalledByGraph proc~checked_int32 checked_int32 proc~delta_time MIDI_file%delta_time proc~delta_time->proc~checked_int32 proc~new MIDI_file%new proc~new->proc~checked_int32 proc~set_tempo MIDI_file%set_tempo proc~new->proc~set_tempo proc~end_of_track MIDI_file%end_of_track proc~new->proc~end_of_track proc~set_time_signature MIDI_file%set_time_signature proc~new->proc~set_time_signature proc~copyright_notice MIDI_file%copyright_notice proc~new->proc~copyright_notice proc~text_event MIDI_file%text_event proc~new->proc~text_event proc~track_header MIDI_file%track_header proc~new->proc~track_header proc~play_broken_chord MIDI_file%play_broken_chord proc~play_broken_chord->proc~checked_int32 proc~play_broken_chord->proc~delta_time proc~play_chord MIDI_file%play_chord proc~play_chord->proc~checked_int32 proc~play_chord->proc~delta_time proc~play_note MIDI_file%play_note proc~play_note->proc~checked_int32 proc~play_note->proc~delta_time proc~set_tempo->proc~checked_int32 proc~set_tempo->proc~delta_time proc~control_change MIDI_file%Control_Change proc~control_change->proc~delta_time proc~end_of_track->proc~delta_time proc~pitch_bend MIDI_file%Pitch_Bend proc~pitch_bend->proc~delta_time proc~program_change MIDI_file%Program_Change proc~program_change->proc~delta_time proc~set_time_signature->proc~delta_time proc~write_string MIDI_file%write_string proc~write_string->proc~delta_time program~blues blues program~blues->proc~delta_time program~blues->proc~new program~blues->proc~play_chord program~blues->proc~control_change program~blues->proc~end_of_track program~blues->proc~program_change program~blues->proc~track_header program~canon canon program~canon->proc~new program~canon->proc~play_note program~canon->proc~control_change program~canon->proc~end_of_track program~canon->proc~program_change program~canon->proc~track_header program~circle_of_fifths circle_of_fifths program~circle_of_fifths->proc~new program~circle_of_fifths->proc~play_chord program~circle_of_fifths->proc~control_change program~circle_of_fifths->proc~end_of_track program~circle_of_fifths->proc~program_change program~circle_of_fifths->proc~track_header program~la_folia la_folia program~la_folia->proc~new program~la_folia->proc~play_broken_chord program~la_folia->proc~play_chord program~la_folia->proc~control_change program~la_folia->proc~end_of_track program~la_folia->proc~program_change program~la_folia->proc~track_header program~motifs motifs program~motifs->proc~new program~motifs->proc~play_broken_chord program~motifs->proc~play_chord program~motifs->proc~play_note program~motifs->proc~control_change program~motifs->proc~end_of_track program~motifs->proc~program_change program~motifs->proc~track_header program~third_kind third_kind program~third_kind->proc~new program~third_kind->proc~play_note program~third_kind->proc~end_of_track program~third_kind->proc~program_change program~third_kind->proc~track_header proc~copyright_notice->proc~write_string proc~cue_point MIDI_file%cue_point proc~cue_point->proc~write_string proc~instrument_name MIDI_file%instrument_name proc~instrument_name->proc~write_string proc~lyric MIDI_file%lyric proc~lyric->proc~write_string proc~marker MIDI_file%marker proc~marker->proc~write_string proc~sequence_track_name MIDI_file%sequence_track_name proc~sequence_track_name->proc~write_string proc~text_event->proc~write_string proc~track_header->proc~sequence_track_name proc~track_header->proc~text_event