| # | Line 1 | Line 1 | subroutine forceFactory(forceName,status,forceSetup) | |
|---|---|---|
| 1 | subroutine forceFactory(forceName,status,forceSetup) | |
| 2 | use TraPPE_ExFF | |
| 3 | use lj_ff | |
| 4 | < | character(len = 15) :: forceName |
| 4 | > | character(len = *) :: forceName |
| 5 | integer, intent(out) :: status | |
| 6 | external forceSetup | |
| 7 | ||
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |