b64_decode_up Interface

private interface b64_decode_up

Decode unlimited polymorphic variable from base64.

This is an interface for decoding both scalar and array.

Usage

For a practical example see the autotest procedure.

Scalar decoding

real(R8P):: decoded ! scalar to be decoded
...
call b64_decode_up(code='AAAAAAAA8D8=',up=decoded)

Array decoding

integer(I8P):: decoded(1:4) ! array to be decoded
...
call b64_decode_up(code='FwAAAAAAAABEAQAAAAAAABBwhAEAAAAAAgAAAAAAAAA=',up=decoded)

Calls

interface~~b64_decode_up~~CallsGraph interface~b64_decode_up b64_decode_up interface~b64_decode_up->interface~b64_decode_up proc~b64_decode_up_a b64_decode_up_a interface~b64_decode_up->proc~b64_decode_up_a proc~b64_decode_r4_a b64_decode_R4_a proc~b64_decode_up_a->proc~b64_decode_r4_a proc~b64_decode_i2_a b64_decode_I2_a proc~b64_decode_up_a->proc~b64_decode_i2_a proc~b64_decode_i8_a b64_decode_I8_a proc~b64_decode_up_a->proc~b64_decode_i8_a proc~b64_decode_r8_a b64_decode_R8_a proc~b64_decode_up_a->proc~b64_decode_r8_a proc~b64_decode_string_a b64_decode_string_a proc~b64_decode_up_a->proc~b64_decode_string_a proc~b64_decode_i4_a b64_decode_I4_a proc~b64_decode_up_a->proc~b64_decode_i4_a proc~b64_decode_i1_a b64_decode_I1_a proc~b64_decode_up_a->proc~b64_decode_i1_a proc~decode_bits decode_bits proc~b64_decode_r4_a->proc~decode_bits proc~b64_decode_i2_a->proc~decode_bits proc~b64_decode_i8_a->proc~decode_bits proc~b64_decode_r8_a->proc~decode_bits proc~b64_decode_string_a->proc~decode_bits byte_size byte_size proc~b64_decode_string_a->byte_size proc~b64_decode_i4_a->proc~decode_bits proc~b64_decode_i1_a->proc~decode_bits
Help


Module Procedures

private interface b64_decode_up()

Decode unlimited polymorphic variable from base64.

Arguments

None

private subroutine b64_decode_up_a(code, up)

Decode an unlimited polymorphic array from base64.

Arguments

Type IntentOptional AttributesName
character(len=*), intent(in) :: code

Encoded array.

class(*), intent(out) :: up(1:)

Unlimited polymorphic variable to be decoded.