-- S.MG, 2018 with Raw_Types; with RSA_OAEP; package Test_RSA_OAEP is procedure test_char_array; procedure test_oaep; -- test oaep only procedure test_rsa( E_Len : in Positive; D_Len : in Positive; Filename : in String);-- test rsa only procedure test_rsa_oaep; -- test rsa+oaep procedure PrintOctets( O: in Raw_Types.Octets; Title: in String ); end Test_RSA_OAEP;