foropenai_Translation

Uses

- foropenai_base
Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.
Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Used by

Help

Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.
Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Derived Types

type, public, extends(openai) :: Translation

Components

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=:),	public,	allocatable	::	model
character(len=:),	public,	allocatable	::	prompt
character(len=:),	public,	allocatable	::	file
character(len=:),	public,	allocatable	::	assistant_response
character(len=4),	public		::	response_format	=	'json'
real,	public		::	temperature	=	0.0

Type-Bound Procedures

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_translation
procedure, private :: deallocate_url
procedure, private :: deallocate_model
procedure, private :: deallocate_prompt
procedure, private :: deallocate_file
procedure, private :: deallocate_assistant_response
procedure, public :: finalize => deallocate_Translation
procedure, private :: load => load_Translation_data
procedure, private :: load_url
procedure, private :: load_model
procedure, private :: load_temperature
procedure, private :: load_response_format
procedure, private :: print_model
procedure, private :: print_temperature
procedure, private :: print_response_format
procedure, private :: print_prompt
procedure, public :: print_assistant_response
procedure, public :: print_file
procedure, private :: set_assistant_response
procedure, private :: set_prompt
procedure, private :: set_url
procedure, private :: set_model
procedure, private :: set_temperature
procedure, private :: set_response_format
procedure, private :: set_file
procedure, public :: set => set_Translation_data

Subroutines

private impure elemental subroutine print_file(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private impure elemental subroutine print_assistant_response(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private pure elemental subroutine set_assistant_response(this, assistant_response)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this
character(len=*),	intent(in)			::	assistant_response

private impure elemental subroutine print_prompt(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private pure elemental subroutine set_prompt(this, prompt)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this
character(len=*),	intent(in)			::	prompt

private pure elemental subroutine deallocate_Translation(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private pure elemental subroutine deallocate_url(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private pure elemental subroutine deallocate_model(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private pure elemental subroutine deallocate_prompt(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private pure elemental subroutine deallocate_file(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private pure elemental subroutine deallocate_assistant_response(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private pure elemental subroutine set_response_format(this, response_format)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this
character(len=*),	intent(in)			::	response_format

private impure elemental subroutine load_response_format(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private impure elemental subroutine print_response_format(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private pure elemental subroutine set_file(this, file)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this
character(len=*),	intent(in)			::	file

private impure elemental subroutine set_Translation_data(this, file_name, url, model, temperature, response_format)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional		Name
class(Translation),	intent(inout)		::	this
character(len=*),	intent(in),	optional	::	file_name
character(len=*),	intent(in),	optional	::	url
character(len=*),	intent(in),	optional	::	model
real,	intent(in),	optional	::	temperature
character(len=*),	intent(in),	optional	::	response_format

private impure elemental subroutine load_Translation_data(this, file_name)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this
character(len=*),	intent(in)			::	file_name

private impure elemental subroutine load_temperature(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private impure elemental subroutine load_url(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private impure elemental subroutine load_model(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private pure elemental subroutine set_temperature(this, temperature)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this
real,	intent(in)			::	temperature

private pure elemental subroutine set_url(this, url)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this
character(len=*),	intent(in)			::	url

private pure elemental subroutine set_model(this, model)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this
character(len=*),	intent(in)			::	model

private impure elemental subroutine create_translation(this, file, prompt)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional		Name
class(Translation),	intent(inout)		::	this
character(len=*),	intent(in)		::	file
character(len=*),	intent(in),	optional	::	prompt

private impure elemental subroutine print_model(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

private impure elemental subroutine print_temperature(this)

Author: Seyed Ali Ghasemi

Arguments

Type	Intent	Optional	Attributes		Name
class(Translation),	intent(inout)			::	this

foropenai_Translation Module

Contents

Derived Types

Subroutines

Uses

Used by

Derived Types

type, public, extends(openai) :: Translation

Components

Type-Bound Procedures

Subroutines

private impure elemental subroutine print_file(this)

Arguments

private impure elemental subroutine print_assistant_response(this)

Arguments

private pure elemental subroutine set_assistant_response(this, assistant_response)

Arguments

private impure elemental subroutine print_prompt(this)

Arguments

private pure elemental subroutine set_prompt(this, prompt)

Arguments

private pure elemental subroutine deallocate_Translation(this)

Arguments

private pure elemental subroutine deallocate_url(this)

Arguments

private pure elemental subroutine deallocate_model(this)

Arguments

private pure elemental subroutine deallocate_prompt(this)

Arguments

private pure elemental subroutine deallocate_file(this)

Arguments

private pure elemental subroutine deallocate_assistant_response(this)

Arguments

private pure elemental subroutine set_response_format(this, response_format)

Arguments

private impure elemental subroutine load_response_format(this)

Arguments

private impure elemental subroutine print_response_format(this)

Arguments

private pure elemental subroutine set_file(this, file)

Arguments

private impure elemental subroutine set_Translation_data(this, file_name, url, model, temperature, response_format)

Arguments

private impure elemental subroutine load_Translation_data(this, file_name)

Arguments

private impure elemental subroutine load_temperature(this)

Arguments

private impure elemental subroutine load_url(this)

Arguments

private impure elemental subroutine load_model(this)

Arguments

private pure elemental subroutine set_temperature(this, temperature)

Arguments

private pure elemental subroutine set_url(this, url)

Arguments

private pure elemental subroutine set_model(this, model)

Arguments

private impure elemental subroutine create_translation(this, file, prompt)

Arguments

private impure elemental subroutine print_model(this)

Arguments

private impure elemental subroutine print_temperature(this)

Arguments