109 |
|
public :: SimUsesShapes |
110 |
|
public :: SimUsesFLARB |
111 |
|
public :: SimUsesRF |
112 |
< |
public :: SimUsesDampedWolf |
112 |
> |
public :: SimUsesSF |
113 |
|
public :: SimRequiresPrepairCalc |
114 |
|
public :: SimRequiresPostpairCalc |
115 |
|
public :: SimHasAtype |
561 |
|
doesit = thisSim%SIM_uses_RF |
562 |
|
end function SimUsesRF |
563 |
|
|
564 |
< |
function SimUsesDampedWolf() result(doesit) |
564 |
> |
function SimUsesSF() result(doesit) |
565 |
|
logical :: doesit |
566 |
< |
doesit = thisSim%SIM_uses_DampedWolf |
567 |
< |
end function SimUsesDampedWolf |
566 |
> |
doesit = thisSim%SIM_uses_SF |
567 |
> |
end function SimUsesSF |
568 |
|
|
569 |
|
function SimRequiresPrepairCalc() result(doesit) |
570 |
|
logical :: doesit |
573 |
|
|
574 |
|
function SimRequiresPostpairCalc() result(doesit) |
575 |
|
logical :: doesit |
576 |
< |
doesit = thisSim%SIM_uses_RF .or. thisSim%SIM_uses_DampedWolf |
576 |
> |
doesit = thisSim%SIM_uses_RF .or. thisSim%SIM_uses_SF |
577 |
|
end function SimRequiresPostpairCalc |
578 |
|
|
579 |
|
! Function returns true if the simulation has this atype |