* BEGIN PROG NSE FEMTO AMP/RT-HZ .SUBCKT FEMTO 1 2 * BEGIN SETUP OF NOISE GEN - FEMPTOAMPS/RT-HZ * INPUT THREE VARIABLES * SET UP INSE 1/F * FA/RHZ AT 1/F FREQ .PARAM NLFF=1.2 * FREQ FOR 1/F VAL .PARAM FLWF=0.001 * SET UP INSE FB * FA/RHZ FLATBAND .PARAM NVRF=1.2 * END USER INPUT * START CALC VALS .PARAM GLFF={PWR(FLWF,0.25)*NLFF/1164} .PARAM RNVF={1.184*PWR(NVRF,2)} .MODEL DVNF D KF={PWR(FLWF,0.5)/1E11} IS=1.0E-16 * END CALC VALS I1 0 7 10E-3 I2 0 8 10E-3 D1 7 0 DVNF D2 8 0 DVNF E1 3 6 7 8 {GLFF} R1 3 0 1E9 R2 3 0 1E9 R3 3 6 1E9 E2 6 4 5 0 10 R4 5 0 {RNVF} R5 5 0 {RNVF} R6 3 4 1E9 R7 4 0 1E9 G1 1 2 3 4 1E-6 C1 1 0 1E-15 C2 2 0 1E-15 C3 1 2 1E-15 .ENDS * END PROG NSE FEMTO AMP/RT-HZ