title: Program For Surface Area Of Octahedron
signature: program_for_surface_area_of_octahedron <- function(side) {
test_code: 
  
  
  # SOLUTION CODE
  # ============================================
  PLACEHOLDER_CODE_BODY
  
  # TESTING CODE 
  # ============================================
  validate_solution <- function(actual, expected) {
      abs(actual - expected) < 1e-09
  }
  
  driver <- function(side, expected){
      if (validate_solution(PLACEHOLDER_FN_NAME(side), expected)){
          "PASSED"
      } else{
          "FAILED"
      }
  }
  
  main <- function() {
      cat(sprintf("TEST-0...%s\n",driver(
          1449.255716877097, 
          7275798.574924052
      )))
  
      cat(sprintf("TEST-1...%s\n",driver(
          -8772.104874265995, 
          266562009.34357828
      )))
  
      cat(sprintf("TEST-2...%s\n",driver(
          2948.419328234334, 
          30114046.875937637
      )))
  
      cat(sprintf("TEST-3...%s\n",driver(
          -1184.220109553511, 
          4857977.358664159
      )))
  
      cat(sprintf("TEST-4...%s\n",driver(
          7422.825800698956, 
          190866258.51879707
      )))
  
      cat(sprintf("TEST-5...%s\n",driver(
          -5808.280006171851, 
          116865336.10679008
      )))
  
      cat(sprintf("TEST-6...%s\n",driver(
          829.8963781665169, 
          2385823.7719733207
      )))
  
      cat(sprintf("TEST-7...%s\n",driver(
          -7368.438572511732, 
          188079541.63799432
      )))
  
      cat(sprintf("TEST-8...%s\n",driver(
          5572.033890611617, 
          107551908.5552799
      )))
  
      cat(sprintf("TEST-9...%s\n",driver(
          -3998.9441642787706, 
          55396369.52612884
      )))
  
  }
  
  main()
source_py: def program_for_surface_area_of_octahedron(side):
      return ((2 * math.sqrt(3)) * (side * side))
source_cpp: double program_for_surface_area_of_octahedron(double side) {
    return ( 2 * ( sqrt ( 3 ) ) * ( side * side ) );
  }