// Scilab Code Ex4.21: Page-204 (2011)
clc;clear;
F = 4.2;....// Equivalent focal length of Ramsden eyepiece, cm
//F = 3/4*f, Equivalent focal length of Ramsden eyepiece, 
f = 5.6;....//focal length,in cm
f1 = f;
f2 = f;
printf("\nf1 = %3.1f cm", f1);
printf("\nf2 = %3.1f cm", f2);
d = 2/3*f;
printf("\nd = %4.2f cm", d);

// Result
// f1 = 5.6 cm
// f2 = 5.6 cm
// d = 3.73 cm