anchor.diff:      procedure Invalid_if_exchange_code_starts_with_1;
   
       [Test]
  +    [Ignore]
  +    procedure Invalid_if_area_code_starts_with_0_on_valid_11_digit_number;
  +
  +    [Test]
  +    [Ignore]
  +    procedure Invalid_if_area_code_starts_with_1_on_valid_11_digit_number;
  +
  +    [Test]
  +    [Ignore]
  +    procedure Invalid_if_exchange_code_starts_with_0_on_valid_11_digit_number;
  +
  +    [Test]
  +    [Ignore]
  +    procedure Invalid_if_exchange_code_starts_with_1_on_valid_11_digit_number;
  +
  +    [Test]
       [Ignore('This is a bonus test')]
       procedure Extract_area_code;
   
  
positive.code: var phone: IPhoneNumber;
  begin
    phone := NewPhoneNumber('2234567890');
    assert.AreEqual('(223) 456-7890', phone.Formatted);
  end;
  
  initialization
  
negative.code:   assert.AreEqual('', phone.Clean);
  end;
  
  procedure PhoneNumberTests.Invalid_if_exchange_code_starts_with_0_on_valid_11_digit_number;
  var phone: IPhoneNumber;
  begin
    phone := NewPhoneNumber('1 (223) 056-7890');
    assert.AreEqual('', phone.Clean);
  end;
  
  procedure PhoneNumberTests.Invalid_if_exchange_code_starts_with_1;
  var phone: IPhoneNumber;
  begin
    phone := NewPhoneNumber('(223) 156-7890');
    assert.AreEqual('', phone.Clean);
  end;
  
  procedure PhoneNumberTests.Invalid_if_exchange_code_starts_with_1_on_valid_11_digit_number;
  var phone: IPhoneNumber;
  begin
    phone := NewPhoneNumber('1 (223) 156-7890');
    assert.AreEqual('', phone.Clean);
  end;
  
  