| Revision: | 1670 |
| Committed: | Fri Jan 27 19:07:19 2012 UTC (13 years, 11 months ago) by chuckv |
| File size: | 334 byte(s) |
| Log Message: | Adding experimental branch for calculation of the heatflux based on old version of OpenMD. This will need to be ported to the development branch later. |
| # | User | Rev | Content |
|---|---|---|---|
| 1 | chrisfen | 727 | subroutine setFunctionType(the_FT) |
| 2 | gezelter | 939 | use switcheroo, ONLY : module_setFT => set_switch_type |
| 3 | chrisfen | 727 | integer,intent(inout) :: the_FT |
| 4 | call module_setFT(the_FT) | ||
| 5 | end subroutine setFunctionType | ||
| 6 | |||
| 7 | gezelter | 939 | subroutine deleteSwitch() |
| 8 | use switcheroo, ONLY : module_delete_switch => delete_switch | ||
| 9 | call module_delete_switch() | ||
| 10 | end subroutine deleteSwitch | ||
| 11 |
| Name | Value |
|---|---|
| svn:keywords | Author Id Revision Date |