test_Translation Program

Uses

  • program~~test_translation~~UsesGraph program~test_translation test_Translation module~foropenai foropenai program~test_translation->module~foropenai module~foropenai_base foropenai_base module~foropenai->module~foropenai_base module~foropenai_chatcompletion foropenai_ChatCompletion module~foropenai->module~foropenai_chatcompletion module~foropenai_imagegeneration foropenai_ImageGeneration module~foropenai->module~foropenai_imagegeneration module~foropenai_transcription foropenai_Transcription module~foropenai->module~foropenai_transcription module~foropenai_translation foropenai_Translation module~foropenai->module~foropenai_translation module~foropenai_chatcompletion->module~foropenai_base module~foropenai_imagegeneration->module~foropenai_base module~foropenai_transcription->module~foropenai_base module~foropenai_translation->module~foropenai_base

Calls

program~~test_translation~~CallsGraph program~test_translation test_Translation proc~create_translation foropenai_Translation::Translation%create_translation program~test_translation->proc~create_translation proc~deallocate_translation foropenai_Translation::Translation%deallocate_Translation program~test_translation->proc~deallocate_translation proc~print_assistant_response~4 foropenai_Translation::Translation%print_assistant_response program~test_translation->proc~print_assistant_response~4 proc~print_file~2 foropenai_Translation::Translation%print_file program~test_translation->proc~print_file~2 proc~set_base_data foropenai_base::openai%set_base_data program~test_translation->proc~set_base_data proc~set_translation_data foropenai_Translation::Translation%set_Translation_data program~test_translation->proc~set_translation_data deserialize deserialize proc~create_translation->deserialize destroy destroy proc~create_translation->destroy get get proc~create_translation->get initialize initialize proc~create_translation->initialize pair_type pair_type proc~create_translation->pair_type proc~set_file~2 foropenai_Translation::Translation%set_file proc~create_translation->proc~set_file~2 proc~set_prompt~3 foropenai_Translation::Translation%set_prompt proc~create_translation->proc~set_prompt~3 request request proc~create_translation->request proc~deallocate_assistant_response~3 foropenai_Translation::Translation%deallocate_assistant_response proc~deallocate_translation->proc~deallocate_assistant_response~3 proc~deallocate_file~2 foropenai_Translation::Translation%deallocate_file proc~deallocate_translation->proc~deallocate_file~2 proc~deallocate_model~3 foropenai_Translation::Translation%deallocate_model proc~deallocate_translation->proc~deallocate_model~3 proc~deallocate_prompt~2 foropenai_Translation::Translation%deallocate_prompt proc~deallocate_translation->proc~deallocate_prompt~2 proc~deallocate_url~4 foropenai_Translation::Translation%deallocate_url proc~deallocate_translation->proc~deallocate_url~4 colorize colorize proc~print_assistant_response~4->colorize proc~print_file~2->colorize proc~load_api_key foropenai_base::openai%load_api_key proc~set_base_data->proc~load_api_key proc~load_organization foropenai_base::openai%load_organization proc~set_base_data->proc~load_organization proc~set_api_key foropenai_base::openai%set_api_key proc~set_base_data->proc~set_api_key proc~set_api_key_env foropenai_base::openai%set_api_key_env proc~set_base_data->proc~set_api_key_env proc~set_file_name foropenai_base::openai%set_file_name proc~set_base_data->proc~set_file_name proc~set_organization foropenai_base::openai%set_organization proc~set_base_data->proc~set_organization proc~set_organization_env foropenai_base::openai%set_organization_env proc~set_base_data->proc~set_organization_env proc~load_translation_data foropenai_Translation::Translation%load_Translation_data proc~set_translation_data->proc~load_translation_data proc~set_translation_data->proc~set_file_name proc~set_model~3 foropenai_Translation::Translation%set_model proc~set_translation_data->proc~set_model~3 proc~set_response_format~3 foropenai_Translation::Translation%set_response_format proc~set_translation_data->proc~set_response_format~3 proc~set_temperature~3 foropenai_Translation::Translation%set_temperature proc~set_translation_data->proc~set_temperature~3 proc~set_url~4 foropenai_Translation::Translation%set_url proc~set_translation_data->proc~set_url~4 proc~load_api_key->destroy proc~load_api_key->get proc~load_api_key->initialize proc~load_api_key->proc~set_file_name load_file load_file proc~load_api_key->load_file proc~load_organization->destroy proc~load_organization->get proc~load_organization->initialize proc~load_organization->proc~set_file_name proc~load_organization->load_file proc~load_translation_data->proc~set_file_name proc~load_model~3 foropenai_Translation::Translation%load_model proc~load_translation_data->proc~load_model~3 proc~load_response_format~3 foropenai_Translation::Translation%load_response_format proc~load_translation_data->proc~load_response_format~3 proc~load_temperature~3 foropenai_Translation::Translation%load_temperature proc~load_translation_data->proc~load_temperature~3 proc~load_url~4 foropenai_Translation::Translation%load_url proc~load_translation_data->proc~load_url~4 proc~set_api_key_env->proc~set_api_key proc~set_organization_env->proc~set_organization proc~load_model~3->destroy proc~load_model~3->get proc~load_model~3->initialize proc~load_model~3->load_file proc~load_response_format~3->destroy proc~load_response_format~3->get proc~load_response_format~3->initialize proc~load_response_format~3->load_file proc~load_temperature~3->destroy proc~load_temperature~3->get proc~load_temperature~3->initialize proc~load_temperature~3->load_file proc~load_url~4->destroy proc~load_url~4->get proc~load_url~4->initialize proc~load_url~4->load_file

Variables

Type Attributes Name Initial
type(Translation) :: trs

Source Code

program test_Translation

   use foropenai, only: Translation

   implicit none

   type(Translation) :: trs

   call trs%set_base_data(file_name='foropenai.json')
   call trs%set(file_name='foropenai.json')

   call trs%create(file='test/audio_de.mp3')
   call trs%print_file()
   call trs%print_assistant_response()

   call trs%finalize()

end program test_Translation