summaryrefslogtreecommitdiff
path: root/1997/CH1/EX1.1/example1.sce
blob: 9f11afeb17d4505fd448a77145a5682a0f21e8d5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Chapter-1, Example 1.1, Page 34
//=============================================================================
clc;
clear;

//INPUT DATA
PRF= 1000;//pulse repetitive frequency in Hz
PW = 2*10^-6;//pulse width 2us
Pav=100;//average power in watts

//Calculations

Ppeak = (Pav)/(PW*PRF);//Peak power in watts
D     = Pav/Ppeak;//Duty cycle

//Output
mprintf('Peak power is %g KW\n Duty cycle is %e',Ppeak/1000,D);