tests/testthat/test_profile.R

In vjcitn/terraClientR: R Package Client for FireCloud

# Automatically generated by openapi-generator (https://openapi-generator.tech)
# Please update as you see appropriate

context("Test Profile")

model.instance <- Profile$new()

test_that("firstName", {
  # tests for the property `firstName` (character)
  # User&#39;s first name

  # uncomment below to test the property 
  #expect_equal(model.instance$`firstName`, "EXPECTED_RESULT")
})

test_that("lastName", {
  # tests for the property `lastName` (character)
  # User&#39;s last name

  # uncomment below to test the property 
  #expect_equal(model.instance$`lastName`, "EXPECTED_RESULT")
})

test_that("title", {
  # tests for the property `title` (character)
  # User&#39;s title

  # uncomment below to test the property 
  #expect_equal(model.instance$`title`, "EXPECTED_RESULT")
})

test_that("contactEmail", {
  # tests for the property `contactEmail` (character)
  # User&#39;s contact email (if different from account email)

  # uncomment below to test the property 
  #expect_equal(model.instance$`contactEmail`, "EXPECTED_RESULT")
})

test_that("institute", {
  # tests for the property `institute` (character)
  # User&#39;s home institution

  # uncomment below to test the property 
  #expect_equal(model.instance$`institute`, "EXPECTED_RESULT")
})

test_that("institutionalProgram", {
  # tests for the property `institutionalProgram` (character)
  # User&#39;s institutional program

  # uncomment below to test the property 
  #expect_equal(model.instance$`institutionalProgram`, "EXPECTED_RESULT")
})

test_that("programLocationCity", {
  # tests for the property `programLocationCity` (character)
  # User&#39;s program location city

  # uncomment below to test the property 
  #expect_equal(model.instance$`programLocationCity`, "EXPECTED_RESULT")
})

test_that("programLocationState", {
  # tests for the property `programLocationState` (character)
  # User&#39;s program location state

  # uncomment below to test the property 
  #expect_equal(model.instance$`programLocationState`, "EXPECTED_RESULT")
})

test_that("programLocationCountry", {
  # tests for the property `programLocationCountry` (character)
  # User&#39;s program location country

  # uncomment below to test the property 
  #expect_equal(model.instance$`programLocationCountry`, "EXPECTED_RESULT")
})

test_that("pi", {
  # tests for the property `pi` (character)
  # Principal Investigator

  # uncomment below to test the property 
  #expect_equal(model.instance$`pi`, "EXPECTED_RESULT")
})

test_that("nonProfitStatus", {
  # tests for the property `nonProfitStatus` (character)
  # User&#39;s program non-profit status

  # uncomment below to test the property 
  #expect_equal(model.instance$`nonProfitStatus`, "EXPECTED_RESULT")
})