GLOBAL
	DIM FREQ=1e+009 RES=1 COND=0.001 CAP=1e-012  IND=1e-009 LNG=2.54e-005 TIME=1e-012 !    FREQ=GHZ   RES=ê COND= æS   CAP= pF    IND= nH   LNG= Mils    TIME= pSec

VAR
	ZE=109
	Z=50
	ZO={SQRT(Z*Z/ZE)}
	L=150
	ER=3.38
	B=41
	T=1
	RHO=1
	TAND=0
	W=? 0.1 19.1551 100 ?
	WO=? 0.1 0.201302 100 ?
	S=1

CKT
	SSUB ER=ER B=B T=T RHO=0 TAND=0 @SUB0
	SOCLIN 1 2 3 4 W=W WO=WO S=S L=L @SUB0
	DEF4P 1 2 3 4 SYN

	CLINP 1 2 3 4 ZE=ZE ZO=ZO L=L KE=ER KO=ER AE=0 AO=0
	DEF4P 1 2 3 4 DATA


FREQ
	STEP 3

PROC
	Ze()=Ze
	Zo()=Zo
	L()=L
	Er()=ER
	B()=B
	T()=T
	R(ô)=RHO
	T(ë)=TAND
	W()=W
	wo()=wo
	Z0()=SQRT(ZE*ZO)
	C()=20*LOG((1-(ZO/ZE))/(1+(ZO/ZE)))
	E()={ (1 / ( (2.997925e8/freq) /sqrt(ER) ) )*360*L*dimlng }
	CND1=W/S

PROC
	E11G=DATA S11
	E11S=SYN  S11
	E12G=DATA S12
	E12S=SYN  S12
	E13G=DATA S13
	E13S=SYN  S13
	E14G=DATA S14
	E14S=SYN  S14
	E21G=DATA S21
	E21S=SYN  S21
	E22G=DATA S22
	E22S=SYN  S22
	E23G=DATA S23
	E23S=SYN  S23
	E24G=DATA S24
	E24S=SYN  S24
	E31G=DATA S31
	E31S=SYN  S31
	E32G=DATA S32
	E32S=SYN  S32
	E33G=DATA S33
	E33S=SYN  S33
	E34G=DATA S34
	E34S=SYN  S34
	E41G=DATA S41
	E41S=SYN  S41
	E42G=DATA S42
	E42S=SYN  S42
	E43G=DATA S43
	E43S=SYN  S43
	E44G=DATA S44
	E44S=SYN  S44
	E11=SQR(E11S-E11G)
	E12=SQR(E12S-E12G)
	E13=SQR(E13S-E13G)
	E14=SQR(E14S-E14G)
	E21=SQR(E21S-E21G)
	E22=SQR(E22S-E22G)
	E23=SQR(E23S-E23G)
	E24=SQR(E24S-E24G)
	E31=SQR(E31S-E31G)
	E32=SQR(E32S-E32G)
	E33=SQR(E33S-E33G)
	E34=SQR(E34S-E34G)
	E41=SQR(E41S-E41G)
	E42=SQR(E42S-E42G)
	E43=SQR(E43S-E43G)
	E44=SQR(E44S-E44G)

OPT
	OUTVAR E11 EQ 0
	OUTVAR E12 EQ 0
	OUTVAR E13 EQ 0
	OUTVAR E14 EQ 0
	OUTVAR E21 EQ 0
	OUTVAR E22 EQ 0
	OUTVAR E23 EQ 0
	OUTVAR E24 EQ 0
	OUTVAR E31 EQ 0
	OUTVAR E32 EQ 0
	OUTVAR E33 EQ 0
	OUTVAR E34 EQ 0
	OUTVAR E41 EQ 0
	OUTVAR E42 EQ 0
	OUTVAR E43 EQ 0
	OUTVAR E44 EQ 0

OPT
	OUTVAR RE[CND1] GT 0.34999

OUT

	SYN POL[S11] GRAPH
	DATA POL[S11] GRAPH
	SYN POL[S21] GRAPH
	DATA POL[S21] GRAPH
	SYN POL[S31] GRAPH
	DATA POL[S31] GRAPH
	SYN POL[S41] GRAPH
	DATA POL[S41] GRAPH

	OUTVAR RE[Ze()] DATA
	OUTVAR RE[Zo()] DATA
	OUTVAR RE[L()] DATA
	OUTVAR RE[ER()] DATA
	OUTVAR RE[B()] DATA
	OUTVAR RE[T()] DATA
	OUTVAR RE[R(ô)] DATA
	OUTVAR RE[T(ë)] DATA

	OUTVAR RE[W()] SYN
	OUTVAR RE[wo()] SYN
	OUTVAR RE[C()] SYN
	OUTVAR RE[Z0()] SYN
	OUTVAR RE[E()] SYN

LABEL
	CLINP to soCLIN Synthesis