I = 0.1;
P = 373.0277986476333;
R = 150.0;
mortgage = array1d(1..3, [260.33057851239664, 136.36363636363635, 0.0]);
----------