clear;
clc;

//Example13.3[View Factors Associated with a Tetragon]
//Given:-
//A pyramid with square base and it's sides being isoceles triangle
//Solution:=
F11=0;//Since base is a flat surface
//F12=F13=F14=F15=x
x=(1-F11)/4;
disp("of total radiation",x,"Each side pf the four surfaces of the pyramid recieves")