| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| character(len=:), | public, | allocatable | :: | organization | |||
| character(len=:), | public, | allocatable | :: | api_key | |||
| character(len=:), | public, | allocatable | :: | file_name | |||
| character(len=14), | public | :: | api_key_env | = | 'OPENAI_API_KEY' | ||
| character(len=10), | public | :: | organization_env | = | 'OPENAI_ORG' | ||
| character(len=:), | public, | allocatable | :: | url | |||
| character(len=9), | public | :: | size | = | '1024x1024' | ||
| character(len=1000), | public | :: | prompt | ||||
| character(len=4), | public | :: | response_format | = | 'url' | ||
| integer, | public | :: | n | = | 1 | ||
| character(len=:), | public, | allocatable | :: | user_name | |||
| character(len=1024), | public, | allocatable | :: | assistant_response(:) |
| procedure, public :: load_base_data | |
| procedure, public :: print_api_key | |
| procedure, public :: print_organization | |
| procedure, public :: print_file_name | |
| procedure, public :: set_file_name | |
| procedure, public :: set_base_data | |
| procedure, public :: create => create_image | |
| procedure, private :: deallocate_url | |
| procedure, private :: deallocate_user_name | |
| procedure, private :: deallocate_assistant_response | |
| procedure, public :: finalize => deallocate_ImageGeneration | |
| procedure, private :: load_url | |
| procedure, private :: load_size | |
| procedure, private :: load_response_format | |
| procedure, private :: load_n | |
| procedure, private :: load_user_name | |
| procedure, private :: load => load_ImageGeneration_data | |
| procedure, private :: print_url | |
| procedure, private :: print_size | |
| procedure, public :: print_prompt | |
| procedure, private :: print_response_format | |
| procedure, private :: print_n | |
| procedure, private :: print_user_name | |
| procedure, public :: print_assistant_response | |
| procedure, private :: set_url | |
| procedure, private :: set_size | |
| procedure, private :: set_prompt | |
| procedure, private :: set_response_format | |
| procedure, private :: set_n | |
| procedure, private :: set_user_name | |
| procedure, private :: set_assistant_response | |
| procedure, public :: set => set_ImageGeneration_data |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this | |||
| character(len=*), | intent(in) | :: | prompt | |||
| integer, | intent(in), | optional | :: | n | ||
| character(len=*), | intent(in), | optional | :: | size | ||
| character(len=*), | intent(in), | optional | :: | response_format | ||
| character(len=*), | intent(in), | optional | :: | user_name |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(in) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(in) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(in) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(in) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(in) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(in) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(in) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this | |||
| character(len=*), | intent(in) | :: | url |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this | |||
| character(len=*), | intent(in) | :: | size |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this | |||
| character(len=*), | intent(in) | :: | prompt |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this | |||
| character(len=*), | intent(in) | :: | response_format |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this | |||
| integer, | intent(in) | :: | n |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this | |||
| character(len=*), | intent(in) | :: | user_name |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this | |||
| character(len=*), | intent(in) | :: | assistant_response | |||
| integer, | intent(in) | :: | i |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this | |||
| character(len=*), | intent(in), | optional | :: | file_name | ||
| character(len=*), | intent(in), | optional | :: | url | ||
| character(len=*), | intent(in), | optional | :: | size | ||
| character(len=*), | intent(in), | optional | :: | prompt | ||
| character(len=*), | intent(in), | optional | :: | response_format | ||
| integer, | intent(in), | optional | :: | n | ||
| character(len=*), | intent(in), | optional | :: | user_name |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this | |||
| character(len=*), | intent(in) | :: | file_name |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(ImageGeneration), | intent(inout) | :: | this |